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

MEMO_LINECOUNT = LINECOUNT

SELECTCASE ARGS
CASE "朝拘束"
	CALL PRINT_STRW, @"「ん、ふふ、おはよう%CNAME("主人")%_BH_」"
	PRINTFORMW 「動けないかい？ それは結構。そうなってくれないと困るからネ」
	PRINTFORMW 「大丈夫大丈夫、取って食ったりはしないサ」
	CALL PRINT_STRW, "「ごーめん、嘘だ_BH_ いただきまーす_BH_」"
;朝のＨイベントでのセリフ。下の"打招呼"だけ書いてあれば十分だと思います
;ここでCALL SETFLAG, "地の文スキップ"すると地の文、経験表示、本来なら続いて表示される下のCASE "打招呼"の台詞、を全てすっ飛ばせます(上級者向け)
;詳しくは@EVENT_NEWDAYの注釈などを見てください
CASE "朝袭"
	SELECTCASE CSTR:朝袭
;	CASE "朝逆正常位"
;		PRINTFORMW
;	CASE "朝舐陰"
;		PRINTFORMW
	CASE "朝足交"
		PRINTFORMW 「いやーまさか刚睡醒から足でされて元気だなんてネー」
		PRINTFORMW 「しかもまだビンビンですヨ。これはもっと罰を与えなきゃネー前輩としてはサ！」
		PRINTFORMW 「ほれほれうりうり♪ わんこのアンヨでどぴゅっとお出し♪」
	CASE "朝の新妻PLAY"
		PRINTFORMW
	CASE "朝乳交"
		PRINTFORMW 「駆け付け一番、胸部はどうだい？」
		PRINTFORMW 「幸せそーな顔だねー♪ じゃ、一発イっとこうか♪」
	CASE "朝騎乗位"
		IF TALENT:恋慕 && RAND:2
			CALL PRINT_STRW, "「動かないのも意外と良い、な……ふふ_HH_ はっは、もう、情けない位媚びてるの解るなぁ……」"
			IF RAND:5 == 0
				CALL PRINT_STRW, @"「…………好きだよ。 %CNAME("一人称")%は、好き、%CNAME("二人称")%が、好き。大好き_HH_」"
			ELSEIF RAND:4 == 0
				CALL PRINT_STRW, "「……食べたい_HH_ でも、食べたくない……食べて、欲しくなる事もある。変だ。やっぱり好きって、変だな……それでも、好きだ_HH_」"
			ELSEIF RAND:3 == 0
				CALL PRINT_STRW, "「……本当はね、愛してるって言いたい……けど、愛とかよく解らないんだ。だから好き。大、好き……はぁ、兒童っぽいなぁ」"
			ELSEIF RAND:2
				CALL PRINT_STRW, @"「……こんなに元気にして。仕方の無い人…_HH_ それは%CNAME("一人称")%もか…全く、我ながら……莫迦だ」"
			ELSE
				CALL PRINT_STRW, "「…………ごめんね、こんな化け物で。食べるのも忍耐から。一杯、するから。だから…だから……」"
			ENDIF

			CALL PRINT_STRW, "「――――あっ、あらァ～？ 起きてんでやんの。のっ覗きはぁ良くないナ！ え、襲った側の台詞かって？ そりゃご尤も！！」"
			PRINTFORMW 「で、ですヨ――――あのーですネ！ バレずに頂く予定だったんですヨ？ なんでさっきのはですネ。いや、あの、ですネ」
			CALL PRINT_STRW, "「――――とりあえず一発ヌいてからにしよう！ おら腰振り始め！！ そぉおおおいぞぉおおおおおおい！ あ、是、黙ります」"
		ELSE
			CALL PRINT_STRW, "「んっ_HH_ わっ、起きちゃった？」"
			CALL PRINT_STRW, "「にひっ_HH_ 忠犬ですから？ んぁっ_HH_ こうして健気にもご奉仕をっni↘っ_HH_」"
			CALL PRINT_STRW, "「あっ_HH_ こ、こらっ_HH_ 急に動くのは反則だろうっっ_HH_」"
		ENDIF
	CASE "朝Ａ騎乗位"
		CALL PRINT_STRW, "「おはよ_HH_ 朝からお尻で絞られる気分はどうかナ_HH_」"
		CALL PRINT_STRW, @"「にひひひ――_HH_ おちんちんは%CNAME("一人称")%のお尻が大好你たいだネー_HH_」"
	CASE "朝接吻"
		PRINTFORMW 「有ゃ、ごめんごめん。起こしちゃったナ」
		PRINTFORMW 「食べようとしてたんじゃないんだぜ、ほんとほんと」
	CASE "朝添い寝"
		PRINTFORMW 「ん、ふぁああ――――にひひっ♪」
		IF TALENT:恋慕 && RAND:2
			PRINTFORMW 「汗臭い？ そりゃ失敬。筋トレの後なもんでネ」
			PRINTFORMW 「こうやって%CNAME("二人称")%に汗の气味を覚えさせて――――いやぁん冗談ですヨ♪」
		ELSE
			PRINTFORMW 「つまみ食いしてやろうかナーなんて思ったんだけど、気持ちよさそうに寝てたもんだからつい一緒に寝ちゃった」
		ENDIF
	CASE "朝口交"
		IF TALENT:恋慕 && RAND:2
			CALL PRINT_STRW, "「んもっ――ん？ ――んふっ_HH_」"
			PRINTFORMW %CALLNAME:MASTER%が目を覚ました事に気付いた%CALLNAME:TARGET%は口の動きをより複雑にさせていく。
			CALL PRINT_STRW, "「んっふ_HH_ んーっふ_HH_ んーっふ_HH_ んーっふ_HH_」"
			PRINTFORMW 何を言っているのか解らない筈なのに煽られている事だけはよく解った…
		ELSE
			PRINTFORMW 「んっ？ んも、おふぇぉ！ じゅる――んじゅ――くちゅ――じゅ――」
			PRINTFORMW 「んっんっ――じゅじゅっ――じゅぼじゅぼじゅぼじゅぼじゅぼじゅぼ♪」
		ENDIF
	CASE "朝六九式"
		CALL PRINT_STRW, "「んむっ_HH_ んももっ！？ もっ！ もんっ！」"
		CALL PRINT_STRW, "「んんん～っ_HH_ じゅぼじゅるんじゅっ_HH_ じゅるるっ_HH_」"
	ENDSELECT
;朝のＨイベント終了後にする打招呼
CASE "打招呼"
	SELECTCASE CSTR:朝袭
	CASE "朝添い寝"
		IF CFLAG:食欲 >= 50
			PRINTFORMW 「ところでサ、添い寝しながらずっと良い气味がしててさー」
			PRINTFORMW 「もう辛抱堪らないってトコなのサ。ネ、解るよネ？ オアズケは聞いてあげられないナ♪」
			PRINTL
			PRINTFORMW 返事をする間もなく%CALLNAME:TARGET%は%CALLNAME:MASTER%に"齧り"ついた…
			CALL PREDATION
		ELSE
			PRINTFORMW 「ふぁあ、まだ少し眠いナ。起きなきゃいけないのが辛いトコロだ」
			IF TALENT:恋慕
				PRINTFORMW 「もう少し一緒に寝ちゃうかい？ ず～っと二人、誰にも邪魔されないで、なんなら今日一日、さ」
				PRINTFORMW 「――――にひっ♪ 大姐姐の冗談を真に受けちゃいけないナ？ さっさとおっきして顔洗ってこ～い！」
			ELSE
				PRINTFORMW 「ん～っヨシ！！ そ～ら起きた起きた！ おはようの時間だぜ」
			ENDIF
		ENDIF
	CASE "朝口交","朝乳交"
		IF CFLAG:食欲 >= 50
			PRINTFORMW 「朝の一番搾りを頂いたところでー」
			CALL PRINT_STRW, "「――――朝食を味わいたいナ_BH_」"
			PRINTL
			PRINTFORMW 返事をする間もなく%CALLNAME:TARGET%は%CALLNAME:MASTER%に"齧り"ついた…
			CALL PREDATION
		ELSE
			PRINTFORMW 「ひゃ～顔から何からもうドロドロだ。まったく朝から本当に元気じゃないか」
			IF TALENT:恋慕
				PRINTFORMW 「にひっ♪ このまんまおはようの接吻でもしてやろうかと思ったけどや～めた♪」
				PRINTFORMW 「感謝してくれよ、衝動のままザー接吻しなかった自制の効くペットにサ♪」
			ELSE
				PRINTFORMW 「ついでに汗も流してきましょうかネ」
				PRINTFORMW 「おっと、覗いても良いけど代金は頂くぜ？ 身体でサ♪」
			ENDIF
		ENDIF
	CASE "朝騎乗位","朝Ａ騎乗位"
		IF CFLAG:食欲 >= 50
			PRINTFORMW 「はぁ～すっきり！ %CNAME("二人称")%もご苦労！」
			PRINTFORMW 「じゃ、朝食の用意と洒落込もうか？ 準備は良いよね」
			PRINTL
			PRINTFORMW 返事をする間もなく%CALLNAME:TARGET%は%CALLNAME:MASTER%に"齧り"ついた…
			CALL PREDATION
		ELSE
			IF TALENT:恋慕
				IF RAND:2
					PRINTFORMW 「もう終わり？ おはようするかい？ そ・れ・と・も？」
					PRINTFORMW 「――――にひっ♪ やめたやめた。さっさと淋浴浴びて他の子に顔出してこいよ、後始末位ペットに任せてサ♪」
				ELSE
					CALL PRINT_STRW, "「にひひ_HH_ いや～悪いね_HH_ ほんとーに悪い事しちゃったと思ってるんですヨ_HH_」"
					CALL PRINT_STRW, @"「今日、誰に幾ら愛を囁いたって最初に抱いたのは可愛いペットの%CALLNAME:TARGET%酱なんだぜ_HH_」"
				ENDIF
			ELSE
				PRINTFORMW 「朝の運動終わり！ いやいや、散歩の代わりに丁度良いじゃないか♪」
				PRINTFORMW 「あ、そうそう。汗くらい流してこいよ、結構汗臭くて美味しそうな气味がプンプンしてるぜ」
			ENDIF
		ENDIF
	CASE "朝六九式"
		IF CFLAG:食欲 >= 50
			PRINTFORMW 「早起きのトク――いただきます♪」
			PRINTL
			PRINTFORMW 返事をする間もなく%CALLNAME:TARGET%は%CALLNAME:MASTER%に"齧り"ついた…
			CALL PREDATION
		ELSE
			IF TALENT:恋慕
				PRINTFORMW 「あ～クッソ、%CNAME("一人称")%まで気持ち良くする必要は無いんじゃないかい？」
				PRINTFORMW 「べっつにー！ 怒ってないです～嘘です～怒ってまーす！」
				PRINTFORMW 「%CNAME("二人称")%だけを気持ち良くしたいの、可愛い顔見たいんですヨ！」
				PRINTFORMW 「わかる？このオトメゴコロ！ %CNAME("一人称")%は分からんけど！」
				PRINTFORMW 「はーーーー！ もう！ バカ！ ちんちん！ 知らん！ わんわん！ さっさと支度してこーい！」
			ELSE
				PRINTFORMW 「なんだか納得いかないナー、狩る側が一緒に狩られたというか、共倒れと言いますかネ」
				PRINTFORMW 「んー、まあいっか！ 叫醒つもりだったしネ、ほら、さっさと始末して顔洗ってきなさいナ♪」
			ENDIF
		ENDIF
	ENDSELECT

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

	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「%TEXTR("――――ああ、おはよう/起きたんだ、そっか")%」
	ELSEIF COND("体育")
		IF TALENT:恋慕
			PRINTFORMW 「今日は体育の日だろ。起き抜けから酱と気合入れなきゃあね」
		ELSE
			PRINTFORMW 「今日は体育の日だってなんで教えてくれなかったんだ！」
			PRINTFORMW 「%TEXTR("えーっと、運動の時間はこの位の時だね？ よしよし、一番良い肉質になるのは、っと/肉質が変わっちゃうだろう！？ 今日は硬めの気分だったのに！")%」
		ENDIF
	ELSE
		PRINTFORMW 「おっはよ！ %CNAME("主人")%♪」
		PRINTFORMW 自然に齧りついて来ようとする%CALLNAME:TARGET%を%CALLNAME:MASTER%はギリギリで躱す。
		PRINTFORMW 「っちぇー、先っちょだけ、先っちょ位いいだろ？ネ？ネ？」
	ENDIF
CASE "登校"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW %CALLNAME:TARGET%は何も言わず%CALLNAME:MASTER%と一定の距離を取って歩いている…
	ELSEIF DAYEV("試験当日")
		IF RAND:3 == 0
			PRINTFORMW 「おーどうしたんだい。気のせいか顔が青いぞ」
			IF CFLAG:MASTER:勉強時間 >= 8
				PRINTFORMW 「そう心配するなよ。やるコトはやったんだろう？」
				PRINTFORMW 「%TEXTR("おろおろするより胸を張れよ。そうすれば少しはマシに解けるさ/後は力を出し切るだけ、そうしたら結果は後から着いてくるものサ")%」
				PRINTFORMW 「%TEXTR("おー今すっごい良いコト言った。知らんけど/――お、今の良いね。何だか前輩みたいだ！")%」
			ELSE
				PRINTFORMW 「ははぁん、さては勉強あまりして来なかったクチだ。ご愁傷サマ♪」
			ENDIF
		ELSEIF RAND:2
			PRINTFORMW 「――――あー、ごめんごめん。今日のテスト範囲を頭の中でお浚いしていたんだ」
			PRINTFORMW 「ギリギリまで予行演習は欠かさない主義なのサ」
		ELSE
			PRINTFORMW 「テスト勉強は捗ったかい？」
			PRINTFORMW 「もっと泣きついてくれても良かったんだぜーこの頼れる前輩にさァ！」
		ENDIF
	ELSEIF DAYEV("試験返却日")
		PRINTFORMW 「おいおい、不景気な顔だね%CNAME("主人")%」
		PRINTFORMW 「%TEXTR("さあさ、努力の成果の確認日だぜ？/俯いたって返されるものは返されるんだからサ")%」
		PRINTFORMW 「もっと足取り轻轻地行こうじゃないか♪」
	ELSEIF COND("朝袭相手")
		IF TALENT:恋慕
			IF RAND:2
				PRINTFORMW 「――くくっ♪ イケナイなー今朝の噛み跡が見えてるじゃあないか」
				CALL PRINT_STRW, "「登校中にそんな破廉恥を見せつけるなんて悪い子だネ_BH_」"
			ELSE
				PRINTFORMW 「今朝の元気はどうしたー」
				PRINTFORMW 「もっとシャキシャキッと歩けるだろ～まったく最近の青年は」
			ENDIF
		ELSE
			IF RAND:2
				PRINTFORMW 「ほら、気にしない気にしなーい」
				PRINTFORMW 「ちゃーんと見えない所食べたんだから、噛み跡は見えないって」
			ELSE
				PRINTFORMW 「いやー朝からお腹が満たされてると気分が良い。足取りも軽やかになろうもんだよ」
			ENDIF
		ENDIF
	ELSEIF COND("体育")
		IF TALENT:恋慕
			IF RAND:2
				PRINTFORMW 「実の所体育は余り好きじゃないんだ」
				PRINTFORMW 「苦手科目というワケでも無いんだけどねー、ほら、わかるだろう？」
				PRINTFORMW 「プリプリのお肉が踊るのを見てると――――どーもお腹がネ」
			ELSE
				PRINTFORMW 「そう言えば今朝見た夢の話なんだけど」
				PRINTFORMW 「体育で良い汗を掻いた%CNAME("二人称")%のお肉にかぶりつくっていう夢を見たんだ」
				PRINTFORMW 「いやー、良い夢だったな。凄くいい夢だった。いい夢だったんだよ」
				PRINTFORMW 「――――露骨に目を逸らされるともっとおねだりしちゃうぞ？」
			ENDIF
		ELSE
			IF RAND:2 == 0
				PRINTFORMW 「お肉の質に気を使って手を拔出とかさー、ダメ？」
				PRINTFORMW 「はー体育でめちゃくちゃ本気出すとか小学生男子か%CNAME("二人称")%は」
			ELSE
				PRINTFORMW 「是是、登校中にまでごちゃごちゃ言いませんよー忠犬でございますから」
				PRINTFORMW 「――――ところでさー、体育の後汗の带污迹的た毛巾とか持ってきてくれないカナー」
				PRINTFORMW 「何に使うかって？ ほら、焼肉店の通気孔から漏れる風味で味気ない胖次を食べるとかあるだろう、ネ？」
			ENDIF
		ENDIF
	ELSE
		IF TALENT:恋慕
			IF RAND:3 == 0
				PRINTFORMW 「お、もしかして車道側を歩いてくれるのかい？」
				CALL PRINT_STRW, @"「クスクス♪ ヤサシイなーさっすが%CNAME("主人")%_BH_」"
			ELSEIF RAND:2
				PRINTFORMW 「ふわぁ――とっと、見なかったことにしておくれよ」
				PRINTFORMW 「%TEXTR(@"レアなんだ。安くないんだぜ、%CNAME("一人称")%の哈欠はサ♪/大哈欠なんて同班同学に見られたら目を丸くされちゃうからね")%」
			ELSE
				PRINTFORMW 「あっ、あー、まぁ、良いか」
				PRINTFORMW 「同班同学がぎょっとした顔でこっち見ていたんだよ」
				CALL PRINT_STRW, "「見せつけてやるのも面白そうかななんてネ_BH_」"
				PRINTFORMW 「%TEXTR("ほら、腕組もうぜ、腕/いっちょ胸とか揉んどく？/剪刀手とかしてみようか、へいへーい")%」
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「%TEXTR("ちゃーんとリードは引っ張っておいてね/よそ見是けないねー")%、%CNAME("主人")%」
				PRINTFORMW 「朝は皆警戒心单薄的のさ、ついうっかり小腹が空いてパックンチョ――――大変でしょう？」
			ELSEIF RAND:2
				PRINTFORMW 「眠たそうな顔だねー。ひとカジリしたら目が覚めるかな？」
				PRINTFORMW 「なーんて、冗談なんだけど。どう？ おひねりついでに一口良い？ ダメ。あ、そう。くぅ～ん」
			ELSE
				PRINTFORMW 「お、少し出口るよ？」
				PRINTFORMW %CALLNAME:TARGET%は%CALLNAME:MASTER%の元を出口ると同級生らしき生徒の元へと嫋やかな仕草で頭を下げて話を始めた。
				PRINTFORMW 物腰柔らかな所作は普段からは想像も出来ないような優等生らしさがにじみ出ている…
			ENDIF
		ENDIF
	ENDIF
;この角色と一緒に部室に入った際に誰も他にいない場合
CASE "一番乗り"
	IF TALENT:恋慕
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「……二人きりだからって何か期待してるわけじゃあ無いよね」
		ELSE
			PRINTFORML 「おっ――――にひひっ♪」
			PRINTFORMW 「都合もよろしく二人きりじゃあないか、何しようか？ナニをシようか！？」
		ENDIF
	ELSE
		PRINTFORML 「へいへーい、誰も居ないならアッチで前輩とイイコトしない？」
		PRINTFORMW 「喰わなければ？ そんなご無体な」
	ENDIF
CASE "ただいま"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「……我回来了」
	ELSEIF RAND:2
		PRINTFORMW 「ただいまもどりましたよーっと」
	ELSE
		PRINTFORML 「ただい――――ん？ なんだいその顔」
		PRINTFORML 「あー、ちょっと家に寄ってつまみ食いしたから、その痕かな」
		PRINTFORMW 「にひひっ、先に着替えてこようかナ」
	ENDIF
CASE "既に入室"
	;家で出迎えてくれる時
	IF COND("夜")
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「あっ！――――ん、おかえりなさい」
			ELSE
				PRINTFORMW 「待ってたぜお帰りっ！」
			ENDIF
		ELSE
			PRINTFORMW 「お帰りなさい」
			PRINTFORMW 「で、%CNAME("二人称")%が居なくても良い子にしてた%CNAME("一人称")%にご褒美は無いのかナ？」
		ENDIF
	ELSE
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW %CALLNAME:TARGET%はこちらを一瞥して、小さく鼻を鳴らした…
			ELSE
				PRINTFORMW 「おっ、来た来た♪ 遅いぜ%CNAME("主人")%」
			ENDIF
		ELSE
			PRINTFORMW 「中々来ないから心配しちゃったヨ。まったく、監視管理は大事だぜ？」
			PRINTFORMW 「何の、とは言わないけどネェ――♪」
		ENDIF
	ENDIF

CASE "入室打招呼"
	IF CFLAG:呼び出された
		IF CEVENT("恋慕：ささくれ")
			PRINTFORML 「呼ばれて来てやったよ」
			PRINTFORMW 「ホント、よく躾けられてるだろ。笑っちゃうよね」
		ELSE
			PRINTFORML 「呼び出しなんて%CNAME("主人")%たらダ・イ・タ・ン♪」
			PRINTFORMW 「――なんだい、その悪いモノ見たなーって目。ちょっと傷つくな」
		ENDIF
	;你が現在的partnerにＨ的悪戯をしている最中に入室した（partnerへの呼びかけはCNAME("partner")で出来る）
	ELSEIF COND("Ｈ的いちゃつき中", MASTER)
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW %CALLNAME:TARGET%は鼻で笑うとすぐに%CALLNAME:MASTER%を無視するように窓際に腰を降ろした…
			ELSE
				PRINTFORMW 「お、順番待ちの列はここでいいのかナ？」
			ENDIF
		ELSE
			PRINTFORML 「おーおー、仲良し桑だこと」
			PRINTFORMW 「ほどほどにしないと刺されちゃうのが心配だな～、前輩としてはサ」
		ENDIF
	ELSE
		PRINTFORML 「どーもどーも、今日もノンビリしていこうか」
		PRINTFORMW 「ノンビリ、ネ」
	ENDIF
;部屋にいる他の人から打招呼を返される打招呼。WAITの使用は一回が望ましい
CASE "簡易入室打招呼"
	;遅れた時のセリフ（既に部員の４分の３が集合済）
	IF CHARA_NUM("入室打招呼時の室内人数") >= CHARANUM*3/4 && RAND:3 == 0
		PRINTFORML 「――真打ちは、遅れてやってくるものサ」
		PRINTFORMW 「え、真打ちだろうが遅刻はダメだろって？ サーセーン」
	ELSEIF CFLAG:呼び出された
		IF CEVENT("恋慕：ささくれ")
			PRINTFORML 「呼ばれたなら来なきゃいけないだろ、部員としては、サ」
		ELSE
			PRINTFORML 「いやん部長ったら%CNAME("一人称")%にご執心♪」
			PRINTFORMW 「なーんて言ったら刺されそうだから言わない――あ、言っちゃってるか」
		ENDIF
	ELSE
		PRINTFORMW 「店長今日やってるー？ なーんつって」
	ENDIF
;簡易入室打招呼に対する返し。WAITの使用は一回が望ましい
;誰が入室してきた人はCOND("入室打招呼中")がONなのでFIND_COND("入室打招呼中")で検索可能
;また、入ってきた人数はCHARA_NUM("入室打招呼中")で調べられる
CASE "打招呼返し"
	;打招呼してきた人の中から一人選ぶ
	ACTOR = FIND_COND("入室打招呼中")
	;選ばれた角色の默认のCALLNAME。この角色への呼びかけはCNAME(CALLNAME_ACTOR) で出来る
	CALLNAME_ACTOR = %CSVCALLNAME(NO:ACTOR)%

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

	;打招呼してきた人に老师が混じっている
	IF FIND_COND("教員", "入室打招呼中")
		PRINTFORML 『おや、やあやあ老师じゃないですか～』
	;相手が現れるのが遅かった（既に部員の４分の３が集合済）
	ELSEIF CHARA_NUM("入室打招呼時の室内人数") >= CHARANUM*3/4 && RAND:3 == 0
		PRINTFORMW 『お、遅刻かい？ 罰游戏する？罰游戏』
	ELSE
		PRINTFORMW 『じゅる――おっと、こんにちは』
	ENDIF

CASE "居間に現れた"
	IF CFLAG:呼び出された
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「%TEXTR("なんだい？ 忙しいんだけど/御用がないなら、もう戻って良い？")%」
			ELSE
				PRINTFORMW 「%TEXTR(@"わんわん♪ 御用ですかな～？/ケーンケーン！ おっと、これじゃ雉だ/呼ばれて飛び出てわーんわわーん！/%CNAME("主人")%に呼ばれたなら仕方がない。さ、何の用かな。無くても良いけどサ♪")%」
			ENDIF
		ELSE
			PRINTFORMW 「随分とインスタントに呼び出すじゃない、結構結構♪」
		ENDIF
	;一度居間から別の場所に行って、居間に帰って来た時
	ELSEIF CMOVE("居間")
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「――なんだい？ 忘れ物をしただけだから気にしないでおくれよ」
			ELSE
				PRINTFORMW 「んっふ、寂しくなっちゃってさ～？ ﾅﾃﾞﾅﾃﾞｼﾃｰっつってネ♪」
			ENDIF
		ELSE
			PRINTFORMW 「ビクビクするなよ～。取って喰いやしない――いや、嘘是けないな」
		ENDIF
	ELSE
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 居間に入ってきた%CALLNAME:TARGET%は%CALLNAME:MASTER%の姿を認めると小さく叹气を吐いた…
			ELSE
				PRINTFORMW 「お、%CNAME("主人")%。隣座るよ～？ にひひっ♪」
			ENDIF
		ELSE
			PRINTFORMW 「入ってきた途端にそうぎょっとした顔するなよ、ちょっと傷つくな～」
		ENDIF
	ENDIF
CASE "抜け出された"
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 摆脱%CALLNAME:MASTER%を見送る%CALLNAME:TARGET%は目を細め、やがて見なかった事にするように伏せた…
			ELSE
				PRINTFORMW 「あっ――――うーん、求愛って難しいね」
			ENDIF
		ELSE
			PRINTFORMW 「はー、羨ましいなーつまみ食い」
		ENDIF
CASE "便当"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「礼は結構だよ。鬱陶しいから」
		PRINTFORMW 「ただ残さないでね、食べないのは%CNAME("二人称")%の勝手だけど勿体ないのは嫌なんだ」
	ELSE
		PRINTFORMW 「さて、中身はなんだと思う？」
		PRINTFORMW 「正解は――――感想聞かせてネ♪」
	ENDIF
;同じ部屋にいる他の人がＨを開始した際のセリフです
CASE "他の人がＨ開始"

ENDSELECT

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

SELECTCASE ARGS
;初回のセリフ
CASE "初回台詞"
	PRINTFORML 「ここに来るのに迷っちゃったよ。場所位酱と聞いておけば良かったね」
CASE "浑身是汗"
	IF TALENT:恋慕
		PRINTFORML 「暑いなー、はぁ」
		IF CEVENT("恋慕：ささくれ")
			PRINTFORML %CALLNAME:TARGET%は%CALLNAME:MASTER%を見ないようにして扇いでいる…
		ELSE
			PRINTFORML 「暑いんだよナー！」
			PRINTFORML %CALLNAME:TARGET%は%CALLNAME:MASTER%の方をチラチラ見ながら胸元を扇いでいる…
		ENDIF
	ELSE
		PRINTFORML 「こうも暑いと保存が心配になっちゃうナー」
		PRINTFORML 「ん？ ふふ――コッチの話だよ」
	ENDIF
CASE "刚睡醒"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORML 「――別に、なんでも無いよ」
		PRINTFORML 相手は恨めしそうな顔で%CALLNAME:MASTER%を一瞥するとまたムスッとした顔で視線を逸した…
	ELSE
		PRINTFORML 「むむむ――食べ逃した相手は大きかったな。夢っての是っつもそうだ」
	ENDIF
CASE "Cosplay中"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORML 「あまり着ない衣装だからかな、落ち着かないや」
		PRINTFORML 「――――誰か桑の視線があるのもあるかもね」
	ELSE
		PRINTFORML 「どう？ 似合う似合う？ にひひっ♪」
		IF TALENT:恋慕
			PRINTFORML 「ヘンテコな衣装でも似合うって言われるのは気分が良いネ！」
		ELSE
			PRINTFORML 「ところでそれペットに服着せる感覚？」
		ENDIF
	ENDIF
CASE "点心の感想"
	;今日の点心を用意したのは自分
	IF COND("点心当番")
		IF COND("亲手自制点心")
			PRINTFORML 「簡単なモノしか用意出来なかったけど良いかい？」
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORML 「ああ、%CNAME("主人")%も食べると良い。嫌いだからって差別はしないサ」
				ELSE
					PRINTFORML 「隠し味も入れてるんだぜ。そう、愛情っていう隠し味をね！ ははは、デキる女性って感じだろ？」
				ENDIF
			ELSE
				PRINTFORML 「遠慮しないで食べてくれ。%CNAME("一人称")%は味見でお腹一杯だからサ」
			ENDIF
		ELSE
			PRINTFORML 「随意見繕って買ってきたんだ。感謝してもいいんだよ？」
			PRINTFORML 「ああ、%CNAME("一人称")%是らないよ。喜ぶ顔が見れればお腹一杯なのサ」
		ENDIF
	;今日の点心は誰かの亲手自制
	ELSEIF COND("亲手自制点心")
		;今日の点心当番の人の亲手自制を初めて食べた
		IF DEVENT(@"%TEXTS("点心当番")%の亲手自制") == 0
			;点心当番が[料理擅長]
			IF COND("点心の作り手が料理擅長")
				PRINTFORML 「へー、亲手自制で。こりゃ擅長いもんだ」
				PRINTFORML 「はむ――ん――うん、流石、味も悪くない」
			ELSE
				PRINTFORML 「亲手自制かい？ へー、こりゃーまた」
				PRINTFORML 「――んくっ、ご馳走様。美味しかったよ」
			ENDIF
		ELSE
			PRINTFORML 「手が進んでない？はは、ああごめんね」
			PRINTFORML 「一口食べたら満足しちゃうのさ、少食でネ」
		ENDIF
	;点心が亲手自制でない
	ELSE
		PRINTFORML 「あー、%CNAME("一人称")%はこれ以上は結構」
		PRINTFORML 「乙女の体重に関わるんだ。これでも人一倍気を使ってるんだぜ？」
	ENDIF
;沉眠著
CASE "睡眠"
	;梦话
	CALL KOJO_SLEEP_K60
	;梦话用の汎用地の文呼出
	CALL DAILY_MESSAGE, "梦话"
ENDSELECT

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

;前回指令対応台詞
SELECTCASE CONDS("直前行動")
CASE "愛の告白"
	PRINTFORML 「――――あーっ！！」
	PRINTFORML 「落ち着かない―――落ち着かないな――――あーっ！！」
CASE "约会的约定"
	IF TALENT:恋慕
		IF CEVENT("恋慕：ささくれ")
			PRINTFORML 「お出かけ、お出かけ――はー」
			PRINTFORML 「――どうしようか。ホント、どうしようかナ」
		ELSE
			PRINTFORML 「さぁ～て何処に連れってって貰おうかナ♪」
		ENDIF
	ELSE
		PRINTFORML 「行ったらマズいところあったかなー」
		PRINTFORML 「あー、警察署とかマズいね」
	ENDIF
CASE "摆脱"
	IF TALENT:恋慕
		IF CEVENT("恋慕：ささくれ")
			PRINTFORML 「無理しなくて良いんだぜ。こんな女相手にさ」
		ELSE
			PRINTFORML 「にひひっ♪ いやいや、口元も緩もうモンですヨ」
			PRINTFORML 「――――おーりゃっ、是！頭！撫でる！ わんわん！！」
		ENDIF
	ELSE
		IF RAND:2
			PRINTFORML 「餌の時間かナ～？」
		ELSE
			PRINTFORML 「秘めゴト、姫ゴト、隠しゴト」
			PRINTFORML 「ゴト行為はご法度ですヨ、お客桑♪」
		ENDIF
	ENDIF
;你と一緒に、主人公的房間に移動した
CASE "主人公的房間に連れ込まれた"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORML 「それで、どういった用件かな？」
		PRINTFORML 「なにもないならお闲したいんだけど」
	ELSE
		PRINTFORML 「にひひっ――♪」
		PRINTFORML %CALLNAME:TARGET%はこちらを見ては心情好に頬を緩めている…
		PRINTFORML その口の端からはぬっとりとした涎が見てとれた…
	ENDIF
;你と一緒に、partner的房間に移動した
CASE "自室に招待"
	IF TALENT:恋慕
		IF CEVENT("恋慕：ささくれ")
			PRINTFORML 「悪いけど、用が済んだら出ていってくれ」
		ELSE
			PRINTFORML 「%TEXTR("ワンコの小屋/巣")%にごあんなーい♪ にひひっ♪」
			PRINTFORML 「%CNAME("主人")%の气味带污迹的付けちゃう？大歓迎だぜ♪」
		ENDIF
	ELSE
		IF RAND:2
			PRINTFORML 「殺風景なのは勘弁してよね」
			PRINTFORML 「あんまり大事な物置くと臭いが付いちゃうんだよ」
		ELSE
			PRINTFORML 「にひっ――そう固くなるなヨ。乙女的房間だぜ、リラックスリラックス♪」
		ENDIF
	ENDIF
;partnerが既に居る部屋に、你が移動した
CASE "自室に訪問された"
	;指导者を伴っている場合
	IF FIND_COND("現在存在", "助手")
		PRINTFORML 「%CNAME("一人称")%的房間は連れ込み宿の類じゃ無いんだけどナ」
	ELSE
		IF CEVENT("恋慕：ささくれ")
			PRINTFORML 「突然来られても困っちゃうな」
			PRINTFORML 「茶漬けでも出せばいいかい？」
		ELSEIF CHECK_SHIRT("半開衬衫")
			PRINTFORML 「っと、なんだい%CNAME("主人")%」
			PRINTFORML 「こんなカッコで悪いね。ちょいと筋トレをね」
		ELSE
			PRINTFORML 「お？ なんだなんだ、急に。%CNAME("主人")%からご褒美かナ」
		ENDIF
	ENDIF
CASE "指导者部屋訪問"
	PRINTFORML 「人的房間ってなんだか緊張するよネェ」
	PRINTFORML 「そうは見えない？ バレたか」
;自宅移動の後に你に連れられて居間に回来了場合など。優先度は低いです
CASE "帰還"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORML 「丁度戻ろうと思ってたんだ。じゃ、これで」
	ELSE
		PRINTFORML 「たっだいまー。イヤイヤ、何も無かったンですよネーコレが」
	ENDIF
CASE "オナバレ"
	PRINTFORML 「隣の便器を覗いて興奮するクチ？ ほっほー！ 良いご趣味ですね！お見合いでウケるか使ってみようぜ！」
CASE "露脐装超短裙胖次チラ"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORML 「%CNAME("二人称")%にとってはそう珍しいものじゃないだろ」
		PRINTFORML 「特に、%CNAME("一人称")%のなんて見たってなんの得も無いんだから」
	ELSE
		PRINTFORML 「眼福ってモンだろう？」
		PRINTFORML 「いやしかし、恥ずかし気位は出したほうが良かったかナ？」
	ENDIF
CASE "低腰臀圍"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORML 「そんなに見るなよ――困っちゃうから」
	ELSE
		PRINTFORML 「いや～ん♪ ちょっとわざとらしい？ じゃかあしい！」
	ENDIF
CASE "掀起裙子"
	IF TALENT:恋慕
		IF CEVENT("恋慕：ささくれ")
			PRINTFORML 「満足したかい？ もうやめてくれよ」
		ELSE
			IF RAND:2 == 0
				PRINTFORML 「んっふっふ♪ 目当てのモノは見れたかナ？」
			ELSE
				PRINTFORML 「ほっほー！ 求愛かい？受けて立つヨ、わんわん！」
			ENDIF
		ENDIF
	ELSE
		IF RAND:2
			PRINTFORML 「悪戯好きだなーまったく」
		ELSE
			PRINTFORML 「嫌がる子にやるんだったらちょーっと叱らなきゃ」
		ENDIF
	ENDIF
CASE "撫摸股間"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORML 「もしかして感想求めてるの？」
	ELSE
		PRINTFORML 「にひひっ――で、これで終わりかナー？」
	ENDIF
CASE "检查内褲"
	IF COND("合意：检查内褲")
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORML 「良い趣味だよね、大した支配欲だ。拍手でもして讃えてあげようか」
			ELSE
				PRINTFORML 「是おーわり。ここから先は有料プランとなっておりまーす♪」
				PRINTFORML 「興奮した？ まだ見たい？ にひひっ♪ 躾一回からのプラン、どうでしょうかネ♪」
			ENDIF
		ELSE
			PRINTFORML 「お安いご用でございましたナー」
			PRINTFORML 「いやいや、でも解るよ。可愛い内衣とかだとちょっと嬉しいよネ♪」
		ENDIF
	ENDIF
CASE "检查阴部"
	IF COND("合意：检查阴部")
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORML 「そんなに見たかったの？%CNAME("二人称")%を嫌ってる女の汚いトコロがさ」
			ELSE
				PRINTFORML 「サービスし過ぎちゃったナー、フェアじゃないナー」
				CALL PRINT_STRL, @"「%CNAME("主人")%のも～ネ_BH_ 見たいナ～なんてサ_BH_」"
			ENDIF
		ELSE
			PRINTFORML 「品定めは終わった？」
			PRINTFORML 「おすすめは付け根の辺りだけど――あ、そういう話じゃないですネ」
		ENDIF
	ENDIF
CASE "拜托処理性欲"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORML 「礼は要らないよ。特に%CNAME("二人称")%からなんて、要らない」
	ELSE
		PRINTFORML 「スッキリしたかナ。それは結構♪」
		CALL PRINT_STRL, "「バター犬にしたってよく出来たペットだろ？わんわん_BH_」"
	ENDIF
CASE "进行性処理"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORML 「――――あぁ、うん。終わったならそれで良いじゃないか」
	ELSE
		PRINTFORML 「もう終わりで良いのかい？ う～ん何だかフェアじゃない気がするな～ムズムズする」
	ENDIF
CASE "帮忙消除性欲"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORML 「解消しただけだもの、何を思おうものか」
	ELSE
		CALL PRINT_STRL, "「にひひっ♪ 責任取って貰っちゃった_BH_」"
		PRINTFORML 「性欲の話だけどネー」
	ENDIF
CASE "清洁口交"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORML 「気分良さそうだね」
	ELSE
		PRINTFORML 「シモのお世話までされて、さ～て、どちらが%CNAME("主人")%なのやらネ♪」
	ENDIF
CASE "買東西"
	;買ってきた道具などで分岐
	;IF COND("巨大振動棒購入")

	;	CALL SET_DEVENT, "巨大振動棒感想"
	;ELSE
		;単純にいっぱい買ったかどうかで分岐
		SELECTCASE COND("買上品数")
		CASE IS >= 4
			IF CEVENT("恋慕：ささくれ")
				PRINTFORML 「ふぅん、いっぱい買ってきたんだね」
			ELSE
				PRINTFORML 「おや、大荷物。それで、ナニをそんなに買ったのかナ～？」
			ENDIF
		CASEELSE
			IF CEVENT("恋慕：ささくれ")
				PRINTFORML 「それ、%CNAME("一人称")%には使わないでおくれよ」
			ELSE
				PRINTFORML 「%TEXTR("避孕套の買い忘れは無い？/さーどんなエロ本買ってきたのか改めようじゃないか。")% エロ屋行ったんだろう、エロ屋」
			ENDIF
		ENDSELECT
	;ENDIF
CASE "隐秘摄影失敗"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORML 「撮らせてくれっていう勇気も無いのかな？」
	ELSEIF RAND:4 == 0 && MARK:屈服刻印 >= 2
		PRINTFORML 「目線なんか隠してみたりして」
		PRINTFORML 「ど～よ、好みの絵じゃないかい？――――は！？失敗したとか嘘だろ你！！」
	ELSEIF RAND:3 == 0
		PRINTFORML 「おーイタはだーめよ？」
	ELSEIF RAND:2
		PRINTFORML 「%TEXTR("１０年早いぜ/おととい来やがれ")%！」
	ELSE
		PRINTFORML 「バレたからアウトだぜ。観念することサ」
	ENDIF
CASE "变成裸体"
	;他に人がいる
	IF CHARA_NUM("室内の邪魔者")
		IF CEVENT("恋慕：ささくれ")
			PRINTFORML 「征服欲は満たされたかい？」
		ELSE
			PRINTFORML 「隠す所なんてひとっつも無いんだな～」
			SIF RAND:3 == 0
				PRINTFORML 「え？血の跡？マジ？ 隠せ隠せ%CNAME("主人")%！バレたら%CNAME("主人")%の責任だぞ！！」
		ENDIF
	;まさかの野外
	ELSEIF PLACE("野外")
		IF CEVENT("恋慕：ささくれ")
			PRINTFORML 「いかにもなペットらしい扱いだよ、感動する」
		ELSE
			PRINTFORML 「ni↘ひっひ♪ 良いネ良いネ♪ そうそう、こういうのが"らしい"じゃないか♪」
		ENDIF
	;不在個室
	ELSEIF PLACE("個室") == 0
		IF CEVENT("恋慕：ささくれ")
			PRINTFORML 「害羞がまったく無いわけじゃないよ」
			PRINTFORML 「だからこそ不快にも感じてるのを覚えておいて欲しいな」
		ELSE
			PRINTFORML 「いやいや、%CNAME("主人")%に言われちゃあ仕方がない！」
			PRINTFORML 「この角度とか滅茶苦茶美しくない？ 写メ撮っとけ写メ！」
		ENDIF
	;個室で二人きり
	ELSE
		IF CEVENT("恋慕：ささくれ")
			PRINTFORML 「恥ずかしいところは確かに無いけど――そう見られるのは少し不快だ」
		ELSE
			IF RAND:2
				PRINTFORML 「身体検査かにゃ～？ にひひっ♪」
			ELSE
				PRINTFORML 「目を灼かれないように気を付けろよ～！うっふ～ん♪」
			ENDIF
		ENDIF
	ENDIF
CASE "Ｈ目的で呼び出された"
	IF PLACE("情人旅館")
		IF CEVENT("恋慕：ささくれ")
			PRINTFORML 「わんわんわん、ってね。ははは」
		ELSEIF RAND:3 == 0
			PRINTFORML 「まさかこんな所までお呼び出しとは――――」
			PRINTFORML 「いやいや、まさか文句だなんて。わんわん、ってネ」
		ELSEIF RAND:2 == 0
			PRINTFORML 「雰囲気変えたかったって寸法かな？」
			PRINTFORML 「良いネ良いネ、外食は胸が躍るものサ♪」
		ELSE
			PRINTFORML 「ここまで何回ナンパされたと思う？ なーんと驚愕のゼロだ」
			PRINTFORML 「っはーっちぇ、つまみ食いしてやろうと思ったのにサー」
			PRINTFORML 「これでもス領帯ルは良いと思うし食べ頃だと思うんだけどナ。飼い主としてはどうだいそこんトコ」
		ENDIF
	;做爱房
	ELSE
		IF CEVENT("恋慕：ささくれ")
			PRINTFORML 「お誂え向きな場所だよね、ここ」
			PRINTFORML 「何が起こっても都合が良さそうだ」
		ELSE
			PRINTFORML 「邪魔が入らなさそうな、機能的な、あー、そう――――良いトコだネ」
			PRINTFORML 「今度個人的に使っても良いかな？ 掃除も酱とするからサ♪」
		ENDIF
	ENDIF
ENDSELECT

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

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

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

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

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

		ENDSELECT
	ENDIF
ENDIF

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

;イベント台詞。CFLAG:日常事件回数が10増えるたびに一つ叫醒ぐらいで良いでしょう
IF CEVENT("恋慕:ささくれ") == 0
	IF CFLAG:日常事件回数 >= 5 && DEVENT("質問") == 0
		PRINTFORML 「結局のところ部活ってのはどういう集まりなんだい？」
		PRINTFORML 「――――にひっ♪ 答えに詰圆圈のなら、大分お人好しだな%CNAME("二人称")%は」
		CALL SET_DEVENT, "質問"
	ELSEIF CFLAG:日常事件回数 >= 15 && DEVENT("質問１") == 0
		PRINTFORML 「%CNAME("一人称")%の視線が怖い？ そりゃあ%CNAME("二人称")%の考え過ぎさ」
		CALL PRINT_STRL, "「お世話してくれる間は忠犬で居て给よ。 わんわん_BH_」"
		CALL SET_DEVENT, "質問１"
	ELSEIF CFLAG:日常事件回数 >= 30 && DEVENT("質問２") == 0 && MARK:屈服刻印 >= 1
		PRINTFORML 「兒童も射程内だよ。それはもちろんさ」
		PRINTFORML 「ラム肉とかバロットとか、人がそれを食べるそれとどう違うの？」
		CALL SET_DEVENT, "質問２"
	ELSEIF CFLAG:日常事件回数 >= 45 && DEVENT("質問３") == 0 && MARK:屈服刻印 >= 2
		PRINTFORML 「恋？ 恋かー、恋、ねー」
		PRINTFORML 「確かあれは――――彼は、サッカー部の男子だったかな」
		CALL PRINT_STRL, "「――――――美味しかったなぁ_BH_」"
		CALL SET_DEVENT, "質問３"
	ELSEIF CFLAG:日常事件回数 >= 60 && DEVENT("質問４") == 0 && MARK:屈服刻印 >= 3
		PRINTFORML 「ファミリー西式料理店とか実は苦手なんだよネ」
		PRINTFORML 「何時でも喰えると思ってお残しするボンクラ共見てるとさ――無性に、馬鹿みたいに苛つ君だよね」
		CALL SET_DEVENT, "質問４"
	ELSEIF DEVENT("わんこ") == 0 && MARK:屈服刻印 >= 3
		PRINTFORML 「なんだか我ながら牙折られちゃってる感じするよねー」
		PRINTFORML 「はー、もう、どうにでもしてーって感じでサ。これからは番犬系前輩で行こうかしら」
		PRINTFORML 「ばうばう！ どう、強そう？ ばうばう、あおーん♪ おっと媚びちまった」
		CALL SET_DEVENT,"わんこ"
	ELSEIF DEVENT("黒歴史") == 0 && CEVENT("恋慕：地固圆圈") && TALENT:恋慕
		PRINTFORML 「やめろよ、ツンツンしていた時のことを言うんじゃないよ！」
		PRINTFORML 「心機一転忠犬なんだよォ！！許せよォ！！」
		PRINTFORML 「あ゛ぁ゛ぁ゛あ゛あ゛！！思い出してきた！クッソ恥ずかしい！！」
		PRINTFORML 「あ゛ぁ゛ぁ゛あ゛あ゛あ゛あ゛！！あおぉおおおん！！」
		CALL SET_DEVENT, "黒歴史"
	ELSEIF (DEVENT("好き") == 0 && DEVENT("黒歴史") ) || (DEVENT("好き") && RAND:5 == 0)
		PRINTFORML 「うーん――――ちっちっちっ」
		PRINTFORML 「"好き"ってナニすれば良いんだろ、難問だナー」
		CALL SET_DEVENT, "好き"
	ENDIF
ENDIF

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

;他の人といちゃついた後にpartner変更
IF COND("いちゃいちゃ") == 0 && FIND_COND("Ｈ的いちゃつき中")
	IF TALENT:恋慕
		IF CEVENT("恋慕：ささくれ")
			PRINTFORML 「構わないでくれよ」
		ELSEIF RAND:2
			PRINTFORML 「――むすってしてるように見える？」
			PRINTFORML 「"こっちも構ってください"、なんてこんな場で真正面から言えないだろう」
			PRINTFORML 「前輩だぜー、これでもサ」
		ELSE
			PRINTFORML 「う～わん！ わんわん！ わおわおわん！わわわわーん！」
			PRINTFORML 「――――いやーネ。他の目があるとこ構ってとか言うとみっともないからサ」
			PRINTFORML 「犬語ならセーフかなーって」
		ENDIF
	ELSE
		PRINTFORML 「どうぞどうぞお気になさらず。空気だと思ってくれよ」
		PRINTFORML 「え、何？ そう言われると気不味い？ わお、そう思う心があったとはネ！」
	ENDIF
ENDIF

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

;以下は随机台詞など

;時間帯と場所と関係で変化有些
IF CEVENT("恋慕：ささくれ")
	IF RAND:2 == 0
		PRINTFORML ふと視線を向けると、%CALLNAME:TARGET%はぷいっとわざとらしくそっぽを向いた…
	ELSE
		PRINTFORML %CALLNAME:TARGET%は%CALLNAME:MASTER%を視界に入れないようにしているようだ…
	ENDIF
;二人きりでの何かする前のセリフ
ELSEIF FLAG:二人きり && CFLAG:调戏数 == 0 && CFLAG:刚睡醒 == 0
	CALL PRINT_STRL, "「ni↘ひ――_BH_ そう緊張されると悲しいねー」"
	CALL PRINT_STRL, "「別に今すぐとって喰ったりゃしませんヨ――_BH_」"

ELSEIF FLAG:二人きり && RAND:3 == 0
	PRINTFORML %CALLNAME:TARGET%は%CALLNAME:MASTER%の隣にジリジリと距離を詰めて来ている…
	IF TALENT:恋慕
		IF CFLAG:食欲 >= 100
			PRINTFORML 顔色の悪い%CALLNAME:TARGET%のお腹からぐぅ～と気の抜けた音が鳴る。
			PRINTFORML 彼女はたははと笑うとやや有点害臊的ぺろりと舌を出してウィンクした…
		ELSE
			PRINTFORML 「――――ni↘ひっひ♪ なーに恥ずかしがってるやら」
			PRINTFORML 「え、食われそうか心配？ う～ん、妥当！！」
		ENDIF
	ELSE
		IF CFLAG:食欲 >= 100
			PRINTFORML 「おな～か減った～な～♪おなか減ったよぉ～う♪」
			PRINTFORML 「め～ちゃく～ちゃお～腹～が空～いて～るよ～♪」
			PRINTFORML %CALLNAME:TARGET%は調子っ外れな歌をこちらに聞かせてくる…
		ELSE
			PRINTFORML 「取って喰いやしませんよ～♪ %TEXTR("お触りチャンスだぜ？/ほーらたわわに実った胸部だ～")% ｺﾜｸﾅｲﾖー」
			PRINTFORML 「あ、ごめんネ、嘘だわ。隙を見せたらパックンチョする気満々ヨ♪」
			PRINTFORML 「ほーらもっと気を張って！ せーっの、ふん！ よしよし♪」
		ENDIF
	ENDIF
ELSEIF STATE("酔酒")
	PRINTFORML 「う～ん、酔えなくても困倦は来るネ」
	PRINTFORML 「結構結構、やっぱり慎ましいじゃないか%CNAME("一人称")%は」
ELSEIF COND("夜")
	IF CFLAG:食欲 >= 100
		IF TALENT:恋慕
			IF RAND:3 == 0
				PRINTFORML 「はぁ――はぁ――はぁ――」
				PRINTFORML %CALLNAME:TARGET%は目をギラつかせて息を荒くしている…
			ELSEIF RAND:2
				PRINTFORML 「んっ――――くっんっ――――ぷはぁっあぁっ」
				PRINTFORML 水を思い切り飲んだ彼女はそれでも鳴り続ける腹を何度も叩いて黙らせた…
			ELSE
				PRINTFORML %CALLNAME:TARGET%は口を開けたままボーッと上を看了过来…
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORML こちらを見る%CALLNAME:TARGET%の目がギラついている…
			ELSEIF RAND:2
				PRINTFORML %CALLNAME:TARGET%はぶつぶつと何事か呟いている…
				PRINTFORML 「%TEXTR("食べたい、我慢、食べたい、我慢/我慢、我慢/空腹は～す～ぱい～すっ/すて～い、すて～い")%――♪」
				PRINTFORML 口を開く度に溜まった涎がにちゃにちゃと音を立てていた…
			ELSE
				PRINTFORML %CALLNAME:TARGET%は何をするでも無く、じっと%CALLNAME:MASTER%の一挙一動に目を光らせている…
			ENDIF
		ENDIF
	ELSEIF RAND:3 == 0
		PRINTFORML %CALLNAME:TARGET%は新聞を黙読しているようだ…
		CFLAG:夜行動 = 1
	ELSEIF RAND:2
		CALL PRINT_STRL, @"「お？ ――%TEXTR("ni↘ひ/わんわんッ/にひひっ")%_BH_」"
		PRINTFORML 視線に気付いたのか、%CALLNAME:TARGET%は白色歯を見せた…
	ELSE
		PRINTFORML 「小腹空いたナァー」
		PRINTFORML %CALLNAME:TARGET%はちらちらと%CALLNAME:MASTER%に視線を投げかけている…
	ENDIF
ELSEIF PLACE("部室")
	IF CFLAG:食欲 >= 100
		IF TALENT:恋慕
			IF RAND:3 == 0
				PRINTFORML %CALLNAME:TARGET%は椅子に腰掛け、身体を丸めて目を瞑ったまま動かない…
			ELSEIF RAND:2
				PRINTFORML %CALLNAME:TARGET%は時折、%CALLNAME:MASTER%が動く物音に反応して薄く瞼を開くがそれ以外に動く素振りも見せない…
			ELSE
				PRINTFORML 「は、はは」
				PRINTFORML 力無く笑う彼女は急に自分のお腹を殴ったかと思えばまた目を瞑って動かなくなってしまった…
			ENDIF
		ELSE
			IF RAND:3 == 0 && FLAG:二人きり
				PRINTFORML 「ああチクショウ、お肉がいっぱいあるのにナー」
			ELSEIF RAND:2
				PRINTFORML 「にひ、にひひっ――――はぁ」
				PRINTFORML %CALLNAME:TARGET%はニコニコしたかと思えば深く叹气を吐いた…
			ELSE
				PRINTFORML ぐぅぐぅと重たい音が鳴る。
				PRINTFORML 「気にしないでくれヨ、ダイエット中なのサ」
				PRINTFORML 吐き捨てるように誰にでもなくそう言った%CALLNAME:TARGET%は飘忽と%CALLNAME:MASTER%を見た…
			ENDIF
		ENDIF
	ELSEIF RAND:4 == 0 && FLAG:二人きり == 0
		CALL PRINT_STRL, @"「%TEXTR("ni↘ひ/あー、駄目駄目、約束は守らなきゃ/美味しそう")%――_BH_」"
		PRINTFORML %CALLNAME:TARGET%は他の部員を睥睨しつつ、口元に手を当ててボソボソと何か呟いている…
		CFLAG:部室行動 = 0
	ELSEIF RAND:3 == 0
		PRINTFORML 「むむっ、%TEXTR("こっの/あっ")%、%TEXTR("あっちゃ/わ、わっ")%、%TEXTR("っしゃいオラ勝ったどーっつってネ！/うっわそれ反則じゃないかナ！")%」
		PRINTFORML どうやらスマホの游戏に夢中らしい…
		CFLAG:部室行動 = 5
		RETURN 0
	ELSEIF RAND:2
		PRINTFORML 「～♪」
		PRINTFORM %CALLNAME:TARGET%鼻歌交じりに
		IF RAND:4 == 0
			PRINTFORM イヤホンで音楽を聴いて
			CFLAG:部室行動 = 1
		ELSEIF RAND:3 == 0
			PRINTFORM 授業の復習をして
			CFLAG:部室行動 = 2
		ELSEIF RAND:2
			PRINTFORM 料理本を読んで
			CFLAG:部室行動 = 3
		ELSE
			PRINTFORM 文庫本を読んで
			CFLAG:部室行動 = 4
		ENDIF
		PRINTFORML いる…
	ELSE
		PRINTFORML 「ん？ 何か用事かい、部長桑」
		PRINTFORML 視線に気付いた%CALLNAME:TARGET%はこちらにひらひらと手を振っている…
	ENDIF

ELSE
ENDIF

;-------------------------------------------------
;梦话。随意むにゃむにゃ言わせてください
;-------------------------------------------------
@KOJO_SLEEP_K60
;上から順に発言頻度が高いようにする(== 0の付け忘れではない)
IF TALENT:恋慕
	IF RAND:3
		PRINTFORML 「くぅ―――――すぴー」
	ELSEIF RAND:2
		PRINTFORML 「んむむ――――こら待て肉」
	ELSE
		PRINTFORML 「%TEXTR(@"乗るな――%CNAME("主人")%――罠だ――/あ、%CNAME("主人")%―――")%」
		PRINTFORML 「%TEXTR(@"――――いただきます/――ひひひっ/――――%CNAME("主人")%のフルコース")%」
	ENDIF

ELSE
	IF MARK:屈服刻印 >= 2 && RAND:2 == 0
		PRINTFORML 「――――ん――ずずっ―――んぁ」
		PRINTFORML %CALLNAME:TARGET%は時折体を揺すって寝苦しそうにしている…
	ELSE
		PRINTFORML %CALLNAME:TARGET%はほとんど寝息を立てていない…
	ENDIF
ENDIF

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

SELECTCASE ARGS
;通話などでの呼出なので括弧は「」ではなく『』推奨。TFLAG:地の文スキップ = 1とすると地の文をスキップ出来ます
CASE "Ｈ目的で呼び出された"
	;台詞を書いたらRETURN 0 を消してください
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 『はぁ――――わかった、行くよ』
	ELSEIF PLACE("情人旅館")
		IF RAND:3 == 0
			PRINTFORMW 『にひひっ――学生がそんなトコロ使って良いのかナー？』
			PRINTFORMW 『なんてネ。何処へでも行きますとも、わおーん♪』
		ELSEIF RAND:2
			PRINTFORMW 『ガッツリとヤる気満々ってコトね。結構結構』
			PRINTFORMW 『尾巴振って行くから良い子にしてておくれよ♪』
		ELSE
			PRINTFORMW 『こういうブッ飛んだ呼び出し、嫌いじゃないぜ？』
			PRINTFORMW 『え、じゃあ好きかって？ ――――準備して向かうから待ってろよ！！』
		ENDIF
	;做爱房
	ELSE
		IF RAND:3 == 0
			PRINTFORMW 『ぷっ――く、ふふっ、何度聞いてもそのまんまな名前で笑っちゃうんだよね』
			PRINTFORMW 『いやー、でも、あそこかー――――まぁ、いっかー』
		ELSEIF RAND:2
			PRINTFORMW 『いやいやー、あの場所は気が気じゃないんだよナー』
			PRINTFORMW 『実は近くに保存してる――――いやーこっちの話だけどサー』
		ELSE
			PRINTFORMW 『えぇ――っと、別の場所にしないかい？』
			PRINTFORMW 『対案？ はー、そのぉ、無い、なぁ！』
			PRINTFORMW 『っちぇー、わっかーりまーしたー行きますよー』
		ENDIF
	ENDIF
CASE "学園での日常"

CASE "お仕事"

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

	;地の文の前の台詞がある場合はここに書く
	SELECTCASE SAVESTR:現在位置
	CASE "阵雨"
		PRINTFORMW
	ENDSELECT

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

	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「%TEXTR("そっか/ふぅん/へぇ")%」
		PRINTFORMW 適当な話題を振ってみてもわざとらしい適当な返事が返ってくるばかりだ…
		RETURN 0
	ENDIF
	SELECTCASE SAVESTR:归途の行動
	CASE "相合傘"
		IF TALENT:恋慕
			PRINTFORMW 「にひひっ♪ 腕とか絡めちゃう？ 馬鹿っぽくて、青春っぽくて、良いだろ」
			PRINTFORMW 「ほら、遠慮するなよ♪ 今なら肘でどんなに胸部突いても事故だぜ事故！」
			PRINTFORMW 「ひゃっほぅおっとくー！ こりゃあ腕組むしかないね！ ってなわけで、是どーぞ！」
		ELSE
			PRINTFORMW 「そうビクビクするなよー傷つくなぁ」
			PRINTFORMW 「こんな道のど真ん中で頂くなんてしないしない、見られても困るだろう」
			PRINTFORMW 「――――ところで、そこの高架下とかつまみ食っ――雨宿りに丁度良いと思わない？」
		ENDIF
	CASE "内衣選び"
		IF RAND:3 == 0
			PRINTFORMW 「えぇ、それは派手過ぎるなー。汚れが目立たないようにもうちょっと地味目が良い」
			PRINTFORMW 「うーん、赤でも目立つんだよ。何がって、ほら、時間が経つと黒くなるだろ？」
			PRINTFORMW 「え、黄ばむ？ いやいやいや、黄ばまないだろう普通」
		ELSEIF RAND:2
			PRINTFORMW 「色気があるのも悪いものだとは思わないけれどねー」
			PRINTFORMW 「汚しちゃうからサ、もったいないじゃない」
		ELSE
			PRINTFORMW 「お、これなんか動きやすそう。ふぅむ――――3枚980円――買った！」
		ENDIF
	CASE "泳装選び"
		IF RAND:3 == 0
			PRINTFORMW 「%CNAME("二人称")%が選ぶならどんな泳装？」
			PRINTFORMW 「ほー、これはまた――――是次！」
		ELSEIF RAND:2
			PRINTFORMW 「うーん、これは地味じゃないか？」
			PRINTFORMW 「見せる用だからネ、内衣と違って色合い派手な位が良いのサ～」
			PRINTFORMW 「ははは、色合いだぞ、色合い。すぐ大人際どいヤツに視線を移すのをやめなさい」
		ELSE
			PRINTFORMW 「うっわ見ろよこれ、エッグいなー从后面将見えちゃうんじゃないかな」
			PRINTFORMW 「泳装っていうかもう熱々のお肉を乗せる鉄板だ」
		ENDIF
	;特定行動でのセリフ。DAILY_MESSAGE, "归途"の地の文を参考に随意場合分けしてください。
	CASE "打情骂俏"
		IF TALENT:恋慕
			IF RAND:3 == 0
				PRINTFORMW 「お手々繋いで帰ってみるかい？ お手をどうぞ♪」
				PRINTFORMW 「――――思ったよりも良いね、これ。このまま、帰ろうか――にひひ♪」
			ELSEIF RAND:2
				PRINTFORMW 「情侣とかがイチャつくのも解ろうってもんだ」
				PRINTFORMW 「視線がいっそ気持ち良い！ ほら、もっとくっつけくっつけ♪」
			ELSE
				CALL PRINT_STRW, "「ちゅっ――_BH_」"
				PRINTFORMW 「照れるなよ。身体接觸みたいなもんだろう？」
				PRINTFORMW 「視線とか気にする領帯プでもあるまいにサ、カマトトぶるのはイケないナ♪」
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「うーん、ちょっと馬鹿っぽい？ ま、いっか♪」
			ELSEIF RAND:2
				PRINTFORMW 「うりうりーペットがジャレて来てるぞ～♪」
				PRINTFORMW 「ふぅ、ちょっと普通に歩こう。疲惫」
			ELSE
				PRINTFORMW 「少しは恋する女の子だとかの気持ち解るかと思ったけどサ」
				PRINTFORMW 「まだ解んないもんだ。う～ん難解」
			ENDIF
		ENDIF

	CASE "站着读书"
		IF RAND:3 == 0
			PRINTFORMW 「感心しないなー。酱と面白かったら買うんだよ？」
			PRINTFORMW 「ん？今さっき%CNAME("一人称")%が読んでたヤツ？ああ、つまんなかったんだよ」
		ELSEIF RAND:2
			PRINTFORMW 「――お、どうしたんだい？ ああ、もうそんな時間」
			PRINTFORMW 「お会計済ませてくるから、ちょっと待っていてくれるかな？」
			PRINTFORMW 「いや、別に面白くは無かったんだけど、ここまで読んじゃったらフェアじゃないだろ」
		ELSE
			PRINTFORMW 「おーい、夢中になってるところ悪いんだけれど、そろそろ返回よ」
			PRINTFORMW 「収穫はあったかい？ こっちはボウズ、ざーんねん」
		ENDIF
	CASE "買食物"
		IF TALENT:恋慕
			IF RAND:3 == 0
				PRINTFORMW 「――――一口、貰っても良いかな？」
				PRINTFORMW 「いいや、%CNAME("二人称")%じゃなくて%CNAME("二人称")%が食べてるヤツ」
				PRINTFORMW 「にひひっ、有がと――――ん、くっ―――ぐ、ぅ―――――」
				PRINTFORMW 「み、水――んっ、んっ―――――っぷはぁ！！ ふぅ、ふぅ――ご馳走様。満足したよ、有がとう」
			ELSEIF RAND:2
				PRINTFORMW 「べっつにー、食べられないから悔しくなんて――――ちょっと悔しい！！」
			ELSE
				PRINTFORMW 「あーん、とかしてみる？ 買食物であーんとかってするのかな？」
				PRINTFORMW 「まぁいいや、是、あーん♪」
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「はー、%CNAME("一人称")%に買食物の提案とは良い胆量してるネ」
			ELSEIF RAND:2
				PRINTFORMW 「奢り？気持ちだけ受け取っとくよー、食べられないし」
			ELSE
				PRINTFORMW 「美味しそうに食べるもんだ――――ほんと、美味しそう」
			ENDIF
		ENDIF
	CASE "物色游戏"
		IF RAND:3 == 0
			PRINTFORMW 「こういうの面白そうじゃない？」
		ELSEIF RAND:2
			PRINTFORMW 「上から落ちてくるブロック消す例のアレとか無いかナー」
		ELSE
			PRINTFORMW 「最近の游戏は本当に色々あるんだねー」
		ENDIF
	CASE "检查新刊"
		IF RAND:3 == 0
			PRINTFORMW 「っちぇー、待ってた本延期になってら」
			PRINTFORMW 「うーん、何だか来て損したって思うのもイヤだし別の覗いてみるよ」
		ELSEIF RAND:2
			PRINTFORMW 「あー、たっはっは、荷物いっぱいになっちゃった」
			PRINTFORMW 「だってサ、告知見逃してた新刊が一杯あったんだ。そりゃあ買うよネ、仕方ない仕方なーい」
		ELSE
			PRINTFORMW 「お、良さげな料理本めーっけ」
			PRINTFORMW 「自分の舌じゃよくわからないからネ、レシピは多い方が良いのサ」
		ENDIF
	CASE "繞道"
		IF RAND:3 == 0
			PRINTFORMW 「ン――――そっちの道はヤめとこう、%CNAME("主人")%」
			PRINTFORMW 「そんな陰気臭い道よりもこっちにしようよ」
			PRINTFORMW 「なんででもいーからさー、ペットのワガ妈妈くらい許してよ、ね？」
		ELSEIF RAND:2
			PRINTFORMW 「イヤイヤ、%CNAME("一人称")%と繞道なんて、勇気があるなー%CNAME("二人称")%」
			PRINTFORMW 「ｸｽｸｽ――まさか忘れてた？ %CNAME("一人称")%が人类を食べるってコト♪」
			PRINTFORMW 「それじゃーいっただっきまー」
			PRINTFORMW 「なんて、ね」
			PRINTFORMW 「こういうこともあるかも知れないから気をつけてネ？」
		ELSE
			PRINTFORMW 「お――？ あ、いやいや、なんでもなーい」
			PRINTFORMW 「放っといて良い領帯プのヤツだよ、うん。振り向いちゃ駄目」
			PRINTFORMW 「ちょっと速歩きしようか、お手をどうぞ」
		ENDIF
	CASE "直帰"
		IF RAND:3 == 0
			PRINTFORMW 「繞道しないんだ。ふぅん――偉い偉い♪」
			PRINTFORMW 「そうそう、夕焼け時は怖いがいっぱいだからネ、まっすぐ帰ろう」
		ELSEIF RAND:2
			PRINTFORMW 「ン――あ、繞道は没有？」
			PRINTFORMW 「そうかそうか、一安心だなー」
		ELSE
			PRINTFORMW 「ほーら早く帰らないとこわーい食人鬼が食べにきちゃうゾ～」
			PRINTFORMW 「まあ%CNAME("一人称")%のことなんだけどサ、一口いっとく？」
			PRINTFORMW 「还是算了、そう？ じゃあ帰ろうか」
		ENDIF
	CASE "圣诞节前夕"
		IF TALENT:恋慕
			PRINTFORMW 「――――あ、ごめん、今圣诞节のこと考えてた」
			PRINTFORMW 「お誘いしてくれるヤサシイ後輩は居ないモノかナーとか考えてた」
			PRINTFORMW 「考えてた」
		ELSE
			PRINTFORMW 「やれやれ、誰も彼も浮かれちゃって――ホント、隙だらけで困っちゃうネ」
		ENDIF
	CASEELSE
		IF TALENT:恋慕
			IF RAND:3 == 0
				PRINTFORMW 「なんだかあっという間の一日だったなー」
				PRINTFORMW 「そっか、そういうものかー――――にひひっ♪」
			ELSEIF RAND:2
				PRINTFORMW 「忘れ物は無いね？ じゃ、消灯しましてーっと」
				CALL PRINT_STRW, "「――――ちゅっ_BH_ にひひっ_BH_ 奇襲成功♪」"
				PRINTFORMW 「駄目だな～食べるつもりだったらぱっくりいかれちゃってたトコだぜ？」
			ELSE
				PRINTFORMW 「どこか寄ってくかい？ お供しようじゃない」
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「今日も猫被るの疲惫ナー」
				PRINTFORMW 「ほんとかよって顔だね、本当なんですのよおほほーってね―――はぁ」
			ELSEIF RAND:2
				PRINTFORMW 「今日の晩御飯どうしようか――――ね、どうしようかナー」
			ELSE
				PRINTFORMW 「戸締まりは酱としたかい？ じゃあ帰ろうか」
				PRINTFORMW 「一緒に返回のも役目で役得だろ、そろそろっと他の部員の後を尾けちゃうかも知れないぜ」
			ENDIF
		ENDIF
	ENDSELECT

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

;お浴室に一緒に入ろうと誘われた場合。TFLAG:床イン = 1とすることで強制的にエロにも行ける
;浴室でスタートする場合には、代わりにTFLAG:お浴室でＨ = 1として下さい
CASE "一緒にお浴室"
	PRINTFORMW

;[999]選択後の台詞。TFLAG:床イン = 1とすることで強制的にエロにも行ける
;浴室でスタートする場合には、代わりにTFLAG:お浴室でＨ = 1として下さい
CASE "休憩"
	;台詞を書いたらRETURN 0を消してください
	RETURN 0
	IF PLACE("自宅")
		IF COND("夜")
			;お浴室
			IF PLACE("居間")
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		ELSE
			PRINTFORMW
		ENDIF
	;ここは実質昼のみ
	ELSEIF PLACE("部室")
		PRINTFORMW
	;場所移動後
	ELSE
		PRINTFORMW
	ENDIF

CASE "清洁口交：お誘い"

CASE "清洁口交：射精後"

CASE "清洁口交：断った"

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

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

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

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

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

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

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

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

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

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

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

;この角色が点心当番で、その時間帯で部室に最初からいる時のセリフ
CASE "点心を用意した"
	;本日の点心はこの角色の亲手自制
	IF COND("亲手自制点心")

	ELSE

	ENDIF
;これは昼か夜
CASE "打招呼"
	IF COND("夜")
		GREETING = こんばんは
	ELSEIF COND("昼")
		GREETING = こんにちは
	ELSE
		GREETING = おはようございます
	ENDIF
	;你に先に打招呼をされた
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW %CALLNAME:TARGET%は%CALLNAME:MASTER%を認めると眉を顰めて黙礼した…
	ELSEIF CFLAG:打招呼した == 0
		PRINTFORMW 「おっと、失敬、先にしようと思ったんだけどね。御心情よう、%CNAME("主人")%」
	ELSE
		PRINTFORMW 「御心情よう、%CNAME("主人")%」
		PRINTFORMW 「なにボケっとしてるんだい、打招呼だよ、アイサツ」
	ENDIF
CASE "叫醒"
	IF TALENT:恋慕
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「――――っ、あぁ、くそ、最悪だ」
			PRINTFORMW 「なんでもないよ。こっちの話だから。ちょっと夢見が悪かっただけさ」
		ELSEIF RAND:2
			PRINTFORMW 「ん――――あ？ ああ、涎――――っと、お、おはよう」
			PRINTFORMW 「なんだい、その顔は。そんなことよりティッシュだティッシュ」
		ELSE
			PRINTFORMW 「――――わ、夢から出てきたのかい%CNAME("二人称")%」
			PRINTFORMW 「――――――あ、現実か。驚かすなよ」
		ENDIF
	ELSE
		IF MARK:屈服刻印 >= 2 && RAND:2
			PRINTFORMW 「っ――――あ、ああ、おはよう%CNAME("主人")%。有がとう、起こしてくれて」
			PRINTFORMW 「――――――ちっちっちっちっち、はぁ。気ィ抜きすぎだろうお馬鹿」
			PRINTFORMW 「ん、ふふ、何でも無いヨ」
		ELSE
			PRINTFORMW 「起きてるよ」
			PRINTFORMW 「おはよう、%CNAME("主人")%」
		ENDIF
	ENDIF
;酔った際に眠くなって自分的房間に返回際のセリフ
CASE "眠い"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「先に御闲するよ」
		PRINTFORMW 「――――%CNAME("二人称")%も、余り夜ふかしするなよ」
	ELSE
		PRINTFORMW 「ふぁ～、悪いけど先に休息するよ」
		PRINTFORMW 「%CNAME("二人称")%も夜ふかしは控えろよ」
	ENDIF
;全裸終了の際のセリフ
CASE "服を着た"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「脱げと言ったり着ろと言ったり、忙しないな」
	ELSE
		PRINTFORMW 「おー？ もう良いのかい？」
		PRINTFORMW 「いやいや、意外と快適なもんだヨ、全裸って」
	ENDIF
;暑かったり躁动难忍してたり酔っぱらってたりで内衣姿变成了際のセリフ
CASE "薄着变成了"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「視線がうるさいぜ、少し静かにしてくれ」
	ELSE
		PRINTFORMW 「んふっ――――%CNAME("一人称")%にでもそういう視線、するんだねェ」
		PRINTFORMW 「知ってたけど、流石なかなかの悪食っぷりじゃないか」
	ENDIF
;易出汗状態の際に裙の中に扇風機の風を当てた際のセリフ。[粗野]or[開朗]or[小悪魔]限定
CASE "股間に扇風機"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW %CALLNAME:TARGET%は%CALLNAME:MASTER%を一切気にしていない…
	ELSE
		PRINTFORMW 「むふー、いやーん♪ ――っつって」
		PRINTFORMW 「その鼻の下伸びてるんだかしらーっとしてんだかよく解んない絶妙な顔はサ、どういう感情かナ」
	ENDIF
CASE "Talk"
	SELECTCASE STR:日常イベント名
	;これはCSTR:点心 に亲手自制属性のものが設定されている時のみ
	CASE "夸奖点心"
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「美味しかったんだ――――そっか、そうか」
		ELSEIF RAND:2 && TALENT:恋慕
			PRINTFORMW 「ni↘ひっひ、美味しかったかい、それは良かった♪」
			PRINTFORMW 「残さず食べておくれよ。%CNAME("二人称")%の為にココロを込めたんだぜ？」
		ELSE
			PRINTFORMW 「お、擅長く出来てたかい？ 重畳重畳」
			PRINTFORMW 「味見はしても、馬鹿舌を患ってるもんでサ。食べられるモノになってるなら万々歳だ」
		ENDIF
	CASE "夸奖"
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「ああ、それくらいは坦率に受け取っておくよ」
			PRINTFORMW 「でもそれでもきっと、%CNAME("一人称")%は%CNAME("二人称")%が嫌いだ」
		ELSEIF RAND:2 && TALENT:恋慕
			PRINTFORMW 「――――っ、あ、あー」
			PRINTFORMW 「んん、ちょっと照れくさい――あんまり持ち上げないでよ」
		ELSE
			PRINTFORMW 「お、流石は飼い主桑。持ち上げるコトも忘れないねェ」
			PRINTFORMW 「にひっ、ま、気分良く持ち上げられておこうじゃないか♪」
		ENDIF
	CASE "甜言蜜语"
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「嘘ばっかり。響かないよ。響かない」
			PRINTFORMW 「本当だよ――本当だってば」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「藪から棒も良いところだねェ、%CNAME("二人称")%も」
			PRINTFORMW 「どうったって――悪い気はしないって顔、してるだろ、まったく」
		ELSEIF CALCF("甜言蜜语成功")
			PRINTFORMW 「へー、意外に口達者。そういう台詞も出てくるんだ」
			PRINTFORMW 「乗せられて踊ってあげても良いぜ。お捻りを弾んでくれればネ」
		ELSE
			PRINTFORMW 「ふーん、で、終わりかい飼い主桑ヨ」
			PRINTFORMW 「今度オススメの本の一つでも紹介するよ。真面目な話」
		ENDIF
	CASEELSE
		IF CEVENT("恋慕：ささくれ")
			IF RAND:3
				PRINTFORMW 「%TEXTR("話すことなんて無いよ/何も言うことがないな/何を言えっていうの？/何を言ってほしいの？/話したくない/ごめんなさい")%」
			ELSEIF RAND:2
				PRINTFORMW 「嫌なことばっかり言われて、辛い？じゃあ捨てちゃえばいい」
				PRINTFORMW 「そうなったら――多分、寂しいけれど。でも寂しいだけだ」
				PRINTFORMW 「きっと今ほど痛くはないよ」
			ELSE
				PRINTFORMW 「――――ヤること、ヤるんだろう。ヤれよ、話なんて無駄だ」
			ENDIF
		ELSEIF PLACE("情人旅館")
			IF TALENT:恋慕
				IF RAND:3 == 0
					PRINTFORMW 「浮足立ってるのが自分だけだと思うかい？」
					PRINTFORMW 「にひひっ♪ こっちの心情もちょっとは考えて欲しいもんだネ」
					CALL PRINT_STRW, @"「雰囲気に当てられてるのは%CNAME("二人称")%だけじゃないってことサ――_HH_」"
				ELSEIF RAND:2
					PRINTFORMW 「んふ♪ ソワソワしてきたね？」
					CALL PRINT_STRW, "「誘ってくれたらいつだってわんわん_BH_と応えるよ」"
					CALL PRINT_STRW, "「それまではこうしてゆっくりしていたいのサ。だから、その気なら早く誘って頂戴ナ_HH_」"
				ELSE
					PRINTFORMW 「良いね、解ってるじゃないか」
					PRINTFORMW 「こんなに良い雰囲気なんだから、ゆっくり語り合うのも粋なものだってサ♪」
				ENDIF
			ELSE
				IF MARK:屈服刻印 >= 2
					IF RAND:3 == 0
						PRINTFORMW 「ここの淋浴ルームも中々の広さだねー」
						PRINTFORMW 「こりゃあ色々と捗りそうじゃないか♪」
					ELSEIF RAND:2
						PRINTFORMW 「躾の前に一杯飲んでみるかい？」
						PRINTFORMW 「%CNAME("一人称")%の冰雹もない姿が見れるかも知れないゾ？」
						PRINTFORMW 「――――冗談だよ。これでも優等生だぜ、%CNAME("一人称")%は」
					ELSE
						PRINTFORMW 「おや、躾の前にTalk領帯ムかい？」
						PRINTFORMW 「良いとも良いとも♪ %CNAME("二人称")%と話すのは好きだぜ」
					ENDIF
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「%TEXTR(@"またせ過ぎは良くないな。口火は%CNAME("二人称")%が切ってくれなきゃ/こっちはお腹が減ってしょうがないんだ。西式料理店に来て料理が出てこないなんて、詐欺も良いところだろう？")%」
					ELSEIF RAND:2
						PRINTFORMW 「冷蔵庫の中見たかい？」
						PRINTFORMW 「有料でコイン入れないと取り出せないけど啤酒が置いてあったよ」
						PRINTFORMW 「至れり尽くせりだね。大体はこ的房間の中で済んじゃう」
					ELSE
						PRINTFORMW 「中々良いトコだよね、ココ。雰囲気たっぷりでサ」
						PRINTFORMW 「――――本当に、秘め事には持ってこいだ」
					ENDIF
				ENDIF
			ENDIF
		ELSEIF COND("夜")
			IF CFLAG:食欲 >= 100
				IF TALENT:恋慕
					IF RAND:3 == 0
						PRINTFORMW 「ああ、お腹の音がうるさいネ。ごめんね」
					ELSEIF RAND:2
						PRINTFORMW 「心配しなくてもだーれも食べませんよ」
						PRINTFORMW 「%CALLNAME:TARGET%酱はデキるペットなのさ」
					ELSE
						PRINTFORMW 「――ぼーっと、してたナ。話、聞いてなかったや」
						PRINTFORMW 「悪いけれどもう一度、言ってもらって良いかい？」
					ENDIF
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「ところで外出許可もらっても良いかナ？ 駄目？ そう」
					ELSEIF RAND:2
						PRINTFORMW 「約束ってのは破る方が悪い。そうだろ？」
						PRINTFORMW 「なんの話か？ ナンの話だろうネ」
					ELSE
						PRINTFORMW 「あ？ ああ、なんの話だったっけ」
						PRINTFORMW 「どうでもいいや、この話終わりだ」
					ENDIF
				ENDIF
			ELSEIF RAND:6 == 0 && DEVENT("今日の新聞") == 0 && CFLAG:夜行動 == 1
				PRINTFORMW 新聞を読んでいた%CALLNAME:TARGET%はこちらに記事を見せてきた。
				IF RAND:6 == 0
					PRINTFORMW 「見てよこれ、偉い学者桑がまたエラい発見をしたみたいだ」
					PRINTFORMW 「世の中どんどん解明されて便利になっていくねー。便利っていうのはそれだけで良いことだ」
					PRINTFORMW 「ま、便利になってもおおよその世の中は変わらないだろうけどサ」
				ELSEIF RAND:5 == 0
					PRINTFORMW 「押し込み強盗、一家四人を殺害、だってサ」
					PRINTFORMW 「世も末だね、四人も無為に死んじゃった。%CNAME("一人称")%は悲しいよ」
					PRINTFORMW 「半年は困らないのに、勿体無い」
				ELSEIF RAND:4 == 0
					PRINTFORMW 「登山中に滑落死だってさ。やぁ、事故は怖いね」
					PRINTFORMW 「%CNAME("二人称")%も山に登ることがあったら気をつけてね」
					PRINTFORMW 「体に砂利が入っちゃったら大変だ」
				ELSEIF RAND:3 == 0
					PRINTFORMW 「イジメを苦に自殺、か」
					PRINTFORMW 「やれやれこういうのは心が痛むよ」
					PRINTFORMW 「痛む心があるのかっていう%CNAME("二人称")%の視線はごもっとも」
					PRINTFORMW 「でも、例え家畜にだって上辺の共感はできるだろう？」
				ELSEIF RAND:2
					PRINTFORMW 「政治の紙面を見てるのは意外かい？」
					PRINTFORMW 「こういうの、大体写真付きの一面だったりするじゃない」
					PRINTFORMW 「オジサマの脂が取れて乾ききった感じもイイな、ってネ」
				ELSE
					PRINTFORMW 「街道魔殺人、ねー」
					PRINTFORMW 「常々私は思うんだけど、こういった意味の無い殺しをする輩は、何を思ってただ殺そうと思い立つんだろうか」
					PRINTFORMW 「食べるわけでも無いモノを殺す――――理解出来ないよ」
				ENDIF
				CALL SET_DEVENT, "今日の新聞"
			ELSEIF RAND:4 == 0 && TALENT:恋慕
				IF RAND:4 == 0
					PRINTFORMW 「――――物好きも高じれば無理を蹴っ飛ばす、かー」
					PRINTFORMW 「うーん？ ――――にひひっ、こっちの話サ♪」
				ELSEIF RAND:3 == 0
					PRINTFORMW 「少し筋肉が落ちてきたんじゃない？」
					PRINTFORMW 「まったく、良い吃飯と運動は健康の基本だぜ」
					PRINTFORMW 「筋トレ付き合おうか、一緒になら長続きするだろう？」
				ELSEIF RAND:2
					PRINTFORMW 「くふっ♪――――ああ、いや大したことじゃないんだけどサ」
					PRINTFORMW 「こうやって、擬態とか関係なくこうして談笑出来るなんて」
					PRINTFORMW 「%CNAME("一人称")%、こんなに幸せで良いのかしら――――なんてネ」
				ELSE
					PRINTFORMW 「%CNAME("二人称")%の人付き合いについて前輩として物申したいことは多いけど」
					PRINTFORMW 「ま、それが%CNAME("二人称")%だ。大目に見ようじゃないか」
					PRINTFORMW 「何様だって？ 前輩サマだ、敬いたまえヨ」
				ENDIF
			ELSEIF RAND:4 == 0
				PRINTFORMW 「%CNAME("二人称")%まだ寝ないのかい？」
				PRINTFORMW 「夜ふかしは体に毒だよ、%CNAME("一人称")%の味の維持のためにも――」
				PRINTFORMW 「げふんげふん――――っと失礼、喉の調子が悪くてサ。とにかく健康には気を使ってもらわないとネ」
			ELSEIF RAND:3 == 0
				PRINTFORMW 「少し小腹が空いた？ よーし、轻轻地作っちゃろうか」
				PRINTFORMW 「いやいや、これでも%CNAME("一人称")%ァ料理はそれなりなモンでしてよ」
			ELSEIF RAND:2
				PRINTFORMW 「おっと、ちょっと待ってね」
				PRINTFORMW 鳴動したスマホを取り出して、%CALLNAME:TARGET%は断りを入れると、何やらイジりながらニヤニヤとしている。
				PRINTFORMW 「んー？ 気になる？ にひひっ、女性は秘密が多いものサ」
				PRINTFORMW 「おっ、今の滅茶苦茶ミステリアスって感じカッコよくない？」
			ELSE
				PRINTFORMW 「%CNAME("一人称")%的房間から変な息遣いが聞こえる？」
				PRINTFORMW 「いやーん%CNAME("主人")%のエッチ！」
				PRINTFORMW 「ま、普通に筋トレしてるだけなんだけどね」
			ENDIF
		ELSE
			IF CFLAG:食欲 >= 100
				IF TALENT:恋慕
					IF RAND:3 == 0
						PRINTFORMW 「――――ごめんね、もう一回聞いても良いかな」
						PRINTFORMW 申し訳無さそうにそう言った%CALLNAME:TARGET%は目の焦点が合っていない…
					ELSEIF RAND:2
						PRINTFORMW 「はぁ――はぁ――ああ、うん、そう、だね」
						PRINTFORMW 何気ない会話の合間にも彼女は息を切らしている…
					ELSE
						PRINTFORMW 「大丈夫、大丈夫だから――大丈夫」
						PRINTFORMW 心配をして声を掛けると力無い笑顔で何度もそう繰り返した…
					ENDIF
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「そろそろ食べさせてくれてもバチは当たらないと思うぜ？」
					ELSEIF RAND:2
						PRINTFORMW 「ああ、知り合いの誰から食ってやろうか考えてたのさ――冗談だよ」
					ELSE
						PRINTFORMW 「話の途中で悪いけどサ、限界が近いぜ」
						PRINTFORMW 「餓死死体が一個か猟奇死体がどっかに出来上がる前に餌の補給をお願いしたいネ」
					ENDIF
				ENDIF
			ELSEIF RAND:2 && CFLAG:部室行動
				SELECTCASE CFLAG:部室行動
				CASE 1
					PRINTFORMW %CALLNAME:MASTER%は音楽を聴いている%CALLNAME:TARGET%に話しかけた…
					IF RAND:4 == 0
						PRINTFORMW 「%CNAME("二人称")%も聴いてみる？」
						PRINTFORMW 「売れてなーい青くっさいドマイナーなバンドとかね、最高だぜ」
					ELSEIF RAND:3 == 0
						PRINTFORMW 「%CNAME("二人称")%、ギターとか出来る？ ドラムでもベースでも、キーボードでも良い」
						PRINTFORMW 「なーにちょっと肺活量に自信があるし、ここらで一丁売れないバンドでも結成してみようかってネ」
						PRINTFORMW 「文化祭で人気者間違いナシだろうよ。知らんけど」
					ELSEIF RAND:2
						PRINTFORMW 「このがなるようなサウンド。シャウト。诺伊ズ」
						PRINTFORMW 「う～ん、若いネ。青い衝動ってヤツ」
					ELSE
						PRINTFORMW 「このバンドのアルバム、次のナンバーがまた良いんだぜ」
						PRINTFORMW 「何せ前の曲とてんで真逆のこと言ってら、馬鹿馬鹿しい」
						PRINTFORMW 「――――でもなんとなく頷けちゃう。そういうしっちゃかめっちゃかな感じが心地よくてね」
					ENDIF
				;復習してる
				CASE 2
					PRINTFORMW %CALLNAME:MASTER%は授業の復習をしている%CALLNAME:TARGET%に話しかけた…
					IF RAND:4 == 0
						PRINTFORMW 「勉強してるのが意外って顔してるな、失敬な」
						PRINTFORMW 「これでもね、優等生で通ってるからそういうツラする為にも日々の研鑽は大事なのサ」
					ELSEIF RAND:3 == 0
						PRINTFORMW 「こうして姿勢正してペン握ってるとデキる女性っぽいだろ」
						PRINTFORMW 「実際デキる前輩だもんよ、頼って貰っても構わないサ」
						PRINTFORMW 「――んふっ、対価？ 解ってるだろうそりゃあもちろん、ネ？」
					ELSEIF RAND:2
						PRINTFORMW 「数学はよくわかんなくなって好きじゃないんだ」
						PRINTFORMW 「そりゃそういう仕組だからそうなるって筋は気持ちが良いだろうけど」
						PRINTFORMW 「いつの間にか頭のナカがこんがらがっちゃって、擅長く行かなくてネ」
					ELSE
						PRINTFORMW 「国語の、特に現代文は好きだぜ」
						PRINTFORMW 「馬鹿馬鹿しかったり、ちょっとうるってきたりやるせなかったりさ」
						PRINTFORMW 「今うるって来るの辺りで妙な顔したな、失礼ナ」
					ENDIF
				;料理本を読んでいる
				CASE 3
					PRINTFORMW %CALLNAME:MASTER%は料理の本を読んでいるらしい%CALLNAME:TARGET%に話しかけた…
					IF RAND:4 == 0 && TALENT:恋慕
						PRINTFORMW 「こういう献立はどうかな？彩りもあって美味そうじゃないか」
						PRINTFORMW 「%TEXTR("――ふぅん、芳しくない反応どうも。これはボツだな/ふふっ♪ 絵に書いた料理に涎を垂らしてくれるな、今度酱と作って给から、その涎はお預けだ")%」
					ELSEIF RAND:3 == 0
						PRINTFORMW 「見てみなよ、この料理。美味そうだろ？」
						PRINTFORMW 「味はどうだか知らないけど、形を似せる位は出来るかな。今度作ってみようか」
					ELSEIF RAND:2
						PRINTFORMW 「これでも意外と料理擅長だって褒められるんだぜ」
						PRINTFORMW 「ま、喰ってるモノが喰ってるものだからね。擬態の努力は欠かさないのサ」
						IF TALENT:恋慕 && RAND:2
							PRINTFORMW 「お買い得な女性だろ、今なら安くお求めできますよ？」
						ELSE
							PRINTFORMW 「家庭的な女性だって褒めてくれても良いよ？」
						ENDIF
					ELSE
						PRINTFORMW 「どうせ見るならアイドルの写真集とかの方が良いんだけどねー」
						PRINTFORMW 「料理本なんて見てても腹は空かないし膨れないし。ま、それでも必要な努力ってヤツだからね」
					ENDIF
				;文庫本を読んでいる
				CASE 4
					PRINTFORMW %CALLNAME:MASTER%は文庫本を読んでいる%CALLNAME:TARGET%に話しかけた…
					IF RAND:4 == 0
						PRINTFORMW 「こういうのを読むのも大事な擬態の努力なのサ」
						PRINTFORMW 「事実は小説よりってヤツでね。常識との摺り合わせをする教材としてはかなり有用なんだよ」
					ELSEIF RAND:3 == 0
						PRINTFORMW 「これでも詩集なんかも読んだりはするんだぜ、頻度は多くないけどね」
						PRINTFORMW 「無名な作家なんかを随意見繕ったりして、結構色々読むよ」
						PRINTFORMW 「無名でも嘗めちゃいけない、本になるってことは一端ってことなんだから」
					ELSEIF RAND:2
						PRINTFORMW 「感情移入って言うのかな。美味しいものを食べた時の描写とか、好きなんだよ」
						PRINTFORMW 「あー、こういう表現もあるんだな、だとか、わかるわかるそういう舌触り、だとか」
						PRINTFORMW 「そーんな事を思いながら――機会の少ない吃飯に思いを馳せるのサ」
					ELSE
						PRINTFORMW 「空腹の描写は文字街道、痛いほど理解できちゃうな」
						PRINTFORMW 「お腹の疼痛が無くなって、体に力が入らなくて、頭もボーっとして、息を吸うばかり」
						PRINTFORMW 「それから――――――――何でも良いから、食べたくなる」
					ENDIF
				;スマホ游戏してる
				CASE 5
					PRINTFORMW %CALLNAME:MASTER%はスマホで游戏をしている%CALLNAME:TARGET%に話しかけた…
					IF RAND:4 == 0
						PRINTFORMW 「長い棒がねー来ないんだよねー。そう、あの四段消しの」
						PRINTFORMW 「もう結構長いこと待ってるんだ、このままじゃ積み上がっちゃうんだけど――――」
						IF RAND:3 == 0
							PRINTFORMW 「――――ん？ あ、今ホールドしてるので何とかなるな？」
						ELSEIF RAND:2
							PRINTFORMW 「――――おっ！ 来た！ さぁ消えろ消えろのざまぁ見ろ！ 今までの努力の結実じゃーい！」
						ELSE
							PRINTFORMW 「おいおい待て、待ってくれ、そこでＬ字は不味いんだ！」
							PRINTFORMW 「ここまで綺麗に積み上げたんだぞ！？ それをおまっ！」
							PRINTFORMW 「あ、コラ！四角！ 棒の場所潰しちゃっ、馬鹿！ おたんこなす！ このすっとこど――――長い棒来やがったクソ！！」
						ENDIF
					ELSEIF RAND:3 == 0
						PRINTFORMW 「闲つぶしには持って来いだからこうしてちょくちょく遊んでるけどサァ」
						PRINTFORMW 「%TEXTR("広告すごくウザったいな、これ/ははは、また広告出やがった！うーん！ちょっとイライラしてきた！")%」
					ELSEIF RAND:2
						PRINTFORMW 「ソシャゲって言うんだっけ。課金する領帯プの游戏はそう多くやらないかな」
						PRINTFORMW 「ほら、そういうのって野蛮なのや程々にエッチなのとかあるだろう？」
						PRINTFORMW 「慎ましい%CNAME("一人称")%には似合わないじゃないか。ポップなのならやるんだけどね」
					ELSE
						PRINTFORMW 「この游戏が案外難しくってさー、頭硬いのかなー」
						PRINTFORMW 「――――って思ったら今みたいにスルっと解けるモンなんだよネ。意地の悪い」
					ENDIF
				ENDSELECT
			ELSEIF MARK:屈服刻印 >= 2
				IF TALENT:恋慕
					IF RAND:5 == 0
						PRINTFORMW 「並べてこの世はケセラセラってね」
						PRINTFORMW 「そんな顔するなよ、裏さえ見なけりゃ世界は平和だぜ」
					ELSEIF RAND:4 == 0
						CALL PRINT_STRW, "「にひっ――_BH_」"
						PRINTFORMW 「おっと笑いどころじゃなかったか。許しておくれヨ、思い出し笑いみたいなものだからサ♪」
					ELSEIF RAND:3 == 0
						PRINTFORMW 「ったく、据え膳が一杯あるってのに食べようと思えないんだから堪らない」
						PRINTFORMW 「圆圈で他人事みたいな顔するなよ、%CNAME("二人称")%のせいだぜ？」
					ELSEIF RAND:2
						PRINTFORMW 「今日の晩御飯は決まっている？」
						PRINTFORMW 「たまには%CNAME("一人称")%が振る舞ってあげようか」
						PRINTFORMW 「ああ、ええと――%CNAME("一人称")%みたいな生き物の手料理で良ければネ」
					ELSE
						PRINTFORMW 「圆圈で人を食い気しか無いみたいな言い方はよせよー」
						PRINTFORMW 「最近はそれ以外だってあるんだぜ？」
						PRINTFORMW 「例えば？ 例えば、そう、だな――――むぅ、なんでもないよ」
					ENDIF
				ELSE
					IF RAND:5 == 0
						PRINTFORMW 「頼みもしないのに、本当に構いたがり桑だなぁ%CNAME("二人称")%も」
						PRINTFORMW 「飼い主としては満点かも知れないけど、%CNAME("一人称")%がいうのも何だけど、他の交友も大事にネ」
					ELSEIF RAND:4 == 0
						PRINTFORMW 「最近野菜酱と食べてるかい？ お肉ばっかり食べてちゃいけないぜ？」
						PRINTFORMW 「ん？ ああ、ちょっとした品質――体調管理の真似ゴトさ」
					ELSEIF RAND:3 == 0
						PRINTFORMW 「呆れるやら称賛するやら。%CNAME("一人称")%より%CNAME("二人称")%の方がよっぽど喰ってるんじゃないか」
						PRINTFORMW 「しかも、%CNAME("二人称")%の場合は嗜好品だろう？ やっぱり%CNAME("一人称")%はよっぽど慎ましいね」
					ELSEIF RAND:2
						PRINTFORMW 「なんだか%CNAME("一人称")%もここに馴染んじゃったな」
						PRINTFORMW 「もう何言ったって馴染んだ子たちは"是是"って感じだしサ」
					ELSE
						PRINTFORMW 「絵に描いた餅って言葉、あるだろ。まさにそういう気分になるんだよねェ」
						PRINTFORMW 「はー、ワカってますよ、食べたりしませんよ、わんわんってねー」
					ENDIF
				ENDIF
			ELSE
				IF RAND:5 == 0
					PRINTFORMW 「%TEXTR("お、今の話はウケたみたいだね、なるほどなるほど/おや、渾身のネタだったんだけどな、芳しくないみたい/ややウケってヤツだね。こういう話題が好き、と")%」
					SIF RAND:3 == 0
						PRINTFORMW 「ところで、そんなに不用心だとサ――――どうしてやろうかなって思っちゃうから気をつけてね」
				ELSEIF RAND:4 == 0
					PRINTFORMW 「そんなに構ってくれなくても良いんだよ？」
					PRINTFORMW 「%CNAME("二人称")%や他の子が楽しそうな姿を見てるだけでお腹一杯さ」
					PRINTFORMW 「いやマジで、なんて良い前輩だろうね%CNAME("一人称")%はサ♪」
				ELSEIF RAND:3 == 0
					PRINTFORMW 「ネコ被らなくても良いのは快適だなぁ」
					PRINTFORMW 「担任とか今の%CNAME("一人称")%を見たらギョッとするだろうね」
				ELSEIF RAND:2
					PRINTFORMW 「んふっ――おっと、お話の途中に悪いね」
					PRINTFORMW 「%CNAME("二人称")%を観察していたんだ、やっぱりイイ体してるよねー」
				ELSE
					PRINTFORMW 「いやー、%CNAME("二人称")%の部活は大変眼福だネ。入部して良かったナーって思うよ」
					PRINTFORMW 「んふ、そんなぎこちない顔しないで。約束は守るからサ」
				ENDIF
			ENDIF
		ENDIF
	ENDSELECT
;TFLAG:取引拒否 = 1とすることで、你のたわごとを却下できます
CASE "Ｈ的約定"
	;台詞を書いたら下のRETURN 0を消してください
	RETURN 0
	;この角色自身が前回赤点で、それどころではない（学生以外は、この分岐には来ません）
	IF COND("成績：赤点")
		PRINTFORMW
		TFLAG:取引拒否 = 1
	;以下はご褒美を给事にＯＫして给
	ELSE
		;前回既に你が良い点を取っている場合には”学年上位”を要求します
		IF COND("成績：優秀", MASTER)
			PRINTFORMW
		;そうでない場合には平均点を結構上回る程度でＯＫです
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
CASE "拭汗"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「そんな気は回さなくても良いのに」
		PRINTFORMW 「――――いいか、随便くれよ」
	ELSE
		PRINTFORMW 「汗を拭いてくれるのはイイんだけどさ」
		PRINTFORMW 「にひっ――こんなに近づいて、イイのかナ、%CNAME("二人称")%は」
	ENDIF
CASE "淋浴独り言"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「%CNAME("一人称")%は%CNAME("主人")%が嫌い。嫌い。嫌い」
		PRINTFORMW 「嫌い、だ」
	ELSE
		PRINTFORMW 「～♪ そろそろ食べ頃かナー」
	ENDIF
CASE "淋浴"
	;実は内衣を漁ったのに気づかれています
	IF COND("淋浴：内衣漁りバレ")
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「――――ふぅん。良いけれど、ね」
		ELSE
			PRINTFORMW 「う～ん？ にひひっ♪ 可愛いトコロあるよね、%CNAME("二人称")%」
		ENDIF
	ELSE
		PRINTFORMW 「ふー、清爽――――あ、まーここ的污垢是っか、見えないし」
	ENDIF
CASE "淋浴後换装"
	IF CEVENT("恋慕：ささくれ")
		IF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW 「着たよ。着た」
			PRINTFORMW 「――――ああ、いや、間違えたんだ。うん」
		ELSE
			PRINTFORMW 「%CNAME("一人称")%がこんなの着たって、そう変わらないだろう」
		ENDIF
	ELSE
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW 「これを着ろってコトだったんだろ」
			PRINTFORMW 「さ、どうだい、中々イケてるんじゃないかな。うっふ～ん♪」
		ELSE
			PRINTFORMW 「%CNAME("二人称")%も好きだね～」
			PRINTFORMW 「もちろんご要望にはお応えしましたともサ」
		ENDIF
	ENDIF
CASE "淋浴後换装失敗"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「――――なんだい、その顔」
		PRINTFORMW 「%CNAME("一人称")%の格好が何か変かな？」
	ELSE
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW 「ン、籠に入ってたヤツ？ 気付かなかったナ！」
			PRINTFORMW 「どんなのだったんだい？ ほら、言えよ」
			PRINTFORMW 「どんなの着て欲しかったのか酱と口で言ってご覧よサ♪」
		ELSE
			PRINTFORMW 「めげないね。拍手してあげよう、ぱちぱちぱちー」
			PRINTFORMW 「ま、着ないんだけどネ。何が悪いかって言われりゃあ、センスが悪い」
		ENDIF
	ENDIF

;睡眠中の悪戯
CASE "趁睡袭击"
	;梦话
	CALL KOJO_SLEEP_K60
	WAIT
CASE "互动"
	SELECTCASE STR:日常イベント名
	CASE "一起学习"
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「勉強くらいなら進行解答よ」
			PRINTFORMW 「――――嫌いでも、これくらいならするだろう。多分」
		ELSE
			PRINTFORMW 「解らないところがあったらなんでも聞いてくれたまへ」
			PRINTFORMW 「伊達に教室じゃ優等生ヅラしてないぜ？」
		ENDIF
	CASE "托一托胸部"
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「言っておくけど、%CNAME("二人称")%の所有物じゃあないんだ」
			PRINTFORMW 「あまり手荒に扱わないでね」
		ELSEIF RAND:2
			PRINTFORMW 「上等なモンだろ。意外と美味しいと思うんだよね」
			PRINTFORMW 「エッチな意味だぜ。顔を強張らせるなよ、飼い主桑ヨ」
		ELSE
			PRINTFORMW 「後で%CNAME("二人称")%のも触らせろよ？」
			PRINTFORMW 「なんでって、そりゃあ肉付きの格子しないとサ」
		ENDIF
	CASE "按摩"
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「%CNAME("二人称")%を嫌いな%CNAME("一人称")%にそんなことするなんて、やっぱり変人だね」
			PRINTFORMW 「――――やってくれるなら、お願いしようかな」
		ELSEIF RAND:2
			PRINTFORMW 「はァ～イイねェ――――♪」
			PRINTFORMW 「按摩師に向いてるんじゃないかい、%CNAME("二人称")%」
		ELSE
			PRINTFORMW 「んっ――――こらこら、下心はもっと隠しなさい」
		ENDIF
	CASE "接吻"
		IF CEVENT("恋慕：ささくれ")
			IF RAND:2 == 0
				PRINTFORMW 「嫌いだ」
			ELSE
				PRINTFORMW 「嫌だって言ってもやるんだろ」
			ENDIF
		ELSEIF CSTR:PREV_DAILYCOM == STR:日常イベント名
			PRINTFORMW 「おいおい、そんなにがっついてくれるな」
			PRINTFORMW 「忍耐のも大変なんだぜ。マジで」
		ELSE
			PRINTFORMW 「ちゅ――んっ――ぷぅあ――終わりかナ？」
			IF RAND:2
				CALL PRINT_STRW, "「しっかし怖いもの知らずだねェ――ni↘ひ_BH_」"
			ELSE
				CALL PRINT_STRW, "「想像するだけに留めておいて给よ。良い子だろう_BH_」"
			ENDIF
		ENDIF
	CASE "膝枕"
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:2
					PRINTFORMW 「――――頭の置き心地は、悪く無い、かな」
				ELSE
					PRINTFORMW 「なんだかムカっ腹が立ってきた」
					PRINTFORMW 「――――ああ、%CNAME("二人称")%じゃないよ、自分に、サ」
				ENDIF
			ELSEIF RAND:3 == 0
				PRINTFORMW 「コラコラそんなに乙女の顔をジロジロ見るなよ、照れるだろ」
				PRINTFORMW 「だから、あのね――――本当に照れちゃうぞ？ 良いのかい？ 見たいかい？ 照れるトコ」
				PRINTFORMW 「はぁ――――――うわぁあああああああ！！ ふぅ、よし目一杯照れた。落ち着いた」
			ELSEIF RAND:2
				PRINTFORMW 「頭の位置がこれまた丁度良いんだ。いっそ%CNAME("主人")%の膝だけ切り取って枕にしちゃおうか」
				PRINTFORMW 「――――にひっ♪ そう強張るなよ。小粋なジョークじゃあないか。半分位は」
			ELSE
				PRINTFORMW 「%CNAME("一人称")%を縛り付ける悪い膝め。こうしてやる、こうだ！」
				PRINTFORMW 「ふふふ、くすぐったかろう。こうギリギリ振れないくらいでふわーっと」
				IF RAND:2
					PRINTFORMW 「――――ふ、ふふふ――いや、サ。ね、%CNAME("二人称")%、硬くなるの早いネ、発情期なのかナ？」
				ELSE
					PRINTFORMW 「あ――――っだ！！ こら！ 振り落とすなんて%TEXTR("ペット虐待だぞ/もっと大事に扱ってよ/酷いじゃないか")%！！」
				ENDIF
			ENDIF
		ELSE
			IF MARK:屈服刻印 >= 2 && RAND:2
				IF RAND:3 == 0
					PRINTFORMW 「お、見えにくいトコロに虫刺され発見――――噛み跡で上書きしちゃおうかな」
				ELSEIF RAND:2
					PRINTFORMW 「髪、触りたいかい？ にひひ♪ 良いね、グルーミングしておくれよ♪」
				ELSE
					PRINTFORMW 「う～ん結構な眺めだ。絶景絶景、こりゃあ目の毒――いいや、お腹の毒だな」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「%TEXTR("美味しそう/柔らかそう/食べごろ")%だなー、%TEXTR("頬肉/顎/首回り/じゅるり")%」
				ELSEIF RAND:2
					PRINTFORMW 「がっまんーがっまんー赤子泣いても蓋取るなー%CNAME("一人称")%はデキるペットですー♪」
				ELSE
					PRINTFORMW 「手の届く距離だネ？ ――――飛び起きたら口も届いちゃうゾ♪」
				ENDIF
			ENDIF
		ENDIF
	CASE "泡茶"
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「――――お構いなく」
		ELSEIF RAND:2
			PRINTFORMW 「お、気が利くじゃない」
		ELSE
			PRINTFORMW 「自慢じゃないけど茶には煩いよ？」
			PRINTFORMW 「この茶は――うん、ダージリン！ 違う？ じゃあアッサム？ それも違う？ まーどっちでも良いか」
		ENDIF
	;CALL SET_CEVENT, "飲酒拒否"でお酒を飲まないようにできる。
	;このフラグはCALL DEL_CEVENT, "飲酒拒否"で消すことができる
	CASE "勸酒"
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「お酒はお断りだよ。飲めないんだ」
			PRINTFORMW 「――――前輩として言っておくけれど、%CNAME("二人称")%も程々にね」
		ELSE
			PRINTFORMW 「あー、ゴメンね。ご相伴に預かりたいところだけどね」
			PRINTFORMW 「これでも優等生なんだ。むしろ咎めたいトコロだけど、勘弁してあげよう」
		ENDIF
		CALL SET_CEVENT, "飲酒拒否"
	CASE "摸頭"
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「%TEXTR("触らないで/気安いな/満足したらやめてくれよ/大人しくしてるからそれ以上はやめてね/――――嫌いだ/――――馬鹿")%」
		ELSEIF CSTR:PREV_DAILYCOM == STR:日常イベント名
			IF RAND:3 == 0
				PRINTFORMW 「生殺しが過ぎないかい、%CNAME("主人")%」
				PRINTFORMW 「んんっ――もっと撫でろって意味じゃァないんだぜ」
			ELSEIF RAND:2
				PRINTFORMW 「呆れるほど怖いもの知らずだよね、%CNAME("二人称")%」
				PRINTFORMW 「――――――ま、その方が%CNAME("一人称")%の飼い主らしいから良いか」
			ELSE
				PRINTFORMW 「やるならもっとワシャっと！そう！そう！」
				PRINTFORMW 「いや本当にワシャっとやり過ぎだ。天パが酷くなったらどうしてくれる」
			ENDIF
		ELSEIF RAND:4 == 0
			PRINTFORMW 「どうだい、%CNAME("一人称")%の魅惑の天然布マの触り心地は」
			IF RAND:2
				PRINTFORMW 「純度１００％まじりっけ没有の天然だぜ」
				PRINTFORMW 「そして%CNAME("二人称")%によってさらにわっしゃわしゃになるって寸法だ畜生」
			ELSE
				PRINTFORMW 「おう、何笑着る。悪いか天パで」
			ENDIF
		ELSEIF RAND:3 == 0
			CALL PRINT_STRW, "「良いニオイがするねェ_BH_ 马そうな、いーいニオイ_BH_」"
		ELSEIF RAND:2
			PRINTFORMW 「%CNAME("一人称")%の髪に絡圆圈この指さァ」
			PRINTFORMW 「ちょっと、味見させてくれないかな――駄目？」
		ELSE
			PRINTFORMW 「%TEXTR("くぅ～ん♪/わんわん♪/へっへっへっへっへ♪")%」
			PRINTFORMW 「犬真似も疲れるんだけれどね、満足したかな？」
		ENDIF
	;胸元にチップを差し込まれます。兔女郎制服限定
	CASE "给小费"
		PRINTFORMW
	;送禮貰った感想です。何を貰ったか含め、好きに書いてください
	CASE "送一份小礼物"
		PRINTFORMW
	CASE "送一份普通的礼物"
		PRINTFORMW
	CASE "送一份高价的礼物"
		PRINTFORMW
	CASEELSE
		PRINTFORMW
	ENDSELECT
CASE "整理睡姿"
	;梦话
	CALL KOJO_SLEEP_K60
	WAIT
CASE "被拒绝了学习的邀请"

CASE "勉強前に胖次要求"

CASE "卖个破绽"
	SELECTCASE STR:日常イベント名
	CASE "邀请一起入浴"
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「――――お浴室、まだなんだ」
			PRINTFORMW 「ちょっとだけ、付き合っておくれよ」
		ELSE
			PRINTFORMW 「どうだい飼い主桑。ここらで裸の付き合いっていうのは」
			PRINTFORMW 「別に%CNAME("二人称")%の肉付きの確認がしたいナーとかそういう話じゃないんだ」
			PRINTFORMW 「――――ホントだヨ？」
		ENDIF
	CASE "Ｈ的邀请"
		PRINTFORMW
	CASE "邀请学习"
		;胖次を要求した
		IF CHOSE_DEVENT("勉強前に胖次要求")
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	CASE "推倒"
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「自慰で道具を使うのとそう変わらないさ」
				PRINTFORMW 「良いから黙って食われてて欲しいな」
			ELSE
				PRINTFORMW 「ごめんネー%CNAME("主人")%ヨ」
				CALL PRINT_STRW, "「ちょっと今から悪い子になるから、躾の方よろしく_BH_」"
			ENDIF
		ELSE
			PRINTFORMW 「突発的で悪いけど、そういう気分になっちゃってるんだ」
			PRINTFORMW 「ま、ケダモノらしいだろ。お互い発散しようじゃないか♪」
		ENDIF
	CASE "展示内褲"
		;複数人が並んで你に展示内褲ている場合
		IF FLAG:対複数
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	CASE "清洁口交"
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	CASE "口淫"
		PRINTFORMW
	CASE "亲脸頬", "接吻"
		PRINTFORMW
	CASE "膝枕", "抱住", "把胸部压了上去", "摩擦股間"
		PRINTFORMW
	CASE "手淫"
	CASE "抚摸"
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「――――あっ」
			PRINTFORMW 無意識にやっていたのか声を上げた%CALLNAME:TARGET%はすぐに手を引っ込めた…
		ELSEIF RAND:2 == 0
			PRINTFORMW 「ふふ、やられる側に回る気分はどうだい？」
			PRINTFORMW 「良い気分？ それは結構」
		ELSE
			PRINTFORMW 「ところで、頭皮のニオイで扇情的な気分になる人もいるらしいね」
			PRINTFORMW 「――――少しは解らなくもないかナ」
		ENDIF
	CASE "膝枕"
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「どうだい、%CNAME("二人称")%を嫌いな女の膝は」
		ELSE
			PRINTFORMW 「たまには労って给のも良いかなとネ♪」
			PRINTFORMW 「少しは感謝してるよ。いつもゴメンね」
			PRINTFORMW 「じゅるり――――おっと失敬。何分良いニオイで」
		ENDIF
	CASE "沏茶"
		;CSTR:茶 を指定してある場合には、SAVESTR:茶 で何を用意したかが判定できる
		;例）PRINTFORMW 「よければ%SAVESTR:茶%どうぞ」
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「飲み物くらいは出すさ」
		ELSE
			PRINTFORMW 「%SAVESTR:茶%なんていかが？」
			PRINTFORMW 「沏茶も飼い主への労いだヨ」
		ENDIF
	;それ以外
	CASEELSE
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW %CALLNAME:TARGET%は%TEXTR("何処か/何故か/仄かに")%%TEXTR("泣きそう/後悔したよう/切なげ")%な%TEXTR("顔/表情")%をしている…
			ELSEIF RAND:3 == 0
				PRINTFORMW 「%TEXTR("腕/肩/背中")%を拝借――――ん、ふふ♪」
			ELSEIF RAND:2
				PRINTFORMW 「ふーっ♪ にひひっ、どうだい耳に息吹きかけられるのは♪」
			ELSE
				PRINTFORMW 「愛犬がじゃれに来てるぜ！ほら！ほら！何かすることは！！」
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「二の腕周りが少し肥えたかな？運動は大事だぜ」
			ELSEIF RAND:2
				PRINTFORMW 「良い%TEXTR("フトモモ/肩/指")%だ、実にイイね」
			ELSE
				PRINTFORMW 「脇腹のお肉、少し余ってきた？」
			ENDIF
		ENDIF
	ENDSELECT
;これは素質に[開朗]ないし[粗野]を持っている角色のみです
CASE "構って欲しい！"
	PRINTFORMW
CASE "廁所"
	;廁所で用を済ませた後の台詞
	IF BASE:尿意 == 0
		;主人も廁所で済ませてきた
		IF BASE:MASTER:尿意 == 0
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;廁所に行く際の台詞
	ELSE
		PRINTFORMW
	ENDIF
CASE "廁所詮索"
	PRINTFORMW
;これは你と角色が両方男性でない際に限り起きます
CASE "廁所で井戸端会議"
	PRINTFORMW
;你に廁所を覗かれた！
CASE "廁所ハプニング"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「――――%CNAME("二人称")%、さぁ」
	ELSEIF RAND:2
		PRINTFORMW 「入ってます、ヨ？ 何してんだい%CNAME("主人")%」
	ELSE
		PRINTFORMW 「――――やけに堂々とした覗きだナー、憧れちゃうなー」
	ENDIF
;廁所ハプニングから派生するＨイベント
CASE "廁所Ｈ"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「待って――――あ、あー――――%CNAME("二人称","どもり")%も、廁所、だろう？」
		PRINTFORMW 「――――大きくなってると、用を足し辛いって聞くからサ」
		PRINTFORMW 「に、にひひっ♪」
		RETURN 0
	ENDIF
	PRINTFORMW 「まさか間違って入りました、で終わりじゃないよネ？」
	SELECTCASE STR:日常イベント名

	CASE "廁所イベント：見せつけくぱぁ"
		IF RAND:2
			CALL PRINT_STRW, "「ほーら、ねちょねちょのぐっちょぐちょ_BH_」"
			CALL PRINT_STRW, "「寂しいよぉ_BH_ 寂しいよぉ_BH_ にひひっ♪」"
			CALL PRINT_STRW, "「でーもー、手を出しちゃあ、ダーメ_BH_」"
		ELSE
			CALL PRINT_STRW, "「にひひっ_BH_ 忠犬の媚び媚びまんこ～御開帳～_BH_」"
			CALL PRINT_STRW, "「でもでも、お手つき禁止の見せるだーけ_BH_」"
			PRINTFORMW 「見て、もっとおちんちんバキバキにして？ 躁动难忍して？」
			CALL PRINT_STRW, "「――――その血走着目、最っ高_HH_」"
		ENDIF
	CASE "廁所イベント：相互自慰"
		IF RAND:2
			CALL PRINT_STRW, @"「んふっ_HH_ あー、ひひっ_HH_ 何ぼーっとしてるの？ %CNAME("二人称")%もシてよ_BH_」"
			CALL PRINT_STRW, "「シコシコした分だけネ、指でおまんこずぽずぽして给からサ～_HH_」"
			CALL PRINT_STRW, "「んぁっ_HH_ シコシコ激しっ_HH_お廁所疑似性交っ 気持ちいいよ～っ_HH_」"
		ELSE
			CALL PRINT_STRW, "「わんわん_HH_ わんこのおまんこ、ぐちゅぐちゅするトコ見たくない？」"
			CALL PRINT_STRW, @"「にひひっ_BH_ 聞かなくてもわかっちゃうナ♪ %CNAME("主人")%もおちんちん勃起て辛いよネ？」"
			CALL PRINT_STRW, "「ほら～窮屈な休闲褲から出しちゃってサ♪ 一緒に気持ちよくなろう_HH_」"
		ENDIF
	CASE "廁所イベント：口交"
		IF RAND:2
			CALL PRINT_STRW, "「ついでにスッキリしてく？ にひひっ_BH_」"
			CALL PRINT_STRW, "「ちゅっ_BH_――――先におしっこが出るかなーしろいのが出るかなー_BH_」"
		ELSE
			CALL PRINT_STRW, "「ほら、おちんちんだーしーて？_HH_ わっ、もうバキバキじゃ～ん_BH_」"
			CALL PRINT_STRW, "「これじゃおしっこできないネ～辛いネ～_BH_ 忠犬のお口でヌキヌキしましょうネ～_BH_」"
		ENDIF
	CASE "廁所イベント：Ｖ性交"
		IF RAND:2
			CALL PRINT_STRW, "「おちんちんとおまんこが出る場所なら、ヤることは一つだよネ_HH_」"
			CALL PRINT_STRW, "「ちょ～っとおしっこ付いてるけど、忠犬おまんこ一丁如何かナ？わんわん_BH_」"
		ELSE
			CALL PRINT_STRW, @"「お尻ふりふり～_BH_ え、何って%CNAME("二人称")%、誘ってるんだよ」"
			PRINTFORMW 「生憎振る尾巴がなくってさー。じゃあお尻振るしか無いじゃない？」
			CALL PRINT_STRW, "「にひひっ_BH_ 誘われてるって分かった瞬間にギラつく目、好きだよ_HH_」"
			CALL PRINT_STRW, "「お～いで_HH_」"
		ENDIF
	CASE "廁所イベント：Ａ性交"
		IF RAND:2
			PRINTFORMW 「うん、しょっと。お尻でなんて、どう？ お廁所っぽくサ♪」
			PRINTFORMW 「ん――――ふっ♪ 是っちゃったー♪」
			CALL PRINT_STRW, "「ガンガン動く？ ゆるーく動く？ どっちでも良いぜ_HH_」"
		ELSE
			CALL PRINT_STRW, "「出すモノ出しちゃったアトだ・か・ら_BH_」"
			CALL PRINT_STRW, @"「ここらで一丁、%CNAME("主人")%の精液、欲しいナ_HH_」"
			CALL PRINT_STRW, "「クチの中から青臭いニオイするくらい、たっぷたぷにしてヨ_HH_」"
		ENDIF
	ENDSELECT
CASE "检查阴部"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K60
		WAIT
	ELSEIF COND("合意：检查阴部") == 0
		PRINTFORMW 「これでも結構常識人だと思ってるのだけどサ」
		PRINTFORMW 「この状況、前輩として注意するべきかね、飼われてる身としてステイするべきかね」
	ELSE
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「あまり近くで見ないでくれよ――――胸が痛い」
		ELSEIF RAND:3 == 0
			PRINTFORMW 「にひっ♪ ――――その目、品定めしてる時の%CNAME("一人称")%にきっとそっくりだぜ」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「テイスティングかい？ 良いとも」
		ELSE
			PRINTFORMW 「――――んふっ、鼻息が荒いね、飼い主桑ヨ」
		ENDIF
	ENDIF
CASE "检查菊穴"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K60
		WAIT
	ELSE
		IF TALENT:恋慕 && TALENT:淫乱
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「チッ―――――気にしないでくれ、自分に対する舌打ちだ」
			ELSEIF RAND:3 == 0
				CALL PRINT_STRW, "「くぅ～ん_BH_ ほらほら～お菊門まで服従しちゃってる_BH_」"
				CALL PRINT_STRW, @"「興奮するかい？ %CNAME("一人称")%は、そうだネ――にひひっ_BH_」"
			ELSEIF RAND:2
				PRINTFORMW 「――――む、今視線を離したな？ 解るんだぞ」
				PRINTFORMW 「ほら～、%TEXTR("お尻のシワ、こんなに伸びるんだぜ？/寂しくてお尻ヒクヒクしてきた。/お尻きゅってしてツーンってしちゃっただろ。")% 見なくて良いんだね？」
				CALL PRINT_STRW, @"「ni↘ひっひ♪ 単純だな～%CNAME("二人称")%_BH_」"
			ELSE
				PRINTFORMW 「%CNAME("主人")%の性癖ってヤツが心配だよ%CNAME("一人称")%は」
				PRINTFORMW 「湿的てるヤツに言われたくない？ そりゃあごもっとも」
				PRINTFORMW 「じゃあそう躾けた%CNAME("主人")%にはセキニン取って貰わないとナ～♪」
			ENDIF
		ELSE
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「ペットのそんなところまで見るなんて、本当に倒錯しているね？」
				PRINTFORMW 「感心するよ。ああ、皮肉だけれど」
			ELSEIF RAND:3 == 0
				PRINTFORMW 「くぅ～ん。ほら、愛犬はこんなに嫌がってますよ！！」
				PRINTFORMW 「きゃんきゃん！ きゃん！ ――――畜生ケツ向けるまで引かない気だな%CNAME("二人称")%」
			ELSEIF RAND:2
				PRINTFORML 「シワの数でも数えてみようか。よし、そうしよう！」
				PRINTFORMW 「是、ひとぉおおおつ！！ ふたぁあああつ！！ みぃいいいいいいいいっつ！！」
				PRINTFORMW 「%TEXTR("煩いってぇ！？ うっせぇ！こっちは恥ずかしんじゃぁあい！！/是、よぉおおおおおっつ！是復唱ぉおおお！！声が小ぁああい！！")%」
			ELSE
				PRINTFORMW 「あ、ははは――――いや、いやいやぁ、流石に恥ずかしいナー、マジで」
			ENDIF
		ENDIF
	ENDIF
CASE "检查内褲"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K60
		WAIT
	ELSEIF COND("合意：检查内褲") == 0
		PRINTFORMW 「なんだって、もう一回言ってみ？」
		PRINTFORMW 「はー、ま、いっかー」
		PRINTFORMW 「ほれ、飼い主桑、エサだよ♪」
	ELSE
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「控えめに言って気持ち悪いよ、%CNAME("主人")%」
		ELSEIF RAND:3 == 0
			PRINTFORMW 「にひっ――――モノズキだねェ」
		ELSEIF RAND:2
			PRINTFORMW 「これってオナネタにするの？っていうか%CNAME("二人称")%自慰の？」
			PRINTFORMW 「ただの趣味――――ほう、そういうのもあるのか」
		ELSE
			PRINTFORMW 「色気が足りない？ 慎ましいと言って欲しいネ」
		ENDIF
	ENDIF
;念のため分岐を作って有ますが多いので取捨選択してください
CASE "撫摸股間"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「正気を確かめるついでに訊くけど、ご心情でも取ってるつもりかい？」
	;初めて
	ELSEIF DEVENT(ARGS) == 0
		PRINTFORMW 「うーん？ なーに、急に」
		PRINTFORMW 「あー、そういうことね。良いよ良いよ」
		PRINTFORMW 「にひひっ、急に手付きいやらしくなっちゃって――――そういう欲望に忠実なトコロ、嫌いじゃないぜ」
	;阴部を直に弄る場合
	ELSEIF CHECK_CLO("Ｖ露出")
		IF RAND:3 == 0
			PRINTFORMW 「ケダモノっぽい息遣い、ちょっとは隠そうぜ」
			PRINTFORMW 「んっ――――ひひっ、どっちが飼い主か解ったもんじゃない♪」
		ELSEIF RAND:2
			PRINTFORMW 「やらしー手付きが板についてるもんだねェ」
			PRINTFORMW 「にひっ――――おいおい、どうして今のでちょっと興奮してるんだ%CNAME("二人称")%は」
		ELSE
			PRINTFORMW 「いやはや、%CNAME("二人称")%の将来が不安になるよ%CNAME("一人称")%は」
		ENDIF
	;连褲襪越し
	ELSEIF CHECK_CLO("连褲襪露出")
		IF RAND:3 == 0
			PRINTFORMW 「连褲襪越しにお触りだなんて、はーマニアックだネ――――嫌いじゃないぜ♪」
			PRINTFORMW 「好きでも無いけどサ！」
		ELSEIF RAND:2
			PRINTFORMW 「さわり心地はどうだい？ うんうん、今日も%CNAME("主人")%が変態臭くて結構だ♪」
		ELSE
			PRINTFORMW 「いやー、オヤジ臭いっていうか――うん、偏見！！」
		ENDIF
	;布鲁马越し
	ELSEIF CHECK_CLO("布鲁马露出")
		IF RAND:3 == 0
			PRINTFORMW 「これはアレかい、感触を楽しむとかそういう」
			PRINTFORMW 「ビジュアルでも楽しめる？――――それもそうか？」
		ELSEIF RAND:2
			PRINTFORMW 「なんだか変態度上がってるよネー」
			PRINTFORMW 「心做しか鼻息も荒い――ふーむ」
			PRINTFORMW 「%TEXTR("お手――ダメか/お座り――しないかー/ちんちん――――これは坦率に聞くのかい")%」
		ELSE
			PRINTFORMW 「虽然很可惜汗は吸ってないぜ」
			PRINTFORMW 「%CNAME("一人称")%の汗は安くないのサ！」
		ENDIF
	;泳装越し(比基尼や競泳泳装や死库水など)
	ELSEIF CHECK_CLO("泳装ボトム露出")
		PRINTFORMW
	;胖次越し
	ELSEIF CHECK_CLO("胖次露出")
		IF RAND:2
			PRINTFORMW 「こらこら、不慮の事故で带污迹的变成了らどうしてくれる」
		ELSE
			PRINTFORMW 「布地一枚隔ててるけど良いの？」
			PRINTFORMW 「んっ――――そうかい、たんとご賞味あれ」
		ENDIF
	;其他休闲褲やなんか布越し
	ELSE
		IF RAND:3 == 0
			PRINTFORMW 「傍から見たら痴漢の現場か、そうでなくても間抜けな絵面だネェ」
		ELSEIF RAND:2
			PRINTFORMW 「おいおい、あまり近づいてくれるなよ」
			PRINTFORMW 「ガマンできなくなっちゃうだろう」
		ELSE
			PRINTFORMW 「人のこと言えたクチじゃあないけど、本当に欲望に忠実だなー」
		ENDIF
	ENDIF
CASE "检查布鲁马", "股間観察"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K60
		WAIT
	;じっくり観察
	ELSEIF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「湿ってぬめった視線だネ――――気持ち悪いってコトさ」
	ELSEIF CFLAG:股間確認済
		PRINTFORMW 「満足できなくなった？ にひっ――――良いとも」
		PRINTFORMW 「ついでにポーズでもするかい？ わんわんってネ」
	ELSE
		PRINTFORMW 「わお、濁りたっぷりの良い目だ♪」
		PRINTFORMW 「そういう視線には敏感なんだぜ？」
	ENDIF

CASE "掀起裙子"
	SELECTCASE STR:日常イベント名
	CASE "撩起裙子"
		;初めて
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「こんなことさせてまで見たかったんだろ」
			PRINTFORMW 「好きに視姦すると良いさ、%CNAME("一人称")%も良い眺めだよ。皮肉だけれど」
		ELSEIF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW 「主动たくしあげろって言うのかい？」
			PRINTFORMW 「んふっ――――良いぜ？飼い主サマからのお達しとあってはネ」
		;胖次チラ直後
		ELSEIF COND("胖次チラ直後")
			PRINTFORMW 「こうやって思い切りよく見せられるのもオツだろ」
			PRINTFORMW 「ほらぁ、もっとよく見ろよ～。せっかく見せつけてるんだからサ♪」
		ELSE
			PRINTFORMW 「絶景だろ？ %CNAME("一人称")%も、結構イイモノ見れてるよ」
			CALL PRINT_STRW, @"「――――%CNAME("二人称")%のその目、イイなァ――――にひひっ_BH_」"
		ENDIF
	;掀起裙子
	CASEELSE
		;刚睡醒の胡乱な状態を襲う
		IF CFLAG:刚睡醒
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW %CALLNAME:TARGET%は一切反応しない…
				ELSE
					PRINTFORMW 「きゃあ！！ ――――え、わざとらしい？ 精進しますワ♪」
				ENDIF
			ELSE
				PRINTFORMW 「うん？―――――ああ、刚睡醒でも简约な反応でゴメンね」
				PRINTFORMW 「結構刚睡醒が良くてサ。きゃあ、とか言っておこうか、この際」
			ENDIF
		;睡眠中の悪戯
		ELSEIF CFLAG:睡眠
			;梦话
			CALL KOJO_SLEEP_K60
			WAIT
		ELSEIF CEVENT("恋慕：ささくれ")
			PRINTFORMW %CALLNAME:TARGET%は冷たい視線を%CALLNAME:MASTER%に向けるだけだった…
		;初めて
		ELSEIF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW 「お？ ――――？ あ、なるほど、卷起裙子か」
			PRINTFORMW 「唐突な上に中々あることじゃないから思考停止しちゃった」
		;胖次チラ直後
		ELSEIF COND("胖次チラ直後")
			PRINTFORMW 「さっき見てたの、バレてるんだぜ？」
			PRINTFORMW 「それでも捲るってんだから流石は%CNAME("主人")%！」
			PRINTFORMW 「煩悩に生きてるネー、慎ましい%CNAME("一人称")%とは大違いだぜ！」
		ELSE
			IF COND("打招呼前")
				PRINTFORMW 「ん？ ああ――――打招呼代わりかナ？」
				PRINTFORMW 「そんな寂しそうな顔してくれるなよ、これが素なんだから」
			ELSE
				;胖次沒穿
				IF EQUIP:胖次 == 0
					PRINTFORMW 「んふっ――――そんなに目を丸くしなくてもいいじゃないか♪」
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「きゃあっ！！ 何をするんですか、こ、この、へ、変態！」
						PRINTFORMW 「――――とまぁ、教室でやられたらこういう反応をするんだよネ」
						PRINTFORMW 「どうかな、こういう反応を求めてたんじゃない？」
					ELSEIF RAND:2
						PRINTFORMW 「おっと？ 卷起裙子ご苦労サマ」
						PRINTFORMW 「それで、見えた内衣はお気に召して頂けたかナ？」
					ELSE
						PRINTFORMW 「いやー、今日も欲望に忠実で何より」
						PRINTFORMW 「前輩としちゃ止めようって諭すべきなのかナーって思うんだけどネ」
					ENDIF
				ENDIF
			ENDIF
		ENDIF
	ENDSELECT
CASE "胖次ドーピング"
	;初回
	IF DEVENT(ARGS) == 0
		;自分の胖次
		PRINTFORMW 「あー、解る解る。結構ね、味とか想像して昂ぶるよね」
		IF COND("胖次ドーピング")
			PRINTFORMW 「本人の前でやるとか大したチャレンジャーだとは思うけれどサ」
		ELSE
			PRINTFORMW 「人前ではやらんけど」
		ENDIF
	ELSE
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW %CALLNAME:TARGET%は見てみぬフリをしている…
		ELSEIF COND("胖次ドーピング")
			PRINTFORMW 「ちなみに%CNAME("一人称")%って美味しそうなニオイする？」
			PRINTFORMW 「え、なに、%TEXTR("ちょっとエグみがある？/饐えたニオイがする？/酱と洗ってるかって？")%」
			PRINTFORMW 「歯に衣着せず滅茶苦茶失敬だなおい」
		ELSE
			PRINTFORMW 「ちょっとそれ貸してよー、ダメ？」
			PRINTFORMW 「ケチだなー%CNAME("主人")%」
		ENDIF
	ENDIF
CASE "裙下撮影"
	SELECTCASE STR:日常イベント名
	CASE "撮影失敗"
		PRINTFORMW 「盗撮なんかするな！網膜に焼き付けろ！！」
	CASEELSE
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「端的に言って最低だ。流石は%CNAME("主人")%♪」
			ELSEIF RAND:2
				PRINTFORMW 「これ見てシコシコしたりするの？ にひひっ♪ 聞かせろよー♪」
			ELSE
				PRINTFORMW 「良い絵は撮れたかナ、結構結構、撮られ甲斐があるもんサ♪」
			ENDIF
		ELSE
			IF RAND:2
				CALL PRINT_STRW, @"「きゃー_BH_ %CNAME("主人")%のえっちへんたーい非常食ー！ ――おっと本音が」"
			ELSE
				PRINTFORMW 「わざわざ撮る程のものかネ」
			ENDIF
		ENDIF
	ENDSELECT
CASE "股間撮影"
	SELECTCASE STR:日常イベント名
	CASE "撮影失敗"
		;PRINTFORMW
	CASE "阴部のチラ見せ撮影"
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW %CALLNAME:TARGET%は何も言わないまま、あくまで自然に見せつけている…
		ELSE
			PRINTFORMW 「サービスしてあげよう♪」
		ENDIF
	CASEELSE
		IF TALENT:恋慕 && TALENT:淫乱
			IF CEVENT("恋慕：ささくれ")
				CALL PRINT_STRW, "「――――っ_HH_ 早く撮って終わらせてくれない？」"
			ELSEIF RAND:2
				PRINTFORMW 「あ、ちょっと待って――にひひっ♪ これこれ、学生証♪」
				PRINTFORMW 「ちゃーんと顔も撮って貰わないと、ネ♪」
			ELSE
				PRINTFORMW 「早く終わらせないと疼いて来ちゃうだろーもうー」
			ENDIF
		ELSE
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「ははは、気持ち悪いな♪」
			ELSE
				PRINTFORMW 「それってアルバムとかに保存するのかい？」
				PRINTFORMW 「ふぅん――――ちなみに他の子のとかあるのかな」
				PRINTFORMW 「イヤイヤー他意は無いヨ？」
			ENDIF
		ENDIF
	ENDSELECT
CASE "内褲摄影"
	SELECTCASE STR:日常イベント名
	CASE "撮影失敗"
		;PRINTFORMW
	CASE "阴部のチラ見せ撮影"
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「嫌でも媚びるのがペットの作法なのサ」
		ELSE
			PRINTFORMW 「え、何か見えてる？ ナンダロナー♪」
		ENDIF
	CASEELSE
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「犬みたいな息遣いしてら。きもちわるーい、ははは」
		ELSE
			PRINTFORMW 「近すぎない？ ――――それが良いのか、ふぅん」
		ENDIF
	ENDSELECT
CASE "阴部摄影"
	SELECTCASE STR:日常イベント名
	CASE "撮影失敗"
		;PRINTFORMW
	CASE "阴部の見せつけ撮影"
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「これ以上は期待しないでくれよ、困るから」
		ELSE
			CALL PRINT_STRW, "「綺麗に撮ってネ_HH_」"
		ENDIF
	CASEELSE
		IF CEVENT("恋慕：ささくれ")
			PRINTFORML 「はっはっは」
			PRINTFORMW 「変に気持ち悪がるより笑着たほうが気分いいだろ」
		ELSEIF RAND:2
			PRINTFORMW 「にひひっ♪ 撮るか食い入るかはっきりしなさいヨ♪」
		ELSE
			PRINTFORMW 「手で眼罩とかする？ ――――顔は撮らない？ あっそ！ っちぇー」
		ENDIF
	ENDSELECT
CASE "性処理を頼んだ際の反応"
	;干劲がある場合
	IF COND("干劲性処理")
		SELECTCASE STR:PLAY内容
		CASE "口交"
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ELSE
				PRINTFORMW 「ni↘ひっひ、それでは失礼してお口で！」
				PRINTFORMW 「これは据え膳ですネ！ これで食わねば%CALLNAME:TARGET%が廃る！いっただっきまーす！」
				SIF RAND:3 == 0
					PRINTFORMW 「――――――――あのサ、食わずにしゃぶって给から酱と勃起させてくれない？」
			ENDIF
		CASE "乳交"

		CASE "Ｖ性交"

		CASE "Ａ性交"

		CASE "尿道性交"

		CASE "乳頭奸"

		ENDSELECT
	;何かしながらで良いならして给よって場合。何をしながらなのかは SAVESTR:夢中 で参照できる。
	ELSEIF COND("进行性処理")
		SELECTCASE STR:PLAY内容
		CASE "手淫"
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					IF RAND:3 == 0
						PRINTFORMW 「%CNAME("二人称")%、今忙しいって解って言ってるよね」
						PRINTFORMW 「――――片手貸してやるから、勝手にシコってなさい。邪魔するなよ」
					ELSEIF RAND:2
						PRINTFORMW %CALLNAME:TARGET%の怜悧な視線がこちらを射拔出。
						PRINTFORMW 「――――――――はぁ」
						PRINTFORMW しばらくして吐いた息と共に、好きに使えとばかりに片手が差し出された。
					ELSE
						PRINTFORMW 「今忙しいんだけれど何を――ああ、そういう――やってあげようか。ペット、だからね」
						PRINTFORMW 「意識を向けてる闲は無いから、痛くても知らないよ。その時は我慢してね」
					ENDIF
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「忙しくしている時に声掛けるなんて、%CNAME("主人")%もしかして雑に扱われたい領帯プだったりする？」
						CALL PRINT_STRW, @"「ni↘ひ♪ 冗談ですヨ～それじゃあ%CNAME("主人")%のお好きな雑な手交しちゃいますヨ～_HH_」"
					ELSEIF RAND:2
						PRINTFORMW 「なんと残念、可爱ペットは今忙しいのでした！！ しかしラッキーチャンスだぜ%CNAME("主人")%！！」
						PRINTFORMW 「なんと！ 今なら！ そんな可爱ペットの情緒の欠片もない作業手交がついてくる！！」
					ELSE
						PRINTFORMW 「も～%CNAME("主人")%のバカ！ 阿呆！ ちんちん！！」
						PRINTFORMW 「手を離したくない時に声を掛けるのはどうかと思うんですがどうですか！」
						PRINTFORMW 「まったく、この忠犬が%CNAME("主人")%への奉仕をながら作業でで済ますとでも？」
						PRINTFORMW 「済ましますが文句有ますか！？」
					ENDIF
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「片方で悪いけどワンコの手を貸してやろうじゃないか」
					PRINTFORMW 「猫の手よりは快適に使えるぜ、知らんけどネ」
				ELSEIF RAND:2
					PRINTFORMW 「悪いんだけどサ、今ちょっと立て込んでまして――――」
					PRINTFORMW 「ン、なんだい、適当でも良いって？ それなら手でするのも吝かではないけどサ」
				ELSE
					PRINTFORMW 「ヤれと言われりゃヤりましょう、なにせ%CNAME("一人称")%はペット！ ワンワン！」
					PRINTFORMW 「で、手で良いかナ？ いや～他使うの面倒だし」
				ENDIF
			ENDIF
		CASE "Ｖ性交"
			PRINTFORMW 「勝手におまんこ使っちゃって良いぜ、こっちゃ忙しいんですヨ」
			PRINTFORMW 「――あっ、喘ぐ位はサービスしてあげよう。なんてデキたワンコなんでしょう！」
			PRINTFORMW 「んっんんっ！ あーあー、ヨシ！ あん！あはん！うふん！いやーん！」
			PRINTFORMW 「えーっと次は――え、煩い？ そりゃあまた失礼しました」
		CASE "Ａ性交"

		CASE "尿道性交"

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

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

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

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

		CASE "乳交"

		CASE "Ｖ性交"

		CASE "Ａ性交"

		CASE "尿道性交"

		CASE "乳頭奸"

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

		CASE "Ｖ性交"

		CASE "Ａ性交"

		CASE "尿道性交"

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

	CASE "乳交"

	CASE "Ｖ性交"

	CASE "Ａ性交"

	CASE "尿道性交"

	CASE "乳頭奸"

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

		ELSE

		ENDIF
	CASE "手淫"
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「――――はぁ」
					PRINTFORML %CALLNAME:TARGET%は雑に扱っているにも関わらず、
					PRINTFORMW 固くなるばかりの%CALLNAME:MASTER%のモノを一瞥して呆れたように息を吐いた…
				ELSEIF RAND:2
					PRINTFORMW 「息が荒いよ、耳障りだ。果てそうなら尚の事、息を殺してくれ」
					PRINTFORMW 「ついでに息を引き取ってくれても良い。どちらにせよ、生き返るんだろうけど溜飲は下がるから」
				ELSE
					PRINTFORMW 「たかが手でされて、猿みたいに腰を浮かすのをやめてくれないか」
					PRINTFORMW 「掌でも%CNAME("二人称")%に欲情されるのは気分が悪い」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「雑にする、とは言ったけどネ」
					CALL PRINT_STRW, "「オスの气味プンプン振りまいてサ_HH_ なんとまあ悪いおちんちんじゃない_HH_」"
					PRINTFORMW 「これじゃ作業に集中できないのもしょうがないヨ、まったくサ♪」
				ELSEIF RAND:2
					PRINTFORMW 「やっべ、力加減とか考えてたら作業あんまり進んでねえや」
					PRINTFORMW 「お、そっちはイけそう？ へぇ、不平等だなーこれ！ うーわんわん！！」
				ELSE
					PRINTFORMW 「へいへ～い痒いトコロは有ませんか～？ ってネ♪」
					PRINTFORMW 「ふふ～ん♪ 一流のペットは雑の中に心遣いも欠かさないのサ！ わんわん！」
					SIF RAND:2
						PRINTFORMW 「っていうか冷静に考えて痒いちんちんって危なくないか。 痒くないよね？ 大丈夫だよね？ ね？」
				ENDIF
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「ふんふ～ん♪ ふふふ～ん♪ ふん！！――あ、ごめんネ」
				PRINTFORMW 「すんごい青い顔してら、痛かったネ？」
			ELSEIF RAND:2
				PRINTFORMW 「おーおー、イケそうかい？ ふんふん♪ そりゃあ良かった♪」
				PRINTFORMW 「こっちも作業が捗って一石二鳥だネ♪」
			ELSE
				PRINTFORMW 「思ったより早く終わっちまったナ、もう片手の勤務状況はっと――」
				PRINTFORMW 「――も～い～か～い？ ま～だ～だよ？ ふむふむ、残業手当あるかナ」
			ENDIF
		ENDIF
	CASE "Ｖ性交"

	CASE "Ａ性交"

	CASE "尿道性交"

	ENDSELECT

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

	CASE "舐陰莖"

	CASE "口交"

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

		ELSE

		ENDIF

	CASE "Ａ性交"

	CASE "尿道性交"

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

	CASE "舐陰莖"

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

		ELSE

		ENDIF

	CASE "Ａ性交"

	CASE "尿道性交"

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

		ELSE

		ENDIF
	CASE "舐陰莖"

	CASE "口交"

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

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

			CASE "Ａ性交"

			CASE "尿道性交"

			ENDSELECT
		ENDIF
	ENDSELECT
;主人公のスマホに一緒にお昼食べようよと邀请際に送る連絡文です
;ここで TFLAG:地の文スキップ = 0 とすると下の"お昼ご飯のお誘い"での地の文をカットできる
CASE "お昼ご飯のお誘い"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 『イヤな女からのお誘い、受けてくれるかな』
	ELSE
		PRINTFORMW 『お昼でも一緒にどうかな』
		PRINTFORMW 『教室だとどうも息が詰まっちゃうからさ』
	ENDIF
;実際に二人昼食をとっている時です
CASE "一緒にお昼ご飯"
	IF CEVENT("昼食：吃飯あれこれ") == 0
		PRINTFORMW 「お待たせしました」
		PRINTFORMW 待ち合わせ場所に現れたのは……知ってるけど知らない少女だった。
		PRINTFORMW 「あら、酷い人。ふふ、忘れてしまったのかしら」
		PRINTFORMW クスクスと笑う彼女の顔には見覚えがある。その乱ついた髪にも、声にも。
		PRINTFORMW しかしその所作にはとんと覚えがない。正に別人だ
		PRINTFORMW 「老师のウケが良いんだもの。これでも優等生なのよ？」
		PRINTFORMW 嫋やかな、しかし狡猾な笑みの中には確かに%CALLNAME:TARGET%らしさがあるが…
		PRINTFORMW 「誰に見られているか解らないじゃない。悪いのだけれど我慢して貰えないかしら」
		PRINTFORMW 彼女なりの処世術というのならば仕方ない。
		PRINTFORMW 「ふふ、有がとう。お詫びに是、これ」
		PRINTFORMW ニコニコと張り付いた笑顔を見せて差し出したのは可愛的クロスに包まれた小小的弁当箱だった。
		PRINTFORMW 中を開けてみると油炸物に野菜と中々豪華な品揃えだ。
		PRINTFORMW 「作ったのは良いけのだけれど……%CNAME("一人称")%は食べないから」
		PRINTFORMW それならば有がたく頂くことにした%CALLNAME:MASTER%は、一口目を頬張ってその美味しさに感嘆の息を漏らす。
		PRINTFORMW 「怪しまれない為にね、クラスの子にも味見してもらったり、色々頑張ってるの」
		PRINTFORMW その言葉の街道、何処に出しても恥ずかしくない弁当だ。
		PRINTFORMW わざわざ保温まで考えられているらしくまだ温かいご飯に箸が進む。
		PRINTFORMW そうして油炸物を美味しく咀嚼している間に、はたとあることに気がついた。
		PRINTFORMW 「あら……もしかして、材料とか気になる？」
		PRINTFORMW 微笑を浮かべる%CALLNAME:TARGET%。
		PRINTFORMW 「実は二丁目の田中桑――――って、おい、冗談だぜ。吹き出すなよばっちぃな」
		PRINTFORMW 文字街道、冗談で済まされる範囲のジョークではない。
		PRINTFORMW 「あーあ、勿体ない」
		PRINTFORMW %CALLNAME:MASTER%が吹き出して地面に落ちた肉を、%CALLNAME:TARGET%は拾って口の中に含む。
		PRINTFORMW 「んっ、うぅっ、うぇ゛っ――ん、っく」
		PRINTFORMW 何度か咀嚼して、どんどんんと顔色が悪くなっていく間にようやく彼女は口の中のものを嚥下した。
		PRINTFORMW 「はぁ――はは、不味い、佳肴大人」
		PRINTFORMW 表情は笑着いるが、今にも倒れそうな程真っ青な顔で彼女は呟く。
		PRINTFORMW 地面に落ちたとは言え、たったそれだけだ。彼女の反応は異常に片足を突っ込んでいると言って良い。
		PRINTFORMW 「なんだよ、%CNAME("一人称")%なんかを見るより早く食べないと昼休みがどんどん無くなってくぜ」
		PRINTFORMW そんな%CALLNAME:MASTER%の疑問の目を誤魔化すように肩をすくめてヘラヘラと笑う彼女。
		PRINTFORMW 「――せっかく作ったんだから、ゆっくり味わって完食して欲しいな」
		PRINTFORMW 結局話を掘り下げる前に、彼女に急かされるまま弁当をかきこんだ…
		CALL SET_CEVENT, "昼食：吃飯あれこれ"
		CFLAG:食欲 += 5
	ELSEIF CEVENT("昼食：実際のトコロ") == 0 && CFLAG:昼食回数 >= 5
		PRINTFORMW 「待たせちゃったかしら？」
		PRINTFORMW 待ち合わせ場所に現れた%CALLNAME:TARGET%は今日も弁当を%CALLNAME:MASTER%へと差し出す。
		PRINTFORMW %CALLNAME:MASTER%もまた自然に受け取って舌鼓を打ち始めるのだが、今日は一つ疑問が浮かんだ。
		PRINTFORMW 思えば彼女がこの弁当を食べているところを見たことがない。そもそも、人类以外を彼女は食べられるのだろうか。
		PRINTFORMW 「食べないのか……ですって？」
		PRINTFORMW その質問に、彼女は叉叉が悪そうに口を引き結ぶ。
		PRINTFORMW 「そうね食べられない、が正しいのかしら」
		PRINTFORMW 食べられないとはどういうことだろうか。
		PRINTFORMW 「口にはできるわ。噛める、飲み込める。そう、そこまでは良いの」
		PRINTFORMW 「吐いちゃうのよ。强行胃の奥に押し込めても。おぇーってね」
		PRINTFORMW 「どんなにいっぱい食べても駄目なの。食べた分だけ全部吐いちゃう」
		PRINTFORMW 「それに味もとんでもなく酷く感じるわ。どれもこれも、本当に、食べられたモノじゃない味」
		PRINTFORMW 「だから、擬態の為に作ったこういうのはクラスの人達にお下摆分けしてるの」
		PRINTFORMW 「遠慮なく食べちゃって。大丈夫、%CNAME("一人称")%用には作ってないから美味しいはずよ」
		PRINTFORMW %CNAME("一人称")%の味見はあてにならないけれどね。そう付け加えた彼女はやはり戯けたように嗤うのだった…
		CALL SET_CEVENT, "昼食：実際のトコロ"
	ELSEIF CEVENT("恋慕：ささくれ")
		IF RAND:3 == 0
			PRINTFORMW 「嫌いなのに態々便当を渡してくる理由？」
			PRINTFORMW 「何、かしら。解らないわ。なんとなく、とかそういうものなのかもしれないわね」
			PRINTFORMW 「安心して、%CNAME("二人称")%の事は酱と嫌いだから」
		ELSEIF RAND:2
			PRINTFORMW 「ちょっと、はぁ……口元、酷いことになってる。そんなにかき込まなくても逃げたりしないわよ」
			PRINTFORMW 「こっち向いて、ティッシュ……是。少しは落ち着きなさい、兒童じゃあるまいし」
		ELSE
			PRINTFORMW 「見ているだけよ。気にしないで頂戴。ただ、残したらもっと嫌いになれるから監視しているだけ」
			SIF RAND:2
				PRINTFORMW 「……ねぇ、美味しい？ …そう、有がとう」
		ENDIF
	ELSEIF TALENT:恋慕
		;イベントを踏んでいたら優先的に入る
		IF CEVENT("昼食：実際のトコロ") && RAND:3
			IF RAND:3 == 0
				PRINTFORMW 「一緒に食べられたら、食べさせ合いっこみたいなことも出来たのかしら」
				PRINTFORMW 「……くすくす♪ そうでなくても食べさせることくらい出来るわ。是、あーん♪」
			ELSEIF RAND:2
				PRINTFORMW 「ねぇ、その唐油炸美味しい？ ……あんまり美味しそうに食べるから、気になっちゃって」
				PRINTFORMW 「一口……いや、还是算了わ。吐いちゃうのは勿体ないし、主義に反するもの」
			ELSE
				PRINTFORMW 「…………え、なに？ あ、ああ。何か我慢してるみたい、か」
				PRINTFORMW 「そうね、馬鹿な恋人同士みたいにじゃれあいながらもっと打情骂俏しているところを見せつけたい」
				PRINTFORMW 「……なーんて、そんな冗談を考えただけよ。本当に、冗談なんだから」
			ENDIF
		ELSEIF RAND:3 == 0
			PRINTFORMW 「見てるだけでお腹一杯だから気にしないで良いわ。良い食べっぷりね」
			IF CFLAG:食欲 >= 10 && RAND:2
				PRINTFORMW そう微笑む彼女とは裏腹に、彼女のお腹はぐぅうと空腹を伝えてくる。
				PRINTFORMW 「ああ、はは……今のは聞かなかったことにしてくれる？ ちょっと、恥ずかしい」
			ENDIF
		ELSEIF RAND:2
			PRINTFORMW 「ふふっ、にひひっ――♪」
			PRINTFORMW %CALLNAME:MASTER%が吃便當様子を%CALLNAME:TARGET%は楽しそうに眺めている…
		ELSE
			PRINTFORMW 「こらこら、がっついちゃ駄目よ。喉に詰まらせたら%CNAME("二人称")%でも苦しいでしょう？」
			PRINTFORMW 「是、お水。くす♪ ……そんなに美味しい？ それは良かった。本当に作り甲斐がある人ね」
		ENDIF
	ELSE
		IF RAND:3 == 0
			PRINTFORMW 「今日の便当は普通なのか――ふふ、どうだと思う？」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「――――あら、失礼。視線が気になるかしら」
			PRINTFORMW 「美味しそうに食べてる%CNAME("二人称")%も、美味しそうだなぁ――なんて、ね。冗談よ、冗談」
		ELSE
			PRINTFORMW 「ふー、こういう擬態も楽じゃないのよ、どこに人の目があるかわからないでしょう」
			PRINTFORMW 「以前はこの角色でずっと通してたからそうでもなかったのだけれど」
			PRINTFORMW 「最近は、ね。部活の方で素の方も慣れちゃったから、肩が凝ってしまうのよね」
		ENDIF
	ENDIF
	CFLAG:昼食回数 ++
;部室で二人きりの時に坐在旁邊際のセリフです
CASE "二人きり：坐在旁邊"
;部室で二人きりの時にＨに邀请際のセリフです
CASE "Ｈに邀请"
CASE "二人きり：Ｈの誘いに胖次条件で回应"
CASE "二人きり：Ｈの誘いに回应"
CASE "二人きり：Ｈの誘いを断った"
ENDSELECT

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

MAIL_BODY =
;メッセージ本文
SELECTCASE ARGS
CASE "ヌード自撮り"
	MAIL_BODY = ペットの健康診断のお時間DEATH！
CASE "阴部自撮り", "阴茎自撮り"
	MAIL_BODY = これすごい裏垢ってヤツっぽくない？
CASE "胸部自撮り"
	MAIL_BODY = 光らない！鳴らない！DX胸部！
CASE "今年の泳装自撮り"
	MAIL_BODY = 必殺！！悩殺！！大殺界！！
CASE "学校指定の泳装自撮り"
	MAIL_BODY = たまにはこういうので躾てみるかい？
CASE "体操服自撮り"
	MAIL_BODY = どうだ、男子の視線をクギヅケにするこのBodyは！
CASE "胸罩自撮り" ,"胖次自撮り"
	MAIL_BODY = ほ～ら餌だぞ～
CASEELSE
	MAIL_BODY = いぇ～い
ENDSELECT

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

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

SELECTCASE ARGS
;你を週末约会に誘った
CASE "约会のお誘い"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「週末の息抜きを手伝ってくれないかい？」
		PRINTFORMW 「何を隠そうトモダチが少なくてネ、いや、困った」
		PRINTFORMW 「嫌いなヤツの手も借りたいのサ」
	ELSE
		PRINTFORMW 「週末だけれど、空いてるかい？」
		PRINTFORMW 「んふ、约会だよ、约会。一緒にサ」
		PRINTFORMW 「散歩も飼い主の義務だろう？」
	ENDIF
CASE "约会のお誘い：結果"
	;约会決定！
	;自発的に约会の做便当给よ！って場合はCALL SET_CEVENT, "约会の便当"としてください。
	IF COND("约会的约定")
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「そうかいそうかい、そうだよネ。じゃあこの話はお流れ――」
			PRINTFORMW 「いや、待った。本当に？ マジか？それは、想定外だ」
			PRINTFORMW 「――――にひ、にひひっ♪ 仕方がないナ、OKされちゃったら無碍にも出来ないからネ♪」
		ELSE
			PRINTFORMW 「にひっ♪ じゃあ決まりだ。楽しみにしておこう」
		ENDIF
	;你に保留されてしまった
	ELSE
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「そうかいそうかい――――ま、この話は流してくれて良いよ」
		ELSE
			PRINTFORMW 「あらら、都合が悪かったかい？」
			PRINTFORMW 「それとも、取って喰われるとでも――――思った？」
			PRINTFORMW 「にひひっ♪ さて、どうだろうね」
		ENDIF
	ENDIF
;你から週末约会に誘われた
;自発的に约会の做便当给よ！って場合はCALL SET_CEVENT, "约会の便当"としてください。
CASE "约会に誘われた"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「倒錯にも程がないかナ。こんなに嫌いだって言ってるのに」
		PRINTFORMW 「ちっちっちっ――――はぁ、良いさ良いさ。付き合って差し上げますヨ」
	ELSE
		PRINTFORMW 「お？ なに、週末に？」
		PRINTFORMW 「んー、今週は――っと。うん、大丈夫だね」
		PRINTFORMW 「良いよ。楽しみにしておきたまへ♪」
	ENDIF
;你に便当を作ってきてと頼まれた
CASE "便当を頼まれた"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「それは――――駄目だ。%CNAME("一人称")%は%CNAME("二人称")%が嫌いなんだから」
	;CALL DEL_CEVENT, "约会の便当"
	ELSEIF TALENT:恋慕
		PRINTFORMW 「ほっほー、便当を？ %CNAME("一人称")%に？」
		PRINTFORMW 「にひひっ♪ まかせたまへよ！ 愛情其他諸々いーっぱい突っ込んでやるから、覚悟しろよー！」
	ELSE
		PRINTFORMW 「%CNAME("一人称")%に便当をお願い、ね――――」
		PRINTFORMW 「にひっ、怖いもの知らずだね%CNAME("二人称")%」
		PRINTFORMW 「ＯＫ、腕によりをかけてあげようじゃないか」
	ENDIF
	;これのコメントアウトを取下と、便当を作ってあげません

;你から约会当日にいきなり誘われた
;自発的に约会の做便当给よ！って場合はCALL SET_CEVENT, "约会の便当"としてください。
CASE "邀请去约会"
	;同居していない相手を誘った時
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「へぇ、お出かけ――――それ、今からだったりする？」
		PRINTFORMW 「ふぅん、良いけれどね。コッチの都合を考えない辺り最高だ」
	ELSEIF COND("同居中") == 0
		IF RAND:2 == 0
			PRINTFORMW 『えー、今から？ はー、こりゃまた唐突だ』
			PRINTFORMW 『良いけど合流まで少し時間が掛かるぜ、なんせ今ちょっとかいた――――』
			PRINTFORMW 『ま、少し待ってろ。お浴室も入らなきゃいけないからサ』
		ELSE
			PRINTFORMW 『是是、忠犬ですからね、突然のお誘いにも尾巴を振りますワヨ』
			PRINTFORMW 『でもご褒美くらいは期待してもいいよね？ わんわん♪』
		ENDIF
	ELSE
		PRINTFORMW 「外に？ まー、いっか。どうせ闲していたところだ」
		PRINTFORMW 「部屋で筋トレしてるよりはマシな约会を期待しようじゃないか♪」
	ENDIF

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

;地の文はpartnerが遅れて現れる展開になっています
;地の文が用意されているので、轻轻地１行程度の反応で良いと思います
CASE "待ち合わせ"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「あー遅れたことは、ゴメン――っていうか、サ」
		PRINTFORMW 「あー、あー、なんか、こう。なんだろうネ」
		PRINTFORMW 「なんでもない！ クッソもう今日は頭空っぽにしてやるよ！」
	ELSEIF COND("同居中") == 0
		IF RAND:3 == 0
			PRINTFORMW 「おっまたせー！ %CNAME("二人称")%の可爱わんこのご到着だ」
		ELSEIF RAND:2
			PRINTFORMW 「ごめんごめん、気合い入れておめかししてきたら遅れちゃったよ」
			PRINTFORMW 「どこが変わってるか解る～？ わっかるかなー？」
			IF TALENT:恋慕
				PRINTFORMW 「ふふっ♪ 约会中に気づいたら千裕酱ポインツ進呈してあげようじゃないか♪」
			ELSE
				PRINTFORMW 「正解は別におめかししてない、でしたー！ 是じゃ行こー」
			ENDIF
		ELSE
			PRINTFORMW 「行く場所は決まってるかい？」
			SIF TALENT:恋慕
				PRINTFORMW 「ま、決まって無くても一緒に歩きながら決めようじゃないか」
		ENDIF
	ELSE
		IF TALENT:恋慕
			PRINTFORMW 「やーっと見つけた。%CNAME("主人")%もうちょっと目立つ格好しないかい？」
		ELSE
			PRINTFORMW 「ごめんよ、ちょっと処理に時間が掛かっちゃって」
			PRINTFORMW 「――――なんの処理かは乙女の秘密ってトコで♪」
		ENDIF
	ENDIF
	;地の文を自己書きたい場合にはコメントアウトを外してください
	;TFLAG:地の文スキップ = 1

;地の文が用意されているので、轻轻地１行程度の反応で良いと思います
CASE "约会本番"
	SELECTCASE SAVESTR:约会
	CASE "去买泳衣"
		IF RAND:3 == 0
			PRINTFORMW 「泳装かい？ 良いけど、あんまりお値段張ると困っちゃうなー」
		ELSEIF RAND:2
			PRINTFORMW 「へー、泳装買いに行くってことは、海にでも行くのかな？」
		ELSE
			PRINTFORMW 「ははーん、%CNAME("一人称")%の魅惑のボディに似合うのを見繕ってくれるわけだ！」
			PRINTFORMW 「――――おい、触れろよ。なんか恥ずかしいだろう。おいってばサ」
		ENDIF
	CASE "散歩"
		IF RAND:3 == 0
			PRINTFORMW 「そう言えば最近この辺で行方不明者が出たらしいねー」
			PRINTFORMW 「――――言っておくけど、%CNAME("一人称")%じゃないぞ」
			SIF TALENT:恋慕 == 0
				PRINTFORMW 「%TEXTR(@"%CNAME("一人称")%がやったのは別の地区だからネ/もっと擅長くやるからサ")%」
		ELSEIF RAND:2
			PRINTFORMW 「こらこら、ちょっと足が早いぞ」
			PRINTFORMW 「折角のお散歩なんだからもう少しゆっくり歩こうじゃない」
			SIF TALENT:恋慕
				PRINTFORMW 「ほら、お手をどうぞ。これなら嫌でもゆっくり歩けるだろう？」
		ELSE
			PRINTFORMW 「長閑なもんだなー」
			PRINTFORMW 「驚くかも知れないけれど、こういう空気も嫌いじゃないんだよね」
			PRINTFORMW 「くすっ――――本当に驚いた顔をするやつがあるかい、まったく」
		ENDIF
	CASE "尋訪美食"
		IF RAND:3 == 0
			PRINTFORMW 「それ、美味しいかい？ そうかそうか」
			CALL PRINT_STRW, "「残すなよ_BH_」"
		ELSEIF RAND:2
			PRINTFORMW 「一口貰おうか。いいや不味いんだけどね、擬態は必要だから」
			PRINTFORMW 「んっ――――ぐっ、うぅ、ごくっ――――ご馳走様」
		ELSE
			PRINTFORMW 「うぅ――――ごめんよ。少し気分が悪くなってきた」
			PRINTFORMW 「いや、残さない――――全部食べるから、置いといてくれ」
		ENDIF
	CASE "逛街"
		IF RAND:3 == 0
			PRINTFORMW 「购物？ 良いとも良いとも、犬のようにお供しましょう♪」
		ELSEIF RAND:2
			PRINTFORMW 「おーい、買い忘れあるよー。まったく、酱と買うものはメモっときなさい」
		ELSE
			PRINTFORMW 「さっきの店の方がお買い得だったんじゃない？ ま、いっか」
		ENDIF
	CASE "去水族馆"
		IF RAND:3 == 0
			PRINTFORMW 「お！ スタンプラリーだって。良いね、ちょっと面白そうじゃない。やってみようよ」
		ELSEIF RAND:2
			PRINTFORMW 「こういうの見て美味しそうだなーって考えたりする？ しない？」
		ELSE
			PRINTFORMW 「%TEXTR("わ/おー/おっ")%、見てよ、マンボウが泳いでる」
			PRINTFORMW 「――話によるとサ、マンボウってしこたま産まれてしこたま死ぬらしいじゃない」
			PRINTFORMW 「生き残ったのにこんなトコに入れられてさ、狭窄世界で――なんだか可哀想っていうか、ははっ」
			PRINTFORMW 「――――何でも無いよ。何でも無いったら。次に行こう」
		ENDIF
	CASE "去游乐园"
		IF CEVENT("初遊園地") == 0
			PRINTFORMW 「ほー、こんな大入りの場所に連れてくるなんて、%CNAME("二人称")%もチャレンジャーだね」
			PRINTFORMW 「はぐれないように気を付けろよ。犠牲者が出ないように、サ♪」
			SIF TALENT:恋慕
				PRINTFORMW 「――――いや、冗談だから帰ろうとするのはよそう、良い子にしてるから！ 結構楽しみなの！！」
			CALL SET_CEVENT, "初遊園地"
		ELSEIF TALENT:恋慕
			IF RAND:3 == 0
				PRINTFORMW 「右よーし、左よーし！」
				PRINTFORMW 「何してるかって？ そりゃあモチロン安全確認ですヨ」
				PRINTFORMW 「%TEXTR(@"いつ女の子引っ掛けるか解らないからネ、%CNAME("二人称")%/人混みはキケンだぜ？ ほら、%CNAME("一人称")%忠犬だからサ")%」
			ELSEIF RAND:2
				PRINTFORMW 「おーおー、絶景絶景。お腹が――いや、腕が鳴るじゃないか」
				PRINTFORMW 「さ、どれから乗る？ ――――絶叫系は勘弁しろよ、マジで」
			ELSE
				PRINTFORMW 「そうそう、お昼は園内のこのお店なんてどうだい%CNAME("主人")%。なんでも大層美味いそうじゃないか」
				PRINTFORMW 「え、いやいや、%CNAME("一人称")%は食べないぜ？ 美味いかどうかは言って聞かせておくれヨ♪」
			ENDIF
		ELSE
			IF RAND:2
				PRINTFORMW 「にひっ♪ またこんなトコに連れてくるなんて、追いかけっこがお気に召したのかナ？」
			ELSE
				PRINTFORMW 「あら不要よりどりみどり！ いえアトラクションの話ですヨ？」
			ENDIF
		ENDIF
		PRINTFORML
		PRINTFORML
		IF TALENT:恋慕
			PRINTFORML さて、遊園地来了からにはアトラクションを楽しまねばなるまい。
			PRINTFORML どこを重点的に回ろうか？
			CALL PRINT_SELECT, "とりあえずジェットコースター/ここは風景を楽しむ系/目についたものに"
			IF RESULT == 0
				IF CEVENT("初ジェットコースター") == 0
					PRINTFORMW 「%CNAME("主人")%ヨ！%CNAME("主人")%！ どこに向かう行列だいこれはサ！」
					PRINTFORMW 「まさかとは思うけどこの先は上でガンガン走ってるクッソ早い乗り物だったりする？」
					PRINTFORMW 「不会ネ？ ネ？ おい、こっち見ろよ！ ねぇってば！ ああ畜生！ 完全に乗る気だ！！」
					PRINTFORMW 「乗らない。乗らないからな。見てみろあのスピード、人が乗るものじゃない」
					PRINTFORMW 「乗らないってば！ 引っ張るな！ 手を！ こらっ！ あっ、あぁっ、やだっ、今日はとっても強引！」
					CALL SET_CEVENT, "初ジェットコースター"
				ELSE
					PRINTFORMW 「ははは、%TEXTR(@"いつまでもコレが苦手だと思わないでくれよ%CNAME("主人")%ヨ/いいぜやってやる。可愛いペットナメんなよ/決戦だぜ、決着を付けようか")%」
					PRINTFORMW 「%TEXTR("こうやって目をつぶれば/ははは、はははははは/こんなものはね、所詮兒童騙しなんですよ/心頭滅却って知ってるかい？ そういうことさ")%――――%TEXTR("うぎゃぁああああああ/ひぃいいいいいいいい/是無理ぃいいいいぃ")%！！」
					IF RAND:3 == 0
						PRINTFORMW 「%TEXTR("はぁああぁ一回転！そういうのもある！/一回転する！？")% %TEXTR("しちゃう！？/やぁめようよぉそういうのぉ！")% 温柔的してっ、あっ、あっ！」
						PRINTFORMW 「%TEXTR("うっひょぉおおおおお！！/へぇえええええい！！/もぉおおおお！！")% %TEXTR("へっへっへっへ/ふへっふへへぇ/うっひゃっひゃっひゃ")%！！ %TEXTR("ひ、ひひぃ/ふ、ふひっぃっ/诶嘿嘿ふふ")%――――%TEXTR("ふぅ/はへぇ/はぁ/こふっ")%」
						PRINTFORMW 「――――――はっ、%TEXTR("悪い夢だった/終点ですかっ/終わり/終わった")%？ %TEXTR("違うねぇ/まだだねぇ/はぁん終わってないねぇ")%！！ %TEXTR("悪夢続行だねぇ/もう一回逝けるねぇ/まだ風を感じるねぇ")%！！」
					ELSEIF RAND:2
						PRINTFORMW 「%TEXTR("はぁやい/はえぇ/速い")%%TEXTR("はぁやい/はえぇ/速い")%%TEXTR("マジはぁやい/ゲロはえぇ/クソ速い")%！！ %TEXTR("速すぎんだろ加減しろ馬鹿/火精灵より速いんだよ馬鹿")%！！ %TEXTR("違反切符切られてぇのか泣くぞぉ/目ぇ瞑らせろよぉ/チビるぞやんのかコラァ")%！！」
						PRINTFORMW 「%TEXTR("うわぁ曲がれないよぉ！/うわぁごめんなさい！ 道歉からスピード落としてぇ！！")% %TEXTR("こんなスピードで乗り物はそんな急カーブ曲が/脱線するぅ！そのカーブは脱線")%――」
						PRINTFORMW 「%TEXTR("曲がれたぁ/是曲がったぁ/ぐぶっ")%！！ %TEXTR("曲がれたねぇ/曲がれるもんだなぁ")%！？ でも次%TEXTR("发卡/急カーブだ/の先が見えない")%よぉ！？%TEXTR("今度こそ死ぬぜぇ/遺書書いてないよぉ")%！？」
					ELSE
						PRINTFORMW 「はぁあああああ！ %TEXTR("死ぬねぇ！/逝けるねぇ/駄目だぁ！/ふざけんなよぉ")% %TEXTR("すり潰されるよぉ/死んじゃうねぇ/死んじゃうよぉ")%！！ %TEXTR("この速度は光になれるねぇ/バターになっちゃうぅ/")%！！」
						PRINTFORMW 「はっはっはひぃっ！！ ひぃいいぃ！！ ――――生きてる？ %CNAME("一人称")%%TEXTR("バターになってない？/光になってない？/生きてる？")%」
						PRINTFORMW 「あ、生きてる！ はっはっはっ！！ %TEXTR("はひっ！/でも終わってねえやぁ/止まれよぉお！")%！ ははぁっ！！ はっ――――%TEXTR("ふふ/あ/はぁ")%、%TEXTR("何か漏れた/何か泣けてきた/おぇっ")%」
					ENDIF
					PRINTFORMW 「――――――%TEXTR(@"%CNAME("一人称")%の骨は%CNAME("二人称")%の墓に一緒に埋めといて/ちょっと内衣替えてくる/知らないのに懐かしい顔に会ったよ、忘れたけど/いいかい、%CNAME("一人称")%は負けてない。ちょっとチビッただけサ/おっと握った手を離すなよ、泣くぞ")%」
					PRINTFORMW ジェットコースターから降りた直後、%CALLNAME:TARGET%は足を震わせたまま虚空を見つめてそう呟いた…
				ENDIF
			ELSEIF RESULT == 1
				IF RAND:3 == 0
					PRINTFORMW 観覧車に乗り込んだのに%CALLNAME:TARGET%はこちらをずっと見てニヤニヤしている…
					PRINTFORMW 「―――ん？ 外を見なくて良いのかって？」
					PRINTFORMW 「うーん今はネ、にひひっ♪ どちらかと言えば%CNAME("二人称")%を見てたいのサ」
				ELSEIF RAND:2
					PRINTFORMW %CALLNAME:TARGET%と観覧車に乗り込んだ…
					PRINTFORMW 「へー、流石このために作られただけの事はあるネ、良い眺めじゃないか」
					PRINTFORMW 「――――人がゴミのようだ！ いや、それは勿体ないな。言っとかなきゃいけない気がしたけど取り下げ取り下げ」
				ELSE
					PRINTFORMW %CALLNAME:TARGET%と遊覧船に乗り込んだ…
					PRINTFORMW 「ほうほう、いやー船から見る景色っていうのも中々捨てたモンじゃないネ」
					PRINTFORMW 「あ、%CNAME("主人")%、そこ気を付けろよ多分水が――ハネたな。ふふ、ずぶ湿的じゃないか」
				ENDIF
			ELSE
				IF RAND:4 == 0
					PRINTFORMW %CALLNAME:TARGET%と一緒に小小的ふれあい動物園へと足を運んだ…
					PRINTFORMW 「%TEXTR(@"――――困った、寄り付かない。こうなったら%CNAME("一人称")%が犬になるしかないネ！ワンワン！！/まったく寄り付かん。肝っ玉の小さいワンコどもだぜ/嫌がる！鳴く！暴れる！逃跑！ いや～嫌われたもんだネ～/なになに、%CNAME("一人称")%のせいで動物が寄ってこない？ しっかたないな～可愛いペットを撫でることで満足しておくれヨ")%」
				ELSEIF RAND:3 == 0
					PRINTFORMW %CALLNAME:TARGET%と一緒にミラーハウスへと足を踏み入れた…
					PRINTFORMW 「%TEXTR(@"%CNAME("主人")%ヨ、そっちは鏡に映ったただの可愛い千裕酱の鏡像だ。超可愛い有能ペットの千裕酱はコッチだぜ♪/おー、ここまで鏡尽くしだと流石にクラクラしちゃうネ/あいった、頭ぶつけちった――おい、何ぼーっとしてるのサ、撫でておくれ――あ、これ鏡像か")%」
				ELSEIF RAND:2
					PRINTFORMW %CALLNAME:TARGET%と一緒に咖啡罩杯に乗った…
					PRINTFORMW 「%TEXTR(@"にひひっ♪この程度で狂う程ヤワな三半規管してないぜ？ おいやめろ速くするな、速くするのは別だ！！/その手を離しなさい%CNAME("主人")%、良い子だから！回すな！もうクッソ速いんだよ！！あぁやっ、いやっ！バターになっちゃう！/ふふふ、ジェットコースターより幾らもマシだけどさ、調子に乗って回し過ぎるなよ。泣くぜ、マジで")%」
				ELSE
					PRINTFORMW %CALLNAME:TARGET%と一緒に恐怖屋敷へと足を踏み入れた…
					PRINTFORMW 「%TEXTR(@"うーん、メイクさえなければ美味しそうなのにナ/へぇぇい！！ ――いや、怖いんじゃないんだ、惊嚇しただけでサ、ホントホント！/冷静に考えると%CNAME("一人称")%がここに居るのが一番のホラーじゃないかナ")%」
				ENDIF
			ENDIF
		ELSE
			PRINTFORMW ギラギラとした目で周囲を観察する%CALLNAME:TARGET%が気が気でない…
			PRINTFORMW ロクにアトラクションを楽しめなかった…
		ENDIF
	CASE "去电影院"
		IF RAND:3 == 0
			PRINTFORMW 「ス阴蒂ーンで見るのって一味違うからね。ふふ♪ 楽しみだな」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「売店も思ったより繁盛してるんだな」
			PRINTFORMW 「買うのは良いけど酱と映画にも集中するんだよ？」
		ELSE
			PRINTFORMW 「映画が始圆圈直前ってワクワクしない？ 隣の人の顔見ちゃったりとかサ」
			PRINTFORMW 「美味しそうだなーとか――思、わないよね。冗談だよ、ジョーダン」
		ENDIF
	CASE "去图书馆"
		IF RAND:3 == 0
			PRINTFORMW 「～♪」
			PRINTFORMW 「ん？ ふふ、どうしたんだい？何か面白色本でも見つかった？」
		ELSEIF RAND:2
			PRINTFORMW 「シー」
			PRINTFORMW 「後で相手をして给から今はお静かに、ネ」
		ELSE
			PRINTFORMW 「はぁ――――あぁ、いや、ね」
			PRINTFORMW 「読んでた本の続きが借りられちゃってて、困ったもんだ」
			PRINTFORMW 「ところで%CNAME("二人称")%の読んでたそれ、最終巻だけ借りられてたぜ」
		ENDIF
	CASE "赏花"
		PRINTFORMW
	CASE "去游泳"
		PRINTFORMW
	CASE "爬山"
		PRINTFORMW
	CASE "赏红叶"
		PRINTFORMW
	CASE "滑雪"
		PRINTFORMW
	CASEELSE
		PRINTFORMW
	ENDSELECT

	;地の文を自己書きたい場合にはコメントアウトを外してください
	;TFLAG:地の文スキップ = 1
CASE "约会中の買食物"
	SELECTCASE SAVESTR:约会
	CASE "去电影院"
		;何を買ったかはSTR:選択したもの で分岐可能
		SELECTCASE STR:選択したもの
		CASE "爆米花"
			PRINTFORMW
		CASE "吉事果"
			PRINTFORMW
		CASE "热狗"
			PRINTFORMW
		ENDSELECT
	ENDSELECT
CASE "手をつなぐ"
	IF TALENT:恋慕
		PRINTFORMW 「お――にひひっ♪」
	ELSE
		PRINTFORMW 「ん？ ――はぐれませんよ、わんわん♪ ってね」
	ENDIF
CASE "手をつながない"
	IF TALENT:恋慕
		PRINTFORMW 「むー、君くぅーん」
	ELSE
		PRINTFORMW 「小腹空いたなー」
	ENDIF
;泳装を買いに行った時です
CASE "泳装選び開始"
	;Micro比基尼とかもＯＫ
	IF COND("Ｈ的泳装選択可能") && RAND:2
		PRINTFORMW 「どんなモノでも良いんだよ？」
		PRINTFORMW 「%CNAME("主人")%が選んでくれるならサ――にひひっ♪」
	ELSEIF RAND:2
		PRINTFORMW 「おーおー、色とりどりだ。目移りしちゃうなー」
	ELSE
		PRINTFORMW 「さ、どんなのがあるかな？ ふふ、ちょっと楽しみだったりして」
	ENDIF
;泳装を買いに行って、結果的に選んだ泳装に対するセリフです
;もしも去年も泳装を選んでいたなら、CSTR:今年の泳装 に記録されているので比較する事が出来る
CASE "泳装決定"
	SELECTCASE SWIM(STR:選んだ泳装, "種類")
	CASE "Micro比基尼"
		IF RAND:3 == 0
			PRINTFORMW 「これかー、ほとんど隠れないじゃないか」
			PRINTFORMW 「胸部なんて、うわー、なんと言うか――――変態テキだな」
		ELSEIF RAND:2
			PRINTFORMW 「なんだ、こういうのが良いのかい？ 紐じゃないか」
			PRINTFORMW 「大事なトコロは隠れてる？ いや、申し訳程度にも程があるよこれ」
		ELSE
			PRINTFORMW 「――――ごめんよ、一瞬言葉を失ったというか」
			PRINTFORMW 「本当にこれで良いんだね？ いや、%CNAME("一人称")%は良いけれど」
		ENDIF
	CASE "比基尼"
		IF RAND:3 == 0
			PRINTFORMW 「ふっふーん、そうそう！こういう大人の色気ってのが全面に出ているやつ！」
			PRINTFORMW 「さっすがー、いよっ大統領！ 俄然見せびらかすのが楽しみになっちゃうネ！」
		ELSEIF RAND:2
			PRINTFORMW 「にひひっ♪ こういう泳装、好きだよ。何せ美味しく見え―――――おっと」
			PRINTFORMW 「ま、着てる姿を妄想して楽しみにしていると良いサ♪」
		ELSE
			PRINTFORMW 「良い買い物したじゃないか。いの一番に見るのは多分%CNAME("主人")%だぜ」
			PRINTFORMW 「もっと開心地はしゃぐと良いぜ、ひゃっほーいってネ♪」
		ENDIF
	CASE "競泳泳装"
		PRINTFORMW 「おーおー、良いんじゃないか。動きやすくて、%CNAME("一人称")%は好きだぜ」
		PRINTFORMW 「でもここのラインの色合いは要らないな、血痕が――いや、なんでもない」
	CASE "高開衩連衣裙"
		PRINTFORMW 「際どいな！！ これもう見えちゃうだろ、お股」
		PRINTFORMW 「ま、それでも着こ无ちゃうのが%CNAME("一人称")%なのサ、覚悟しろよ♪」
	CASE "連体泳装"
		PRINTFORMW 「ちょっと兒童っぽくない？ それがまた良い？ へぇ」
	;其他はだいたいエロ泳装です
	CASEELSE
		PRINTFORMW 「おいおい、泳装かいこれ。良いけれども、犯罪臭半端じゃあないね」
	ENDSELECT

;泳池などで泳装姿に着替え、待ち合わせ場所に集合した時です
CASE "泳装に着替えた"
	;どの泳装に着替えたか？
	SELECTCASE SWIM(CSTR:今年の泳装, "種類")
	CASE "比基尼"
		PRINTFORMW 「うっふ～んってね。どうよどうよ、大人の女性って感じするだろ？」
		PRINTFORMW 「惚れても良いんだぜ、うっふ～ん♪」
	CASE "Micro比基尼"
		PRINTFORMW 「%CNAME("一人称")%にも害羞は多少なりあるんだよネ」
		PRINTFORMW 「何が言いたいかって？ そりゃあ%CNAME("二人称")%、見えそうで動けないんだ、具が」
	CASE "連体泳装"
		PRINTFORMW 「ふふ、%CNAME("一人称")%のダイナマイツボディにかかればこんな兒童っぽいのでも大人の泳装サ！」
	CASE "競泳泳装"
		PRINTFORMW 「おいっちにーさーんしー。この泳装だとなんだかストレッチしたくなってネ」
	;其他はだいたいエロ泳装です
	CASEELSE
		PRINTFORMW 「ははは、我ながら本当に着るなんて思わなかったよ――はー」
	ENDSELECT

;草丛口交です。地の文が用意されているので、轻轻地１行程度の反応でも良いと思います
CASE "到暗处去……"
	IF TALENT:恋慕
		IF RAND:2
			PRINTFORMW 「我慢できなくなっちゃったおちんちんはどこかナー♪」
		ELSE
			PRINTFORMW 「はぁいこんにちは♪ そしていただきまーす♪」
		ENDIF
	ELSE
		IF RAND:2
			PRINTFORMW 「食べて良いってこと？ 違う？ っちぇー。しゃぶりますよー、へいへい」
		ELSE
			PRINTFORMW 「ちょーっとだけ期待したのにサー、ちゃちゃっと射精しちゃえよもう」
		ENDIF
	ENDIF
	;地の文を自己書きたい場合にはコメントアウトを外してください
	;TFLAG:地の文スキップ = 1

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

CASE "接吻"

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

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

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

;帰り際のセリフです。不动声色地エッチに邀请のもいいでしょう
;STR:Ｈする場所 で場所を情人旅館以外にする事も出来ます。（例 STR:Ｈする場所 = 部室
CASE "帰り際"
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「はー楽しかっ――あっ――――え、えーっと、うん！」
		PRINTFORMW 「%CNAME("一人称")%は%CNAME("二人称")%が嫌い！」
		PRINTFORMW 「大嫌い！！うっせぇ嫌いなんだよ！」
		PRINTFORMW 「――――嫌い、なんだと思う。多分――嫌い、嫌いだ」
		PRINTFORMW %CALLNAME:TARGET%はブツブツと自分に言い聞かせるように「嫌い」とつぶやいている…
		CALL SET_CEVENT("恋慕：きっかけ")
	ELSEIF TALENT:恋慕
		PRINTFORMW 「――――なんだかなー」
		PRINTFORMW 「いいや、お腹があんまり空かなかったからサ」
		PRINTFORMW 「そんな事より、アフターもあるんだろ？」
		PRINTFORMW 「行くかどうか早めに決めないと大事な時間がなくなっちゃうよ、%CNAME("主人")%」
	ELSE
		PRINTFORMW 「ふー、羽根を伸ばしてスッキリした」
		PRINTFORMW 「お腹も適度に空いたところで――――晩御飯が欲しいな？」
	ENDIF
CASE "约会終了"
	;エッチをする場合
	IF TFLAG:床イン
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「――――嫌いだって言ってるんだけどナー」
			PRINTFORMW 「なーんで誘えちゃうのかな、はぁ」
		ELSEIF TALENT:恋慕
			CALL PRINT_STRW, "「にひひっ♪ そう来なくっちゃ_BH_」"
		ELSE
			PRINTFORMW 「はー良かった良かった、拒否されたら何処で襲ってやろうかと――冗談ですよぅ♪」
		ENDIF
	ELSE
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「――――お、おう。それでいいのサ、それで」
			PRINTFORMW 「――――――むぅ」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「そうかい、じゃあ帰ろうか。お手々つないで、さ」
			PRINTFORMW 「それくらい良いだろ？楽しみにしてたんだぜーアフターもさ～」
		ELSE
			PRINTFORMW 「くぅ～ん、はーい。待て、ですね～、わんわん」
		ENDIF
	ENDIF
ENDSELECT

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

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

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

path: ERB/EVENT_K/60 千裕/EVENT_K60_DAILY.ERB