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

MEMO_LINECOUNT = LINECOUNT

SELECTCASE ARGS
CASE "朝拘束"

;朝のＨイベントでのセリフ。下の"打招呼"だけ書いてあれば十分だと思います
;ここでCALL SETFLAG, "地の文スキップ"すると地の文、経験表示、本来なら続いて表示される下のCASE "打招呼"の台詞、を全てすっ飛ばせます(上級者向け)
;詳しくは@EVENT_NEWDAYの注釈などを見てください
CASE "朝袭"
	SELECTCASE CSTR:朝袭
	CASE "朝逆正常位"
	CASE "朝舐陰"
	CASE "朝足交"
		CALL SETFLAG, "变成内衣姿态", TARGET
	CASE "朝の新妻PLAY"
		CALL SETFLAG, "变成内衣姿态", TARGET
	CASE "朝乳交"
		CALL SETFLAG, "变成内衣姿态", TARGET
	CASE "朝面部騎乗"
		CALL SETFLAG, "变成内衣姿态", TARGET
	CASE "朝騎乗位"
	CASE "朝Ａ騎乗位"
		CALL SETFLAG, "变成内衣姿态", TARGET
	CASE "朝接吻"
		CALL SETFLAG, "地の文スキップ"
		CALL SETFLAG, "变成内衣姿态", TARGET
		CALL EMOTION_PLUS, "重置/心情差/红晕", TARGET
		PRINTFORMW 「おい、起きろ%CNAME("二人称")%、朝だぞ」　　　ちゅ
		PRINTFORML
		PRINTFORMW これがセクサロイドの役目だとでも思ってるのか、%CALLNAME:TARGET%が%CALLNAME:MASTER%を起こしに来る時是つも、
		PRINTFORMW 起床を促すぞんざいな言葉とはうらはらな、ほっぺへの打招呼の接吻が付いてくる。
	CASE "朝添い寝"
		CALL SETFLAG, "地の文スキップ"
		CALL SETFLAG, "变成内衣姿态", TARGET
		PRINTFORMW %CALLNAME:MASTER%が睁開眼睛と、隣には%CALLNAME:MASTER%の被窝にくるまって寝ている%CALLNAME:TARGET%がいた。
		PRINTFORML
		PRINTFORMW 「‥‥すぴー… ん…？ んぁ…？ ‥‥‥‥にゅ‥‥‥‥‥‥はよ、%CNAME("二人称")%‥‥ん～…」
		PRINTFORMW %CALLNAME:MASTER%が揺すって叫醒と、まだ眠そうな目を開けて%CALLNAME:TARGET%は朝の打招呼をしてきた。
	CASE "朝口交", "朝六九式"
		CALL SETFLAG, "变成内衣姿态", TARGET
	ENDSELECT
;朝のＨイベント終了後にする打招呼
CASE "打招呼"
	SELECTCASE CSTR:朝袭
	CASE "朝口交"
		PRINTFORMW 「なんだよ、もう起きたのか%CNAME("二人称")%」
	CASE "朝騎乗位"
		PRINTFORMW 「えへ。ちょっとした恶作剧のつもりだったのに、起こしちまったみてえだな」
		PRINTFORMW 「おはよ、%CNAME("二人称")%」
	ENDSELECT

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

	IF COND("体育")
		PRINTFORMW 「今日は体育があったよな？ 準備してあっから忘れんなよ？」
	ELSE
		PRINTFORMW 「おはよ、%CNAME("二人称")%」
	ENDIF
CASE "登校"
	IF CFLAG:心情差
		CALL EMOTION_PLUS, "重置/半目/飘忽/憤怒眉/嘟嘴", TARGET
		PRINTFORMW 「‥‥‥はよ」
	ELSE
		IF DAYEV("試験当日")
			CALL EMOTION_PLUS, "重置/", TARGET
			PRINTFORML 「今日ってテストがあるんだあっけ？」
			IF BASE:学力 >= 70
				PRINTFORMW 「%CNAME("一人称")%、そこそこ勉強したけど、テストはどうかな～？」
			ELSEIF BASE:学力 <= 30
				PRINTFORMW 「今回全然勉強しなかったし、%CNAME("一人称")%テストはヤベえかも‥‥‥」
			ENDIF
		ELSEIF DAYEV("試験返却日")

		ELSEIF COND("朝袭相手")

		ELSEIF COND("体育")

		ELSEIF COND("水泳")

		ELSE

		ENDIF
	ENDIF
;この角色と一緒に部室に入った際に誰も他にいない場合
CASE "一番乗り"
	CALL EMOTION_PLUS, "重置/", TARGET
	PRINTFORMW 「おっと、今日は%CNAME("一人称")%が一番乗りみてえだな」
CASE "ただいま"
	IF TALENT:叛逆 || CFLAG:ハル心情差
		CALL EMOTION_PLUS, "心情差", TARGET
		PRINTFORMW 「‥‥‥ただいま～」
	ELSE
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORMW 「今戻った。ん？ 何だよ%CNAME("二人称")%」
	ENDIF
CASE "既に入室"
	;家で出迎えてくれる時
	IF COND("夜")
		IF TALENT:叛逆 || CFLAG:ハル心情差
			CALL EMOTION_PLUS, "心情差", TARGET
			PRINTFORMW 「‥‥おかえり」
		ELSEIF RAND:2 == 0
			CALL EMOTION_PLUS, "重置/", TARGET
			PRINTFORMW 「おかえり、%CNAME("二人称")%。今%CSTR:茶%淹れようと思ってたとこなんだけど、%CNAME("二人称")%も飲む？」
		ELSE
			CALL EMOTION_PLUS, "重置/", TARGET
			PRINTFORMW 「%CNAME("二人称")%おかえり」
			IF COND("冬") && !TALENT:叛逆
				PRINTFORMW 「外、寒くなかったか？ %CNAME("二人称")%もこたつ入んなよ」
			ENDIF
		ENDIF
	ELSE
		IF TALENT:叛逆 || CFLAG:ハル心情差
			CALL EMOTION_PLUS, "心情差", TARGET
			PRINTFORMW 「‥‥よっす%CNAME("二人称")%」
		ELSE
			CALL EMOTION_PLUS, "红晕", TARGET
			PRINTFORMW 「よっす%CNAME("二人称")%」
		ENDIF
	ENDIF

CASE "入室打招呼"
	IF CFLAG:呼び出された
		IF TALENT:叛逆 || CFLAG:ハル心情差
			CALL EMOTION_PLUS, "心情差", TARGET
			PRINTFORMW 「‥‥何？」
		ELSE
			CALL EMOTION_PLUS, "重置/", TARGET
			PRINTFORMW 「%CNAME("二人称")%、呼ばれたから来てみたんだけど、なんか用？」
		ENDIF
	;你が現在的partnerにＨ的悪戯をしている最中に入室した（partnerへの呼びかけはCNAME("partner")で出来る）
	ELSEIF TALENT:叛逆 || COND("Ｈ的いちゃつき中", MASTER)
		CALL EMOTION_PLUS, "心情差", TARGET
		PRINTFORMW 「なんだよ、お取込み中ってやつ？ %CNAME("二人称")%はお盛んだな」
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
	ELSE
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORMW 「よっす%CNAME("二人称")%」
	ENDIF
;部屋にいる他の人から打招呼を返される打招呼。WAITの使用は一回が望ましい
CASE "簡易入室打招呼"
	;遅れた時のセリフ（既に部員の４分の３が集合済）
	IF CHARA_NUM("入室打招呼時の室内人数") >= CHARANUM*3/4 && RAND:3 == 0
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORMW 「何？ 今日みんなヒマだったの？」
	ELSEIF CFLAG:呼び出された
		IF TALENT:叛逆 || CFLAG:ハル心情差
			CALL EMOTION_PLUS, "心情差", TARGET
			PRINTFORMW 「‥‥‥‥‥何？」
		ELSE
			CALL EMOTION_PLUS, "重置/", TARGET
			PRINTFORMW 「何だよ～、他にもいるのに、何も%CNAME("一人称")%呼び出さなくてもいいじゃんか～」
		ENDIF
	ELSE
		CALL EMOTION_PLUS, "重置/", TARGET
		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("教員", "入室打招呼中")
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORML 『あれ？ %CSVCALLNAME(NO:ACTOR)%じゃん。こんなとこで仕事サボってんの？』
		PRINTFORMW 『悪い老师だなぁ～』
	;相手が現れるのが遅かった（既に部員の４分の３が集合済）
	ELSEIF CHARA_NUM("入室打招呼時の室内人数") >= CHARANUM*3/4 && RAND:3 == 0
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORMW 『よっす、%CSVCALLNAME(NO:ACTOR)%遅かったな、何か用事でもあったのか？』
	ELSE
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORMW 『こんちゃ、%CSVCALLNAME(NO:ACTOR)%。今日もまったりやってこうぜ』
	ENDIF

CASE "居間に現れた"
	IF CFLAG:呼び出された
		IF TALENT:叛逆 || CFLAG:ハル心情差
			CALL EMOTION_PLUS, "心情差", TARGET
			PRINTFORMW 「‥‥何？」
		ELSE
			CALL EMOTION_PLUS, "重置/", TARGET
			PRINTFORMW 「%CNAME("二人称")%、呼んだ？ なんか用？」
		ENDIF
	;一度居間から別の場所に行って、居間に帰って来た時
	ELSEIF CMOVE("居間")
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORMW 「ふぅ‥‥」
	ELSE
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORMW 「我回来了——」
	ENDIF
;你と一緒に摆脱人はPARTNER()で参照できる。名前はCALLNAME:PARTNER()です
CASE "抜け出された"
	CALL EMOTION_PLUS, "重置/憤怒眉", TARGET
	PRINTFORMW 「あそ。行ってら～%CNAME("二人称")%。%CNAME(CALLNAME:PARTNER() )%も腰には気を付けるんだぞ～」
	CFLAG:ハル心情差 += 1
	CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
CASE "便当"
	IF CFLAG:ハル心情差
		CALL EMOTEFACE, "重置/半目/飘忽/憤怒眉/嘟嘴", TARGET
		PRINTFORMW 「%CNAME("一人称")%、今日は干劲出なかったし、適当メシな」
		PRINTFORML
		PRINTFORMW %CALLNAME:TARGET%の言うとおり、いつもよりメニューがかなり適当だ‥‥
		PRINTFORMW どうやら%CALLNAME:TARGET%の心情を損ねると、弁当のメニューが貧しくなるらしい。
		PRINTFORML
	ELSEIF TALENT:料理擅長
		IF RAND:2 == 0
			SAVESTR:現在位置 = 野外
			CALL EMOTION_PLUS, "重置/", TARGET
			PRINTFORMW 「%CNAME("二人称")%、今日は天気もいいし、たまには外行って食わねえ？」
			PRINTFORMW %CALLNAME:TARGET%の提案で今日は%TEXTR("校舎の房顶/中庭/グラウンド脇")%にやってきた。
			PRINTFORML
		ELSE
			CALL EMOTION_PLUS, "重置/", TARGET
			PRINTFORMW 「よっす%CNAME("二人称")%、待った？ さっそく食おうぜっ」
			PRINTFORMW %CALLNAME:TARGET%と待ち合わせて、いつものように２人で弁当を食べる。
			PRINTFORMW この時間もなんだか馴染んだものになってきた。
			PRINTFORML
		ENDIF
		IF RAND:15 == 0
			PRINTFORMW 「じゃーん、今日は気が向いたから、甜点まであるんだぞっ」
			PRINTFORML
			PRINTFORMW そう言って%CALLNAME:TARGET%が取り出したのは、%TEXTR("うさぎに剥いたりんご/ヨーグルト/スイートポテト/冷凍餡餅ナップル/冷凍橘子")%だった。
			PRINTFORML
		ELSEIF RAND:10 == 0
			PRINTFORMW 「今日はなんか、加減忘れて作ったせいで、ちょっと量が多いから、いっぱい食え」
			PRINTFORML
			PRINTFORMW そういえば%CALLNAME:TARGET%の言う街道、今日の弁当箱是つものより一回り大きいものだ。
		ENDIF
		PRINTFORMW さてさて、そんな%CALLNAME:TARGET%の弁当の中身は‥‥‥
		PRINTFORML
		IF RAND:4 == 0
			PRINTFORMW 豪快に%TEXTR("牛丼/焼肉丼/ステーキ丼/ガーリックチキン丼/すきやき丼")%弁当だった。
			CFLAG:ハル弁当指数 += 2
		ELSEIF RAND:3 == 0
			PRINTFORM %TEXTR("飯団/三明治/おにぎらず/ピラフ/チャーハン炊き込みご飯/チキン番茄酱ライス")%と、
			PRINTFORM %TEXTR("アスパラのベーコン巻き/豚の梅しそ巻き油炸/エビ阴蒂ームコロッケ/レンコン入り漢堡肉/エビフライ/とんかつ")%と、
			PRINTFORM %TEXTR("玉子の巻き焼/野菜入りの開放型オムレツ/プレーンオムレツ/ポテトサラダ/スクランブルエッグ")%と、
			PRINTFORM %TEXTR("ラタトュユ/番茄マリネ/番茄の乳酪焼き/焼き番茄/ガーリック番茄煮")%と、
			PRINTFORM %TEXTR("ブロッコリーのドレッシング漬け/水菜と油炸の煮びたし/チンゲン菜とツナの炒め合え/きゅうりのピリ辛漬け/ほうれん草の芝麻和え")%の弁当で、
			PRINTFORMW なにやらとても美味そうだ。
			CFLAG:ハル弁当指数 += 3
		ELSEIF RAND:2 == 0
			PRINTFORM 白飯に%TEXTR("たくあん/うめぼし/しば漬け/塩こぶ/ゆかり/ふりかけ")%と、
			PRINTFORM %TEXTR("から油炸/一口漢堡肉/シイタケのひき肉詰め/豚の姜汁焼肉/茄子のはさみ油炸")%と、
			PRINTFORM %TEXTR("ゆで卵/フライドポテト/玉子の巻き焼/スクランブルエッグ/プレーンオムレツ")%と、
			PRINTFORM %TEXTR("ほうれん草の涼拌菜/きゅうりとわかめの酢の物/温野菜サラダ/無限捲心菜/オクラの梅しそ和え")%で、
			PRINTFORMW そこそこがんばって作ってくれたらしい。
			CFLAG:ハル弁当指数 += 2
		ELSE
			PRINTFORM 得意料理らしいメインの%TEXTR("鶏つくねの照り焼き/豚のロール巻き/さばのゆず塩焼き/イカのコロッケ/メンチカツ")%と、
			PRINTFORM 色味に気を使った黄色の%TEXTR("かぼちゃのサラダ/乳酪スクランブルエッグ/マカロニのカレー風味サラダ/さつま芋の清爽煮/厚焼き玉子")%、
			PRINTFORM 赤の%TEXTR("にんじんのきんぴら/番茄のマリネ/ラディッシュのハム巻き//にんじんごまナムル")%、
			PRINTFORMW 緑の%TEXTR("ブロッコリーの醤油炒め/ピーマンのオイスター焼き/小松菜のツナ和え/アスパラのみそマヨ和え/きゅうりのごま焼き")%だった。
			PRINTFORMW 最近料理の腕を上げたのか、とても美味そうな弁当だと、２人で並んで手を合わせていただく。
		ENDIF

		PRINTFORML
		PRINTFORML そんな%CALLNAME:TARGET%の弁当を%CALLNAME:MASTER%が‥‥
		CALL PRINT_SELECT, "喜ぶと/夸奖と/けなすと"

		IF RESULT == 0
			CALL EMOTION_PLUS, "重置/笑颜２/大口/红晕", TARGET
			PRINTFORMW 「あーうん。%CNAME("二人称")%が嬉しいと思ってんなら、%CNAME("一人称")%も作った甲斐もあるよ」
			PRINTFORMW そう言って坦率に開心地した。
		ELSEIF RESULT == 1
			CALL EMOTION_PLUS, "重置/△/紅潮", TARGET
			PRINTFORMW 「え‥‥？ ぁ、うめえ？ あそ‥‥ふーん‥‥‥‥」
			PRINTFORMW 分かりにくいけど、弁当を褒められた事が嬉しいらしい。
			PRINTFORMW 少しそっぽ向いた%CALLNAME:TARGET%の頬に薄く朱がさしているのに気づいた。
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ELSE
			CALL EMOTION_PLUS, "心情差", TARGET
			PRINTFORMW 「なんだよ、作ってもらっといてそれかよ‥‥」
			PRINTFORMW 見ていて明らかなほど、%CALLNAME:TARGET%の心情が悪くなった。
			PRINTFORMW 好感度-20
			CFLAG:好感度 -= 20
			CFLAG:ハル心情差 += 1
			CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		ENDIF
	ELSE
		PRINTFORMW 「%CNAME("二人称")%お待たせ。言われた街道メシ作ってきたけど、正直大したもんじゃねえから、あんま期待すんなよ？」
		PRINTFORML
		PRINTFORMW どうせ作るならいっしょに食おうと誘われたので、%CALLNAME:TARGET%との待ち合わせ場所に行ってみると
		PRINTFORMW 約束街道弁当を用意してくれていた%CALLNAME:TARGET%が待っていた。
		PRINTFORML
		IF RAND:10 == 0
			PRINTFORMW 「あと、今日は加減忘れて作ったせいで、量が多いから、いっぱい食え」
			PRINTFORML
			PRINTFORMW そういえば%CALLNAME:TARGET%の言う街道、今日の弁当箱是つものより一回り大きいものだ。
		ENDIF
		PRINTFORMW さて、そんな%CALLNAME:TARGET%の弁当の肝心の中身は‥‥‥
		IF RAND:4 == 0
			PRINTFORMW 豪快に%TEXTR("牛丼/焼肉丼/ステーキ丼/ガーリックチキン丼/すきやき丼")%弁当だった。
			CFLAG:ハル弁当指数 += 2
		ELSEIF RAND:3 == 0
			PRINTFORM %TEXTR("飯団/三明治/おにぎらず/ピラフ/チャーハン炊き込みご飯/チキン番茄酱ライス")%と、
			PRINTFORM %TEXTR("アスパラのベーコン巻き/豚の梅しそ巻き油炸/エビ阴蒂ームコロッケ/レンコン入り漢堡肉/エビフライ/とんかつ")%と、
			PRINTFORMW %TEXTR("玉子の巻き焼/野菜入りの開放型オムレツ/プレーンオムレツ/ポテトサラダ/スクランブルエッグ")%と、
			PRINTFORM %TEXTR("ラタトュユ/番茄マリネ/番茄の乳酪焼き/焼き番茄/ガーリック番茄煮")%と、
			PRINTFORM %TEXTR("ブロッコリーのドレッシング漬け/水菜と油炸の煮びたし/チンゲン菜とツナの炒め合え/きゅうりのピリ辛漬け/ほうれん草の芝麻和え")%の弁当で、
			PRINTFORMW なにやらとても美味そうだ。
			CFLAG:ハル弁当指数 += 3
		ELSEIF RAND:2 == 0
			PRINTFORM 白飯に%TEXTR("たくあん/うめぼし/しば漬け/塩こぶ/ゆかり/ふりかけ")%と、
			PRINTFORM %TEXTR("から油炸/一口漢堡肉/シイタケのひき肉詰め/豚の姜汁焼肉/茄子のはさみ油炸")%と、
			PRINTFORMW %TEXTR("ゆで卵/フライドポテト/玉子の巻き焼/スクランブルエッグ/プレーンオムレツ")%と、
			PRINTFORM %TEXTR("ほうれん草の涼拌菜/きゅうりとわかめの酢の物/温野菜サラダ/無限捲心菜/オクラの梅しそ和え")%で、
			PRINTFORMW そこそこがんばって作ってくれたらしい。
			CFLAG:ハル弁当指数 += 2
		ELSE
			PRINTFORM 白飯に 昨日の残り物の%TEXTR("きんぴら/肉じゃが/ギョーザ/シューマイ/焼鱼")%と、
			PRINTFORM %TEXTR("捲心菜の浅漬け/グリーンサラダ/きゅうり/茹でたブロッコリー/ほうれん草のおかか和え")%と、
			PRINTFORM %TEXTR("プチ番茄/フルーツ番茄/番茄/迷你番茄/カニカマ")%の弁当で、
			PRINTFORMW 少し弁当作りが面倒だった事がうかがえる。
			CFLAG:ハル弁当指数 += 1
		ENDIF

		PRINTFORML
		PRINTFORML %CALLNAME:MASTER%が%CALLNAME:TARGET%の弁当について
		CALL PRINT_SELECT, "感謝すると/夸奖と/けなすと"

		IF RESULT == 0
			CALL EMOTION_PLUS, "重置/笑颜２/大口/红晕", TARGET
			PRINTFORMW 「あーうん。有がてえと思ってんなら、作った甲斐もあるよ」
			PRINTFORMW そう言って坦率に開心地した。
		ELSEIF RESULT == 1
			CALL EMOTION_PLUS, "重置/△/紅潮", TARGET
			PRINTFORMW 「え‥‥？ ぁ、うめえ？ あそ‥‥ふーん‥‥‥‥」
			PRINTFORMW 分かりにくいけど、弁当を褒められた事が嬉しいらしい。
			PRINTFORMW 少しそっぽ向いた%CALLNAME:TARGET%の頬に薄く朱がさしているのに気づいた。
		ELSE
			CALL EMOTION_PLUS, "心情差", TARGET
			PRINTFORMW 「なんだよ、作ってもらっといてそれかよ‥‥」
			PRINTFORMW 見ていて明らかなほど、%CALLNAME:TARGET%の心情が悪くなった。
			PRINTFORMW 好感度-20
			CFLAG:好感度 -= 20
			CFLAG:ハル心情差 += 1
			CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		ENDIF
	ENDIF
;同じ部屋にいる他の人がＨを開始した際のセリフです
CASE "他の人がＨ開始"
	CALL EMOTION_PLUS, "重置/心情差", TARGET
	PRINTFORMW 「はぁあ～‥‥‥ まぁ、がんばれ、せいぜい腰に気を付けてな」
	CFLAG:ハル心情差 += 1
ENDSELECT

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

SELECTCASE ARGS
;初回のセリフ
CASE "初回台詞"
	PRINTFORML
	PRINTFORML 「そんなわけでType HaLL-5c68a32 No.87923だ。改めてよろしくな、Master」
	PRINTFORML 「呼び名は%CNAME("二人称")%の好きに出来るんだけど、默认ルトの通称名は機体名から『ハル』」
	PRINTFORML 「違う名前が良かったら後で%CNAME("一人称")%に声でもかけてくれ」
CASE "浑身是汗"
	PRINTFORML 「ぁっつ～…、汗まみれだよ～…」
	PRINTFORML 「ん？ なんだよ、自動車だって水滴つ君だから、%CNAME("一人称")%が汗かいても、別におかしくねえだろ？」
CASE "刚睡醒"
	PRINTFORML 「‥‥‥‥ん～‥‥ まだねみぃ‥‥‥」
CASE "Cosplay中"
	PRINTFORML 「どお？ 自分じゃわりと似合ってると思うんだけど？」
CASE "点心の感想"
	;今日の点心を用意したのは自分
	IF COND("点心当番")
		CALL EMOTEFACE, "红晕", TARGET
		PRINTFORML 「どお？ %CNAME("二人称")%%TEXTS("点心")%好吃？」
	;今日の点心は誰かの亲手自制
	ELSEIF COND("亲手自制点心")
		;今日の点心当番の人の亲手自制を初めて食べた
		IF DEVENT(@"%TEXTS("点心当番")%の亲手自制") == 0
			;点心当番が[料理擅長]
			IF COND("点心の作り手が料理擅長") && !COND("点心当番")
				CALL EMOTEFACE, "重置/", TARGET
				PRINTFORML 「へえ、%CNAME(TEXTS("点心当番") )%って料理擅長いんだな。ちょっと感心するぐれえうめえよ、これ」
			ELSEIF !COND("点心当番")
				CALL EMOTEFACE, "重置/红晕", TARGET
				PRINTFORML 「亲手自制ってうめえから、%CNAME("一人称")%も作ってみようかな～？」
			ENDIF
		ELSE
			IF CFLAG:ハル心情差 && !COND("点心当番")
				CALL EMOTEFACE, "心情差", TARGET
				PRINTFORML 「‥‥‥‥ふ～ん、うめえじゃん、これ。%CNAME(TEXTS("点心当番") )%の亲手自制なんだ」
			ELSE
				CALL EMOTEFACE, "重置/", TARGET
				PRINTFORML 「ん！ これなんかうめえぞっ！ 買ってきたんじゃねえんだろ？ すげえな」
			ENDIF
		ENDIF
	;点心が亲手自制でない
	ELSEIF RAND:4 == 0
		CALL EMOTEFACE, "重置/", TARGET
		PRINTFORML 「なぁ、これ食ってもいいのか？　桑きゅ、いただきまーすっ」
	ENDIF
;沉眠著
CASE "睡眠"
	;梦话
	CALL KOJO_SLEEP_K77
	;梦话用の汎用地の文呼出
	CALL DAILY_MESSAGE, "梦话"
ENDSELECT

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

;前回指令対応台詞
SELECTCASE CONDS("直前行動")
CASE "愛の告白"
	CALL EMOTEFACE, "重置/心情差/飘忽/赤面２", TARGET
	PRINTFORML 「‥‥‥‥‥‥う、ぅう……う～‥‥‥む～‥‥‥ぬ～‥‥‥ぅうぅううぅ～‥‥‥」
CASE "约会的约定"
	CALL EMOTEFACE, "重置/", TARGET
	PRINTFORML 「………………‥‥‥‥・・・ふふ」
;これは悪魔や天使や驱魔人のみ
CASE "契約成立"
	[IF_DEBUG]
		PRINTFORML KOJO_DAILY_K77, %CSTR:PREV_DAILYCOM%後
	[ENDIF]
;你にお願いされて、自分の力で巨根になってあげた(悪魔と天使のみ)
CASE "巨根化契約成立"
	PRINTFORML
CASE "短小化契約成立"
	PRINTFORML
CASE "摆脱"
	PRINTFORML
;你と一緒に、主人公的房間に移動した
CASE "主人公的房間に連れ込まれた"
	IF TALENT:叛逆 || CFLAG:ハル心情差
		CALL EMOTEFACE, "重置/憤怒眉/一文字", TARGET
		PRINTFORML 「‥‥%CNAME("二人称")%的房間に呼ぶなんて、なんか用か？」
	ELSE
		CALL EMOTEFACE, "", TARGET
		PRINTFORML 「ん？ 部屋来いって、何の用だった？」
	ENDIF
;你と一緒に、partner的房間に移動した
CASE "自室に招待"
	CALL EMOTEFACE, "", TARGET
	PRINTFORML 「%CNAME("一人称")%的房間って殺風景だろ？ 大した物ねえからさ」
;partnerが既に居る部屋に、你が移動した
CASE "自室に訪問された"
	;指导者を伴っている場合
	IF FIND_COND("現在存在", "助手")
		CALL EMOTEFACE, "重置", TARGET
		PRINTFORML 「ん？ ２人顔揃えてどしたの？ なんか用？」
	ELSE
		CALL EMOTEFACE, "重置", TARGET
		PRINTFORML 「あれ？ どしたんだ、２人して。%CNAME("一人称")%的房間になんか用？」
	ENDIF
CASE "指导者部屋訪問"
	CALL EMOTEFACE, "重置"
	PRINTFORML 「よっす、お邪魔するよ～」
;自宅移動の後に你に連れられて居間に回来了場合など。優先度は低いです
CASE "帰還"
	CALL EMOTEFACE, "", TARGET
	PRINTFORML 「ふぅ‥‥」
CASE "オナバレ"
	CALL EMOTEFACE, "重置/紅潮２/憤怒眉/呀哒３", TARGET
	PRINTFORML 「いいな、%CNAME("二人称")%。おめえは何も見てねえ。そうだろ？ そうだと言え」
CASE "露脐装超短裙胖次チラ"
	IF CFLAG:ハル心情差
		CALL EMOTEFACE, "心情差", TARGET
		PRINTFORML 「‥‥‥何見てんだよ？」
	ELSE
		CALL EMOTEFACE, "心情差/红晕", TARGET
		PRINTFORML 「もうっ!! 見るなバカっ」
	ENDIF
CASE "低腰臀圍"
	IF CFLAG:ハル心情差
		CALL EMOTEFACE, "重置/飘忽/憤怒眉/一文字", TARGET
		PRINTFORML 「‥‥‥ったく、見てんじゃねえよ」
	ELSE
		CALL EMOTEFACE, "重置/飘忽/憤怒眉/一文字", TARGET
		PRINTFORML 「‥‥‥ったく、見てんじゃねえよ」
	ENDIF
CASE "掀起裙子"
	IF CFLAG:ハル心情差
		CALL EMOTEFACE, "重置/飘忽/憤怒眉/一文字", TARGET
		PRINTFORML 「‥‥む～‥‥」
	ELSE
		PRINTFORML 「ったくよ～‥‥」
	ENDIF
CASE "撫摸股間"
	IF TALENT:恋慕
		CALL EMOTEFACE, "重置/飘忽/憤怒眉/一文字/紅潮２"
		PRINTFORML 「ぬぅ～‥‥も～‥‥」
	ELSE
		PRINTFORML 「ったく～‥‥も～‥‥」
	ENDIF
CASE "检查内褲"
	IF COND("合意：检查内褲")
		CALL EMOTEFACE, "心情差/叹气", TARGET
		PRINTFORML 「‥‥‥‥はぁ～」
	ELSE
		IF STATE("酔酒")
			CALL EMOTEFACE, "酔酒", TARGET
			PRINTFORML 「んん？ もーっ、何すんだよ、%CNAME("二人称")%‥‥」
		ELSEIF RAND:3 == 0
			CALL EMOTEFACE, "重置/憤怒", TARGET
			PRINTFORML 「ほんと最低だよ、%CNAME("二人称")%」
		ELSEIF RAND:2 == 0
			CALL EMOTEFACE, "重置/心情差", TARGET
			PRINTFORML 「こんなやつが%CNAME("一人称")%の%CNAME("二人称")%とか、最悪だよ‥‥‥」
		ELSE
			CALL EMOTEFACE, "重置/飘忽/憤怒眉/一文字", TARGET
			PRINTFORML 「うぅ～‥‥‥‥」
		ENDIF
	ENDIF
CASE "检查阴部"
	IF COND("合意：检查阴部")
		IF CSTR:PREV_DAILYCOM == STR:日常イベント名
		ELSEIF RAND:2 == 0
			CALL EMOTEFACE, "心情差/红晕/叹气", TARGET
			PRINTFORML 「こんなのが%CNAME("二人称")%とか、やだよ‥‥‥」
		ELSE
			CALL EMOTEFACE, "心情差/叹气", TARGET
			PRINTFORML 「‥‥‥‥何が楽しいのやら‥‥」
		ENDIF
	ELSEIF STATE("酔酒")
		CALL EMOTEFACE, "酔酒/叹气", TARGET
		PRINTFORML 「困った%CNAME("二人称")%だよ、ほんと～‥‥」
	ELSE
		CALL EMOTEFACE, "重置/憤怒眉/一文字", TARGET
		PRINTFORML 「やめろバカ%CNAME("二人称")%っ！」
		CFLAG:ハル心情差 += 1
	ENDIF
CASE "拜托処理性欲", "清洁口交", "帮忙消除性欲"
	CALL EMOTEFACE, "重置/憤怒眉/一文字", TARGET
	PRINTFORML 「ったく…。メンドクセエから、%CNAME("一人称")%にはもう頼んで来るなよ？」
CASE "进行性処理"
	CALL EMOTEFACE, "重置/飘忽/憤怒眉/一文字", TARGET
	PRINTFORML 「なんでんな事、%CNAME("一人称")%がしなきゃなんだよ」
CASE "買東西"
	;買ってきた道具などで分岐
	IF COND("巨大振動棒購入")
		CALL EMOTEFACE, "目陰効果/半目/憤怒眉/△", TARGET
		PRINTFORML 「なんかすげえデケえの買ってたけど、%CNAME("二人称")%は女の股ユルクすんのが好きなのか？」
		PRINTFORML 「頼むから、%CNAME("一人称")%には使ってくれるなよ？」
		CALL SET_DEVENT, "巨大振動棒感想"
	ELSE
		;単純にいっぱい買ったかどうかで分岐
		SELECTCASE COND("買上品数")
		CASE IS >= 4
			CALL EMOTEFACE, "心情差/叹气", TARGET
			PRINTFORML 「なんかすげえいっぱい買ってきたよな。%CNAME("二人称")%こういうの使うの、好きなのか？」
		CASEELSE
			CALL EMOTEFACE, "", TARGET
			PRINTFORML 「荷物持ち完了～、%CNAME("二人称")%、買ってきた物はどこ置いとけばいいんだ？」
		ENDSELECT
	ENDIF
CASE "隐秘摄影失敗"
	IF STATE("酔酒")
		CALL EMOTEFACE, "酔酒/叹气", TARGET
		PRINTFORML 「も～♪ 男の%CNAME("一人称")%撮ってどうするんだ？」
	ELSEIF TALENT:叛逆
		CALL EMOTEFACE, "重置/飘忽/憤怒眉/一文字/叹气", TARGET
		PRINTFORML 「‥‥何やってんだよ。バカじゃねえのか？ それでコッソリやってるつもりなのかよ」
	ELSE
		CALL EMOTEFACE, "重置/飘忽/憤怒眉/一文字/红晕/叹气", TARGET
		PRINTFORML 「‥‥何やってんだよ。バカじゃねえの？ それでコッソリやってるつもりなのかよ」
	ENDIF
CASE "变成裸体"
	;他に人がいる
	IF CHARA_NUM("室内の邪魔者")
		CALL EMOTEFACE, "心情差", TARGET
		PRINTFORML 「‥‥脱いだ是いけど、この後どおすんだろな、%CNAME("一人称")%」
	;まさかの野外
	ELSEIF PLACE("野外")
		CALL EMOTEFACE, "心情差", TARGET
		PRINTFORML 「……はぁ～。%CNAME("一人称")%ら、変態なのもたいがいにしとけっつー感じだよな」
	;不在個室
	ELSEIF PLACE("個室") == 0
		CALL EMOTEFACE, "心情差", TARGET
		PRINTFORML 「んで？ この後の事は酱と考えてるんだろうな、%CNAME("二人称")%」
	;個室で二人きり
	ELSE
		CALL EMOTEFACE, "困扰眉", TARGET
		PRINTFORML 「%CNAME("二人称")%は%CNAME("一人称")%の裸がほんと、好きだよな～」
		PRINTFORML 「Androidだし見てくれ是いっつっても、男なのにさ」
	ENDIF
CASE "Ｈ目的で呼び出された"
	IF PLACE("情人旅館")
		CALL EMOTEFACE, "重置", TARGET
		PRINTFORML 「この辺りって、それ系の建物がいっぱいなんだな」
		PRINTFORML 「ん？ ここはその中でもおススメのとこなのか」
	;做爱房
	ELSE
		CALL EMOTEFACE, "", TARGET
		PRINTFORML 「どした%CNAME("二人称")%、なんか２人じゃねえと出来ねえ事がしたかったのか？」
	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 CFLAG:日常事件回数 >= 1 && DEVENT("質問１") == 0 && CFLAG:好感度 >= 2000 && TEXTS("日期対応イベント") == "周考" && CEVENT("いっしょに勉強") == 0
	PRINTFORML 「%CNAME("二人称")%、もうすぐテストあるし、ちょっといっしょに勉強しねえ？」
	CALL PRINT_STRL, @"黄色_試験が近いので、%CALLNAME:TARGET%は%CALLNAME:MASTER%といっしょに勉強をしたいようだ。"
	CALL SET_DEVENT, "質問１"
ELSEIF CFLAG:日常事件回数 >= 15 && DEVENT("質問２") == 0
	IF STATE("酔酒")
		CALL EMOTEFACE, "重置/酔酒", TARGET
	ELSE
		CALL EMOTEFACE, "", TARGET
	ENDIF
	PRINTFORML 「‥‥‥え？ %CNAME("一人称")%の好きな物？　‥‥‥うーん、マッサージ、とかか？」
	CSTR:喜欢的东西 = マッサージ
	CALL SET_DEVENT, "質問２"
ELSEIF CFLAG:日常事件回数 >= 25 && DEVENT("質問３") == 0
	IF STATE("酔酒")
		CALL EMOTEFACE, "重置/酔酒", TARGET
	ELSE
		CALL EMOTEFACE, "", TARGET
	ENDIF
	PRINTFORML 「そうだな。%CNAME("一人称")%わりと酒は嫌いじゃねえかも」
	CALL SET_DEVENT, "質問３"
	CSTR:喜欢的东西 = マッサージ/酒
ELSEIF CFLAG:日常事件回数 >= 35 && DEVENT("質問４") == 0
	IF STATE("酔酒")
		CALL EMOTEFACE, "重置/酔酒", TARGET
	ELSE
		CALL EMOTEFACE, "重置/心情差/叹气", TARGET
	ENDIF
	PRINTFORML 「讨厌的东西？ 性騷擾してくる男に決まってんじゃんっ！」
	CALL SET_DEVENT, "質問４"
	CSTR:讨厌的东西 = 性騷擾してくる男
ELSEIF CFLAG:日常事件回数 >= 45 && DEVENT("質問５") == 0
	IF STATE("酔酒")
		CALL EMOTEFACE, "重置/酔酒", TARGET
	ELSE
		CALL EMOTEFACE, "", TARGET
	ENDIF
	PRINTFORML 「そうだな、自己淹れるなら咖啡かな？ うめえじゃん」
	CALL SET_DEVENT, "質問５"
	CSTR:喜欢的东西 = マッサージ/酒/咖啡
ENDIF

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

;他の人といちゃついた後にpartner変更
IF COND("いちゃいちゃ") == 0 && FIND_COND("Ｈ的いちゃつき中")
	CALL EMOTEFACE, "重置/飘忽/憤怒眉/一文字", TARGET
	PRINTFORML 「何だよ？ あっちはもう終わったのか？ 別に邪魔なんかしねえぞ、%CNAME("一人称")%」
ENDIF

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

;以下は随机台詞など

;時間帯と場所と関係で変化有些
IF FLAG:二人きり
	;二人きりでの何かする前のセリフ
	IF CFLAG:调戏数 == 0 && CFLAG:刚睡醒 == 0
		IF CEVENT("－１０００") && CEVENT("不安と不満") == 0
			CALL EMOTEFACE, "重置/憤怒眉/一文字/本"
			PRINTFORM 「%TEXTR(@"う～ん、やっぱこれも‥‥/えーと‥‥‥これは‥‥/むぅ～‥‥これもか‥‥/なるほど‥‥？/ふむ、ぺらり‥‥")%」などと言い的同时、
			PRINTFORML %CALLNAME:TARGET%は部屋の片隅で何かの情報誌を読んでいる。
		ELSEIF PLACE("部室") && CFLAG:好感度 >= 1000 && CEVENT("繞道／ハル") == 0
			PRINTFORML 「ふんふ～ん♪」
			CALL EMOTEFACE, "重置/", TARGET
			PRINTFORML 「ん？ もう返回なら、ついでに便利店寄って行こうかと思ってな。%CNAME("二人称")%もいっしょ来る？」
			CALL PRINT_STRL, @"黄色_%CALLNAME:TARGET%が返回前に、いっしょに便利店に行くかと誘って来たけど、どうする‥‥？"
			CALL SET_CEVENT, "999イベント：緑"
			CALL SET_CEVENT, "繞道ハル"
		ELSE
			IF RAND:3 == 0
				IF TALENT:叛逆 || CFLAG:ハル心情差
					CALL EMOTEFACE, "重置/心情差", TARGET
					PRINTFORML 「あ、%CNAME("二人称")%。このマンガの３巻はどこ行ったんだ？」
				ELSE
					CALL EMOTEFACE, "重置/", TARGET
					PRINTFORML 「あ、%CNAME("二人称")%。このマンガの３巻はどこ行ったんだ？」
				ENDIF
			ELSEIF RAND:2 == 0
				IF TALENT:叛逆 || CFLAG:ハル心情差
					CALL EMOTEFACE, "重置/心情差", TARGET
					PRINTFORML 「‥‥‥‥ん？ またなんか悪だくみしてねえか？」
				ELSE
					CALL EMOTEFACE, "重置/", TARGET
					PRINTFORML 「‥‥‥‥ん？ またなんか悪だくみしてねえか？」
				ENDIF
			ELSE
				IF TALENT:叛逆 || CFLAG:ハル心情差
					CALL EMOTEFACE, "重置/心情差", TARGET
					PRINTFORML 「なぁ、%CNAME("二人称")%。いま%CNAME("一人称")%ヒマなんだけど、かまって君ね？」
				ELSE
					CALL EMOTEFACE, "重置/栗口", TARGET
					PRINTFORML 「なぁ、%CNAME("二人称")%。いま%CNAME("一人称")%ヒマなんだけど、かまって君ね？」
				ENDIF
			ENDIF
		ENDIF
	ELSEIF STATE("酔酒")
		IF RAND:3 == 0
			CALL EMOTEFACE, "重置/酔酒", TARGET
				CALL PRINT_STRL, @"「えへぇ～_UH_ えへへぇ～_UH_ なんか楽しいぞ～？」"
		ELSEIF RAND:2 == 0
			CALL EMOTEFACE, "重置/酔酒", TARGET
			PRINTFORML 「はれぇ～？ なんかフワフワしてきたぞ～？」
		ELSE
			CALL EMOTEFACE, "重置/酔酒", TARGET
			PRINTFORML 「ふふ‥‥ふふふふ‥‥‥‥‥っ」
		ENDIF
	ELSE
		IF CEVENT("－１０００") && CEVENT("不安と不満") == 0
			CALL EMOTEFACE, "重置/憤怒眉/一文字/本"
			PRINTFORM 「%TEXTR("う～ん、やっぱこれも‥‥/えーと‥‥‥これは‥‥/むぅ～‥‥これもか‥‥/なるほど‥‥？/ふむ、ぺらり‥‥")%」などと言い的同时、
			PRINTFORML %CALLNAME:TARGET%は部屋の片隅で何かの情報誌を読んでいる。
		ELSEIF PLACE("部室") && CFLAG:好感度 >= 1000 && CEVENT("繞道／ハル") == 0
			PRINTFORML 「ふんふ～ん♪」
			CALL EMOTEFACE, "重置/", TARGET
			PRINTFORML 「ん？ もう返回なら、ついでに便利店寄って行こうかと思ってな。%CNAME("二人称")%もいっしょ来る？」
			CALL PRINT_STRL, @"黄色_%CALLNAME:TARGET%が返回前に、いっしょに便利店に行くかと誘って来たけど、どうする‥‥？"
			CALL SET_CEVENT, "999イベント：緑"
			CALL SET_CEVENT, "繞道ハル"
		ELSE
			CALL EMOTEFACE, "/红晕", TARGET
			PRINTFORML つんつん　　　　「‥‥‥‥ん？ いや？ %CNAME("一人称")%は何もしてねえよ」
		ENDIF
	ENDIF
ELSEIF STATE("酔酒")
	IF RAND:5 == 0
		CALL EMOTEFACE, "重置/酔酒", TARGET
		CALL PRINT_STRL, @"「えへぇ～_UH_ えへへぇ～_UH_ なんか楽しいぞ～？」"
	ELSEIF RAND:4 == 0
		CALL EMOTEFACE, "重置/酔酒", TARGET
		PRINTFORML 「はれぇ～？ なんかフワフワしてきたぞ～？」
	ELSEIF RAND:3 == 0
		CALL EMOTEFACE, "重置/酔酒", TARGET
		PRINTFORML 「ふふ‥‥ふふふふ‥‥‥‥‥っ」
		PRINTFORM 「%TEXTR("ふふふ～ん♪/らるらりらり～♪/あはははっ/ふふぃ～っ")%」などと言い的同时、
		PRINTFORML %CALLNAME:TARGET%は部屋の隅っこで、なにやら楽しそうにしている。
	ELSEIF RAND:2 == 0
		CALL EMOTEFACE, "重置/酔酒", TARGET
		PRINTFORM 「%TEXTR(@"%CNAME("二人称","甘え")%/%CNAME("二人称","かな")%/%CNAME("二人称","・")%/う～%CNAME("二人称")%")%の
		PRINTFORM %TEXTR("おおばかやろ～/あんぽんた～ん/ばかぁ‥‥‥/チンカス男～")%」とか言って、
		PRINTFORML %CALLNAME:TARGET%は酒を飲んでいる。
	ELSE
		CALL EMOTEFACE, "重置/酔酒", TARGET
		PRINTFORML 「何だよ～？ %CNAME("二人称")%もこれが良いのか～？」
		PRINTFORML どうやら%CALLNAME:TARGET%が欲しいクッションを、%CALLNAME:MASTER%が使っているらしい。
	ENDIF
ELSEIF COND("闲")
	IF DEVENT("日誌その１０")
		IF RAND:3 == 0
			CALL EMOTEFACE, "闲/飘忽/一文字/托下巴", TARGET
			PRINTFORM (そういや、あん時行ったあそこの%TEXTR("拉麵/日替わり定食/咖啡/蛋糕/ギョーザ")%、
			PRINTFORML すげえ%TEXTR("味だった/美味かった/不味かった/腹いっぱい变成了/困った/お得だった")%よな～…)
		ELSEIF RAND:2 == 0 && PLACE("部室")
			CALL EMOTEFACE, "闲/飘忽/嘟嘴/托下巴", TARGET
			PRINTFORML (%TEXTS("点心")%うめえなー‥‥ も１コ食っても他のやつに足りるかな‥‥？）
		ELSE
			PRINTFORML （う～ん‥‥どうもなんかしっくりこねえな～‥‥）
		ENDIF
	ELSEIF CEVENT("－１０００") && CEVENT("不安と不満") == 0
		CALL EMOTEFACE, "重置/憤怒眉/一文字/本"
		PRINTFORM 「%TEXTR("う～ん、やっぱこれも‥‥/えーと‥‥‥これは‥‥/むぅ～‥‥これもか‥‥/なるほど‥‥？/ふむ、ぺらり‥‥")%」などと言い的同时、
		PRINTFORML %CALLNAME:TARGET%は部屋の片隅で何かの情報誌を読んでいる。
	ELSE
		PRINTFORML （もし今急に、無人島に行くこと变成了ら、%CNAME("一人称")%なら何持ってく‥‥？）
	ENDIF
ELSEIF COND("夜")
	IF STATE("酔酒")
		CALL EMOTEFACE, "酔酒", TARGET
		IF RAND:3 == 0
			PRINTFORM 「%TEXTR("ふふふ～ん♪/らるらりらり～♪/あはははっ/ふふぃ～っ")%」などと言い的同时、
			PRINTFORML %CALLNAME:TARGET%は部屋の隅っこで、なにやら楽しそうにしている。
		ELSEIF RAND:2 == 0
			PRINTFORM 「%TEXTR(@"%CNAME("二人称","甘え")%/%CNAME("二人称","かな")%/%CNAME("二人称","・")%/う～%CNAME("二人称")%")%の
			PRINTFORM %TEXTR("おおばかやろ～/あんぽんた～ん/ばかぁ‥‥‥/チンカス男～")%」とか言って、
			PRINTFORML %CALLNAME:TARGET%は酒を飲んでいる。
		ELSE
			PRINTFORML 「何だよ～？ %CNAME("二人称")%もこれが良いのか～？」
			PRINTFORML どうやら%CALLNAME:TARGET%が欲しいクッションを、%CALLNAME:MASTER%が使っているらしい。
		ENDIF
	ELSEIF CEVENT("－１０００") && CEVENT("不安と不満") == 0
		CALL EMOTEFACE, "重置/憤怒眉/一文字/本"
		PRINTFORM 「%TEXTR("う～ん、やっぱこれも‥‥/えーと‥‥‥これは‥‥/むぅ～‥‥これもか‥‥/なるほど‥‥？/ふむ、ぺらり‥‥")%」などと言い的同时、
		PRINTFORML %CALLNAME:TARGET%は部屋の片隅で何かの情報誌を読んでいる。
	ELSEIF TALENT:叛逆 || CFLAG:ハル心情差
		CALL EMOTEFACE, "心情差", TARGET
		IF RAND:3 == 0
			CALL EMOTEFACE, "重置/憤怒眉/一文字/本"
			PRINTFORM 「%TEXTR("ふんふんふふ～ん♪/らるらるらり～♪/ふむふむ‥‥/なるほど‥‥？/ふむ、ぺらり‥‥")%」などと言い的同时、
			PRINTFORML %CALLNAME:TARGET%は部屋の隅で%TEXTR("マンガ雑誌/写真集/趣味の雑誌/実用書/本")%を読んでいる。
		ELSEIF RAND:2 == 0
			CALL EMOTEFACE, "憤怒眉/一文字", TARGET
			PRINTFORML 「ん？ ‥‥何だよ、%CNAME("二人称")%。おめえもここが良かったのか」
			PRINTFORML どうやら%CALLNAME:MASTER%は、%CALLNAME:TARGET%と座りたい場所が被ってしまったようだ。
		ELSE
			CALL EMOTEFACE, "重置/憤怒眉/一文字/本", TARGET
			PRINTFORM 「%TEXTR("えーと‥‥？ こうなってるから‥‥/あれ？ どっか間違えてるか‥‥？/ん？ これで合ってる？/ふむ‥‥/む～、こうか‥‥？")%」
			PRINTFORML などと呟き的同时、%CALLNAME:TARGET%は%TEXTR("詰将棋/ナンプレ/雑誌のクイズ/ジグゾーパズル/クロスワードパズル")%を解いている。
		ENDIF
	ELSE
		IF RAND:3 == 0
			CALL EMOTEFACE, "本", TARGET
			PRINTFORM 「%TEXTR("ふんふんふふ～ん♪/らるらるらり～♪/ふむふむ‥‥/なるほど‥‥？/ふむ、ぺらり‥‥")%」などと言い的同时、
			PRINTFORML %CALLNAME:TARGET%は部屋の隅で%TEXTR("マンガ雑誌/写真集/趣味の雑誌/実用書/本")%を読んでいる。
		ELSEIF RAND:2 == 0
			CALL EMOTEFACE, "", TARGET
			PRINTFORML 「ん？ 何だよ、%CNAME("二人称")%。おめえもここが良かったのか」
			PRINTFORML どうやら%CALLNAME:MASTER%は、%CALLNAME:TARGET%と座りたい場所が被ってしまったようだ。
		ELSE
			CALL EMOTEFACE, "一文字/本", TARGET
			PRINTFORM 「%TEXTR("えーと‥‥？ こうなってるから‥‥/あれ？ どっか間違えてるか‥‥？/ん？ これで合ってる？/ふむ‥‥/む～、こうか‥‥？")%」
			PRINTFORML などと呟き的同时、%CALLNAME:TARGET%は%TEXTR("詰将棋/ナンプレ/雑誌のクイズ/ジグゾーパズル/クロスワードパズル")%を解いている。
		ENDIF
	ENDIF
ELSE
	IF CEVENT("－１０００") && CEVENT("不安と不満") == 0
		CALL EMOTEFACE, "重置/憤怒眉/一文字/本"
		PRINTFORM 「%TEXTR("う～ん、やっぱこれも‥‥/えーと‥‥‥これも、これも‥‥/むぅ～‥‥これもか‥‥/なるほど‥‥？/ふむ、ぺらり‥‥")%」などと言い的同时、
		PRINTFORML %CALLNAME:TARGET%は部屋の片隅で何かの情報誌を読んでいる。
	ELSEIF TALENT:叛逆|| CFLAG:ハル心情差
		CALL EMOTEFACE, "心情差", TARGET
		PRINTFORML 「はぁ～あ‥‥‥‥」
	ELSEIF CFLAG:Ａ已中出
		CALL EMOTEFACE, "重置/ヮ/紅潮２", TARGET
		PRINTFORML 「‥‥‥‥‥‥‥‥‥ふふっ」
	ELSEIF STATE("酔酒")
		IF RAND:3 == 0
			CALL EMOTEFACE, "酔酒", TARGET
			PRINTFORML 「るんるんる～♪」
		ELSEIF RAND:2 == 0
			CALL EMOTEFACE, "酔酒/ワ", TARGET
			PRINTFORML 「%CNAME("二人称","甘え")%～♪ かまって～♪」
		ELSE
			CALL EMOTION_PLUS, "酔酒/ヮ", TARGET
			PRINTFORML 「ん？ %CNAME("二人称","甘え")%～？何してんだ？」
		ENDIF
	ELSE
		IF PLACE("部室") && CFLAG:好感度 >= 1000 && CEVENT("繞道／ハル") == 0
			PRINTFORML 「ふんふ～ん♪」
			CALL EMOTEFACE, "重置/", TARGET
			PRINTFORML 「ん？ もう返回なら、ついでに便利店寄って行こうかと思ってな。%CNAME("二人称")%もいっしょ来る？」
			CALL PRINT_STRL, @"黄色_%CALLNAME:TARGET%が返回前に、いっしょに便利店に行くかと誘って来たけど、どうする‥‥？"
			CALL SET_CEVENT, "999イベント：緑"
			CALL SET_CEVENT, "繞道ハル"
		ELSE
			PRINTFORM %CALLNAME:TARGET%「%TEXTR("ん～んん～んん～？/え‥‥これは‥‥/う～ん？ うん‥‥‥/‥‥‥‥ふふっ♪/ふんふんふ～♪")%」などと呟き
			IF COND("点心有") && RAND:3 == 0
				PRINTFORM %TEXTR(@"%TEXTS("点心")%を食べながら/%TEXTS("点心")%を食べては/%TEXTS("点心")%を口に放り込んで")%、
			ELSEIF CFLAG:茶 && RAND:3 == 0
				PRINTFORM %TEXTR(@"時々%SAVESTR:茶%を飲んでは/また一口%SAVESTR:茶%を飲んでは/%SAVESTR:茶%を飲みながら")%、
			ELSE
				PRINTFORM %TEXTR("ダラダラ/真面目に/一生懸命/頑張って/慢慢地/夢中で")%
			ENDIF
			PRINTFORML %TEXTR(@"発売されたばかりの週刊誌を眺めて/買ったばかりの本を読んで/%CALLNAME:MASTER%に借りた雑誌を読んで/パズル游戏を遊んで")%いる
		ENDIF
	ENDIF
ENDIF

;-------------------------------------------------
;梦话。随意むにゃむにゃ言わせてください
;-------------------------------------------------
@KOJO_SLEEP_K77
;上から順に発言頻度が高いようにする(== 0の付け忘れではない)
IF RAND:3
	PRINTFORML 「・・・・・・・・・・すゃ」
ELSEIF RAND:2
	PRINTFORML 「・・・すぴー・・・・・・・・・ん・・・・」

ELSE
	IF TALENT:恋慕 && RAND:5 == 0
		PRINTFORML 「・・・・・・・・・ん・・・%TEXTR(@"%CNAME("二人称","甘え")%/%CNAME("二人称","かな")%/%CNAME("二人称","・")%/%CNAME("二人称")%/%CNAME("二人称","どもり")%")%・・・・」
	ENDIF
	PRINTFORML 「・・・・・・うにゅ・・・・・、ん～・・・にゅ・・・・」
ENDIF

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

MEMO_LINECOUNT = LINECOUNT

SELECTCASE ARGS
;通話などでの呼出なので括弧は「」ではなく『』推奨。TFLAG:地の文スキップ = 1とすると地の文をスキップ出来ます
CASE "Ｈ目的で呼び出された"
	;台詞を書いたらRETURN 0 を消してください
	IF PLACE("情人旅館")
		CALL EMOTION_PLUS, "重置/飘忽/憤怒眉/半開", TARGET
		PRINTFORMW 『・・・・・はぁ？ なんでそんなとこ行かなきゃなんねえんだよ』
		PRINTFORMW 『お断り、お断りだよっ』
		PRINTFORML
		PRINTFORMW %CALLNAME:MASTER%がしばらく熱心に説得すると、%CALLNAME:TARGET%はようやく頷いてくれた。
		PRINTFORML
		PRINTFORMW 『・・・・・・・はぁ～。分かったよ行けばいいんだろ、行けばっ』
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
	;做爱房
	ELSE
		CALL EMOTION_PLUS, "重置/飘忽/憤怒眉/半開", TARGET
		PRINTFORMW 『あー是是。そこ行けばいいんだな？ りょーかい。先行って待ってて』
		PRINTFORMW 『飲み物とかあるわけ？』
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
	ENDIF
CASE "学園での日常"
	SAVESTR:現在位置 = 教室
	CALL CREATE_MOB, "伊東美佳"
	CALL CREATE_MOB, "藤本香菜"
	CALL CREATE_MOB, "森本まい"
	CALL CREATE_MOB, "岡田泰明"
	CALL CREATE_MOB, "吉村忠保"
	CALL CREATE_MOB, "岡田やすあき"
	CALL CREATE_MOB, "吉村ただやす"
	CALL CREATE_MOB, "路人ハル"
	MOB_A = CNUM("伊東美佳")
	MOB_B = CNUM("藤本香菜")
	MOB_C = CNUM("森本まい")
	MOB_D = CNUM("岡田泰明")
	MOB_E = CNUM("吉村忠保")
	MOB_F = CNUM("岡田やすあき")
	MOB_G = CNUM("吉村ただやす")
	MOB_H = CNUM("路人ハル")

	IF DEVENT("日誌その１０")
		CALL SETFLAG, "制服姿になる", TARGET
		IF CFLAG:好感度 >= 1500 && CEVENT("笑いのツボ") == 0
			PRINTFORML
			PRINTFORMW 「わはははっ、これ面白れぇなー%CNAME("二人称")%っ」
			PRINTFORMW %CNAME("二人称")%とテレビ見て大ウケした次の日、同じクラスのやつにそのテレビの話をしてみた。
			PRINTFORML
			CALL EMOTION_PLUS, "重置/", TARGET
			CALL PRINT_NAME_CLO, TARGET
			PRINTFORMW 「昨日のテレビでさ～‥‥」
			PRINTFORML
			CALL EMOTION_PLUS, "飘忽/对话框兴奋", MOB_D
			CALL PRINT_NAME_CLO, MOB_D
			PRINTFORMW 『えぇ？ あれそんな面白かったか？ 俺はアレよりそのすぐ後にあった‥‥』
			PRINTFORML
			CALL EMOTION_PLUS, "飘忽/对话框兴奋", MOB_E
			CALL PRINT_NAME_CLO, MOB_E
			PRINTFORMW 『そうそうっ！ あっちのが断然俺もウケたな～』
			PRINTFORML
			PRINTFORMW う～ん‥‥昨日あんなに%CNAME("二人称")%と大ウケしてたのに、こいつらにはウケねえなー‥‥なんでだ？
			PRINTFORML
			CALL EMOTION_PLUS, "重置/心情差", TARGET
			CALL PRINT_NAME_CLO, TARGET
			PRINTFORMW 「え～？ %CNAME("一人称")%にはアレがすげえ面白かったのに‥‥」
			PRINTFORML
			CALL EMOTION_PLUS, "飘忽/对话框兴奋", MOB_E
			CALL PRINT_NAME_CLO, MOB_E
			PRINTFORMW 『%CALLNAME:TARGET%と俺はそういう笑いのツボが違うんだよ。ま、アレが面白色っていうやつもいるだろうけどさ』
			PRINTFORML
			CALL EMOTION_PLUS, "飘忽/对话框兴奋", MOB_D
			CALL PRINT_NAME_CLO, MOB_D
			PRINTFORMW 『俺は時々彼女とそれでケンカになるんだよなー… 笑いのツボが合わねえってさ～…』
			PRINTFORML
			CALL EMOTION_PLUS, "重置/飘忽/一文字/托下巴", TARGET
			CALL PRINT_NAME_CLO, TARGET
			PRINTFORMW 「なるほど、笑いのツボか‥‥‥」
			PRINTFORML
			PRINTFORMW そういえば%CNAME("二人称")%とは、そういう話で合わねえっつー事があんまねえんだよなー‥‥
			PRINTFORMW %CNAME("一人称")%が面白れぇ時はたいてい%CNAME("二人称")%も笑着る気がするけど‥‥
			PRINTFORMW つまりあれか？ それは%CNAME("一人称")%と%CNAME("二人称")%の笑いのツボが似てるっつー事か？
			PRINTFORML
			PRINTFORMW むッ
			PRINTFORML
			PRINTFORMW それはなんか気に入らねえぞ？ %CNAME("二人称")%と似てるとか嬉しくねえっ!!
			PRINTFORMW とは思うものの、%CNAME("二人称")%といっしょにテレビ見てると、どうしても似たような領帯ミングで笑着しまうのだった‥‥
			PRINTFORML
			CALL SET_CEVENT, "笑いのツボ"
		ELSEIF CEVENT("婦女子コンビ") && CEVENT("あほコンビ") && CEVENT("森本まい") && RAND:4 == 0
			IF TEXTS("日期対応イベント") == "七夕"
				CALL EMOTION_PLUS, "/紅潮", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『%CALLNAME:TARGET%君は今日のお祭りどうするの？』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「お祭り？ 今日ってお祭りなんかあるのか？」
				PRINTFORML
				CALL EMOTION_PLUS, "笑颜４/紅潮/对话框開心", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『そんなに規模は大きくないけど、近くで七夕のお祭りがあるんだよ』
				PRINTFORMW 『私は友だちと浴衣着て行く予定なんだ～♪』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/笑颜２/红晕/对话框兴奋", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「へえ、浴衣着るんだ？」
				PRINTFORMW 「そのお祭りって屋台とか出るの？」
				PRINTFORMW 「%CNAME("一人称")%、お祭りのりんご糖食ってみてえっ」
				PRINTFORML
				PRINTFORMW 森本によると、近所でやる七夕祭りでは、屋台も出るし、大号笹飾りもあるらしい。
				PRINTFORMW お祭りか、行ってみてえなー‥‥‥
				PRINTFORML
				CFLAG:森本まい += 1
			ELSEIF TEXTS("日期対応イベント") == "即将到来文化祭"
				CALL EMOTION_PLUS, "飘忽/对话框兴奋", MOB_D
				CALL PRINT_NAME_CLO, MOB_D
				PRINTFORMW 『えぇ～？ このベニヤ板、どこに使うんだっけ～？』
				PRINTFORML
				CALL EMOTION_PLUS, "/紅潮", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『あ、それはね、出し物宣伝の看板で‥‥‥』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/△", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「おーい、誰か粗大的マジックペンどこやったか知らねえ？」
				PRINTFORML
				CALL EMOTION_PLUS, "＞＜/呀哒３", MOB_A
				CALL PRINT_NAME_CLO, MOB_A
				PRINTFORMW 『マジックならさっき、となりのクラスの男子が持って行っちゃったの～っ』
				PRINTFORML
				CALL EMOTION_PLUS, "＞＜/呀哒３", MOB_B
				CALL PRINT_NAME_CLO, MOB_B
				PRINTFORMW 『お願い、取り返して来て！ %CALLNAME:TARGET%く～んっ』
				PRINTFORML
				CALL EMOTION_PLUS, "飘忽/栗口", MOB_E
				CALL PRINT_NAME_CLO, MOB_E
				PRINTFORMW 『おーいっ！ その布はこっちだってさ～』
				PRINTFORML
				PRINTFORMW 即将到来文化祭だからか、学校全体が少し浮かれてる気がすんなー‥‥‥
				PRINTFORML
				CFLAG:森本まい += 1
			ELSEIF TEXTS("日期対応イベント") == "万圣节"
				CALL SETFLAG, "制服姿になる", TARGET
				CALL EMOTION_PLUS, "重置/", MOB_H
				CALL PRINT_NAME_CLO, MOB_H
				PRINTFORMW 「トリックオアトリートだぞ、森本！」
				PRINTFORML
				CALL EMOTION_PLUS, "笑颜４/ヮ/紅潮/对话框開心", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『あははっ！ %CALLNAME:TARGET%君似合ってるよ、それ』
				PRINTFORMW 『是。胖次プキン曲奇っ』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/笑颜２/楕円", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「やったね!! 曲奇ゲット！」
				PRINTFORMW 「おーいっ!! 伊東、藤本っ！ 你らにもトリックオアトリートだっ!!」
				PRINTFORML
				CFLAG:森本まい += 1
			ELSEIF TEXTS("日期対応イベント") == "圣诞节前夕" && CEVENT("圣诞是ない")
				CALL EMOTION_PLUS, "紅潮/对话框開心", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『ねえねえ%CALLNAME:TARGET%君。もうすく圣诞节だね？』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/笑颜２/大口/红晕", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「だなっ。ツリー飾ってチキン食わねえとだ！」
				PRINTFORML
				CALL EMOTION_PLUS, "笑颜４/紅潮/对话框兴奋", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『圣诞桑が来やすいように、早く寝るのも忘れちゃダメだよ？』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/心情差/红晕", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「圣诞がいねえ事ぐれえ、%CNAME("一人称")%もう知ってるのに、いつまでもからかうなよ～」
				PRINTFORML
				PRINTFORMW 悪魔がいるなら圣诞もいるもんだと思い込んでた%CNAME("一人称")%は、
				PRINTFORMW 森本に当分このネタでからかわれそうだ‥‥‥
				PRINTFORMW くそぅ‥‥伊東と藤本のやつめ、言いふらしやがってぇ‥‥‥
				PRINTFORML
				CFLAG:森本まい += 1
			ELSEIF TEXTS("日期対応イベント") == "周考"
				CALL EMOTION_PLUS, "重置/本", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「森本、この問題なんだけど、ここどうなってるか分かる？」
				PRINTFORML
				CALL EMOTION_PLUS, "紅潮", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『えっと、たしかここはね‥‥‥‥‥‥』
				PRINTFORML
				PRINTFORMW 試験が近くなってきたし、%CNAME("一人称")%もちょっと頑張って勉強してみよっかな～？なんて、
				PRINTFORMW いつも上位にいるらしい森本にノートを広げて質問してみる。
				PRINTFORMW 別に勉強が好きなわけじゃねえけど、%CNAME("二人称")%に点数で負けるのもシャクだしな。
				PRINTFORML
				CFLAG:森本まい += 1
			ELSEIF RAND:8 == 0
				CALL EMOTION_PLUS, "惊嚇", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「うわっ。森本‥‥ それ一人で運ぶつもりか？」
				PRINTFORML
				CALL EMOTION_PLUS, "困扰眉/紅潮/对话框汗", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『あ、うん。今日の当番の子、休んでるから‥‥‥』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/心情差", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「女一人でそりゃ無理だろ‥‥‥ 貸せよ、半分持つから」
				PRINTFORML
				CALL EMOTION_PLUS, "困扰眉/笑颜４/会話口３/紅潮/对话框汗３", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『え？ でもこれ、けっこう重いよ‥‥？』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/半目/飘忽/憤怒眉短/△/叹气", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「その重いのを一人で運ぼうとしてるのは、どこのどいつだよ‥‥」
				PRINTFORMW 「ほら行くぞっ」
				PRINTFORML
				CALL EMOTION_PLUS, "笑颜４/困扰眉/紅潮３/对话框汗２", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『%CALLNAME:TARGET%君ごめんね。有がとう』
				PRINTFORML
				PRINTFORMW 森本是い娘なんだけど、ちょっとお人よしが過ぎるんだよな～‥‥
				PRINTFORMW そのせいで、こいつ是つもちょっと損しがちだ。
				PRINTFORML
				CFLAG:森本まい += 1
			ELSEIF RAND:7 == 0
				CALL EMOTION_PLUS, "重置/", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「あ、悪い森本。今日の日直%CNAME("一人称")%なのに、代わりに日誌取りに行かせたって聞いた」
				PRINTFORML
				CALL EMOTION_PLUS, "笑颜４/紅潮", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『気にしないで%CALLNAME:TARGET%君、たまたま職員室に用事があったからだよ』
				PRINTFORML
				PRINTFORMW しっかり者の森本は、可愛くて面倒見が良くて親切だから、男女問わずに好かれるクラスの人気者だ。
				PRINTFORML
				CFLAG:森本まい += 1
			ELSEIF RAND:6 == 0
				CALL EMOTION_PLUS, "斜眉/笑颜４/ヮ/紅潮/对话框兴奋", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『あ、セバスチャンだ。セバスチャ～ン元気だった？』
				PRINTFORMW 『ふふっ。かわいーっ』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「森本、そのネコ【セバスチャン】っつーの？」
				PRINTFORML
				CALL EMOTION_PLUS, "斜眉/ヮ/紅潮/对话框兴奋", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『うん。校門近くの粗点心屋の猫酱でね、時々学校に入ってくるの』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/笑颜２/大口/红晕", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「そうなんだ？ やっぱりこいつ、飼いネコだったんだ～」
				PRINTFORML
				PRINTFORMW 学校に通うようになる前に撫でた、執事みてえなオシャレな手套ネコの名前が【セバスチャン】だと判明した。
				PRINTFORMW 近所の粗点心屋【うめや】の飼いネコらしい。
				PRINTFORMW やっぱりどう見ても、こいつは執事服着てるみてえだっつー事で、森本とすげえ盛り上がった。
				PRINTFORML
				CFLAG:森本まい += 1
			ELSEIF RAND:5 == 0
				CALL EMOTION_PLUS, "ヮ/紅潮/对话框兴奋", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『%CALLNAME:TARGET%君はお昼、食堂で食べないの？ 私、今日は食堂なんだ～♪』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「へえ、森本は食堂なんだ？ 珍しいな、いつもは便当なんだろ？」
				PRINTFORML
				CALL EMOTION_PLUS, "ヮ/紅潮/对话框兴奋", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『弟のついでにだけどね？ %CALLNAME:TARGET%君も便当作ったりする？』
				PRINTFORML
				PRINTFORMW 昼休み前に森本と料理の話で、すげえ盛り上がってしまったら、なんかハラ減ってきたな‥‥‥
				PRINTFORML
				CFLAG:森本まい += 1
			ELSEIF RAND:4 == 0
				CALL EMOTION_PLUS, "笑颜４/ヮ/紅潮", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『%CALLNAME:TARGET%君、さっき的家庭科で曲奇焼いたんだけど、ひとつ食べる？』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/栗口/红晕", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「え？ いいのか？ ラッキー！ 桑きゅな、森本っ」
				PRINTFORML
				PRINTFORMW 森本に家庭科の曲奇をもらってしまった。
				PRINTFORMW お菓子作る女子って、なんか可愛いよな～っ。うまっ!!
				PRINTFORML
				CFLAG:森本まい += 1
			ELSEIF RAND:3 == 0
				CALL EMOTION_PLUS, "重置/笑颜２/大口/红晕", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「あ、森本、こないだは課題写させてくれて桑きゅなっ。これ、大した物じゃねえけど、こないだの礼物」
				PRINTFORML
				CALL EMOTION_PLUS, "笑颜４/红晕", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『やだ、%CALLNAME:TARGET%君。わざわざ礼物なんて別に良かったのに‥‥‥』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「そう言うわけに是かねえよ。礼物するって%CNAME("一人称")%あん時言ったろ？ いいから食いなって」
				PRINTFORML
				CALL EMOTION_PLUS, "笑颜４/ヮ/红晕", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『それじゃ、遠慮なくもらっちゃうねっ♪ でもホント有がと』
				PRINTFORML
				PRINTFORMW いつもなにかと世話になってるから、今日は森本に礼物にのど糖あげた。
				PRINTFORML
				CFLAG:森本まい += 1
			ELSEIF RAND:2 == 0
				CALL EMOTION_PLUS, "紅潮/对话框兴奋", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『%CALLNAME:TARGET%君、今日提出の数学の課題、やってきた？』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/〇〇/△/对话框惊讶", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「やべえっ！ すっかり忘れったよ!! 森本悪いけど、課題写させて君ね？」
				PRINTFORML
				CALL EMOTION_PLUS, "笑颜４/紅潮/会話口/对话框兴奋", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『しょうがないなぁ、今回だけだからね？ %CALLNAME:TARGET%君』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/笑颜２/大口/红晕", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「桑きゅ！ マジで助かるっ！ 礼物に今度なんかオゴるよっ!!」
				PRINTFORML
				CFLAG:森本まい += 1
			ELSE
				CALL EMOTION_PLUS, "紅潮/对话框兴奋", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『あ、%CALLNAME:TARGET%君。おはようっ』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORM 「%TEXTR("おはよ/はよーっす/ん‥‥‥おはよ/おはよう")%、森本。
				IF COND("春")
					PRINTFORMW %TEXTR(@"今日はあったかいな。%CNAME("一人称")%眠くなりそうだよ。/今日はなんかいつもより、いい風が吹いてるよな？/なんか今日って、ポカポカしてる気がしねえ？")%」
				ELSEIF COND("夏")
					PRINTFORMW %TEXTR(@"いやはや、参るぐれえ日差しが很强よな/今日は暑くねえ？ 絶対いつもより暑いよな？/なんかいつもより太陽ヤベえよな？/すげえ寝苦しくてさ、寝不足なんだよ%CNAME("一人称")%")%」
				ELSEIF COND("秋")
					PRINTFORMW %TEXTR("今日は少し冷えねえ？ 秋だからかな？/けっこう最近涼しくなったよな～/やっとちょっと過ごしやすい季節变成了よな/だんだん葉っぱに色が付いてきたよな")%」
				ELSE
					PRINTFORMW %TEXTR(@"今日はすげえ風が冷たくね？/寒いよな、息が白色もんよ/今日はちょっと寒さがマシじゃね？/すげえ冷え込んできてねえ？")%」
				ENDIF
				PRINTFORML
				CFLAG:森本まい += 1
			ENDIF
		ELSEIF CEVENT("婦女子コンビ") && CEVENT("あほコンビ") && CEVENT("森本まい") && RAND:3 == 0
			IF  TEXTS("日期対応イベント") == "情人節"
				CALL EMOTION_PLUS, "惊嚇", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「うぉっ!! すげえな岡田。巧克力大量じゃん。おめえそんな人気あったのか‥‥」
				PRINTFORML
				CALL EMOTION_PLUS, "笑颜/嘲笑", MOB_E
				CALL PRINT_NAME_CLO, MOB_E
				PRINTFORMW 『ああこれ？ すげえだろ？ 毎年恒例なんだよ』
				PRINTFORML
				CALL EMOTION_PLUS, "憤怒眉/红晕", MOB_D
				CALL PRINT_NAME_CLO, MOB_D
				PRINTFORMW 『巧克力だけど、今日は俺の誕生日だからだよっ！』
				PRINTFORMW 『くっそ～‥‥ みんな面白がりやがって～‥‥‥』
				PRINTFORML
				CALL EMOTION_PLUS, "笑颜２/大口/对话框兴奋", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「なんだ～、そゆ事なら%CNAME("一人称")%も後で巧克力買って来てやんよ～っ」
				PRINTFORML
				CALL SET_CEVENT, "岡田の誕生日"
			ELSEIF  TEXTS("日期対応イベント") == "情人節" && CEVENT("岡田の誕生日")
				CALL EMOTION_PLUS, "惊嚇", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「今年もすげえな～岡田。巧克力大量じゃん。人気者だな～っ！
				CALL PRINT_STRW, @"「是これっ！ %CNAME("一人称")%からのも受け取ってくれよなっ_UH_」"
				PRINTFORML
				CALL EMOTION_PLUS, "笑颜/嘲笑", MOB_E
				CALL PRINT_NAME_CLO, MOB_E
				CALL PRINT_STRW, @"『ほんとすげえよな～っ。あ、俺からも巧克力、心をこ・め・て_UH_』"
				PRINTFORML
				CALL EMOTION_PLUS, "憤怒眉/红晕", MOB_D
				CALL PRINT_NAME_CLO, MOB_D
				PRINTFORMW 『嬉しくねえ‥‥ 巧克力だけど嬉しくねえ‥‥ チクショ～‥‥‥』
				PRINTFORML
			ELSEIF TEXTS("日期対応イベント") == "比基尼の日"
				CALL EMOTION_PLUS, "红晕/对话框爱心", MOB_D
				CALL PRINT_NAME_CLO, MOB_D
				PRINTFORMW 『俺はやっぱ、この高挑な娘がいい！』
				PRINTFORMW 『腰圍５３だぜ？』
				PRINTFORML
				CALL EMOTION_PLUS, "红晕/对话框爱心", MOB_E
				CALL PRINT_NAME_CLO, MOB_E
				PRINTFORMW 『いやいや、やっぱこっちの巨乳の娘がいいって～』
				PRINTFORMW 『９３のＦ罩杯だぜ？』
				PRINTFORML
				CALL EMOTION_PLUS, "红晕/对话框爱心", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「え～？ %CNAME("一人称")%はこの黒比基尼がすげえエロく見えるけど？」
				PRINTFORML
				PRINTFORMW 今日は比基尼の日だから、健全な男子校生らしく、グラビアアイドルの品評会をしてみる。
				PRINTFORML
			ELSEIF TEXTS("日期対応イベント") == "圣诞节前夕" && CEVENT("圣诞是ない")
				CALL EMOTION_PLUS, "半目/楕円/对话框兴奋", MOB_E
				CALL PRINT_NAME_CLO, MOB_E
				PRINTFORMW 『なぁなぁ岡田、圣诞节は你、なんか予定あんの？』
				PRINTFORML
				CALL EMOTION_PLUS, "楕円/对话框兴奋", MOB_D
				CALL PRINT_NAME_CLO, MOB_D
				PRINTFORMW 『いや？ 特には‥‥ 圣诞が来るから、早く寝るっつー以外決めてねえけど？』
				PRINTFORML
				CALL EMOTION_PLUS, "赤面２/对话框憤怒", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「うっせえっ！ いつまでもそれをネタにすんじゃねえよっ!!」
				PRINTFORML
				PRINTFORMW 言うんじゃなかった！ 圣诞信じてるとか、伊東と藤本に言うんじゃなかった!!
				PRINTFORML
			ELSEIF TEXTS("日期対応イベント") == "白色情人節" && CEVENT("岡田の誕生日")
				CALL EMOTION_PLUS, "笑颜２", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「よっす岡田、今日は白色情人節だなっ。巧克力のお返ししねえとだぞ？」
				PRINTFORML
				CALL EMOTION_PLUS, "笑颜", MOB_E
				CALL PRINT_NAME_CLO, MOB_E
				PRINTFORMW 『そうだぞ。もらったらやっぱ、酱とお返ししねえとよなっ？』
				PRINTFORML
				CALL EMOTION_PLUS, "憤怒眉/△２", MOB_D
				CALL PRINT_NAME_CLO, MOB_D
				PRINTFORMW 『俺の誕生日が情人節だからって、おめえらからかうんじゃねえよっ！』
				PRINTFORML
			ELSEIF TEXTS("日期対応イベント") == "周考"
				CALL EMOTION_PLUS, "困扰眉/对话框兴奋", MOB_D
				CALL PRINT_NAME_CLO, MOB_D
				PRINTFORMW 『吉村～この%TEXTR("問４/教科書の34页/問題集のチャレンジ問題/辞書ではこう/答えはＥ")%なんだけどさ～‥‥』
				PRINTFORML
				CALL EMOTION_PLUS, "蹙眉/对话框兴奋", MOB_E
				CALL PRINT_NAME_CLO, MOB_E
				PRINTFORMW 『ん？ あれ？ こうだっけ？ %CALLNAME:TARGET%～、この問題なんだけどさ‥‥』
				PRINTFORML
				CALL EMOTION_PLUS, "憤怒眉/一文字/对话框兴奋", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「あれ？ そうじゃねえぞ、おめえら。ここはたしか‥‥‥」
				PRINTFORML
				PRINTFORMW 伊東や藤本と違って、ごくまともなテスト勉強風景が繰り広げられていく。
				PRINTFORMW 平和だ‥‥‥‥
				PRINTFORML
			ELSEIF TEXTS("日期対応イベント") == "即将到来文化祭"
				PRINTFORML
				PRINTFORMW 文化祭が近いせいで、うちのクラスの雰囲気も浮足立っている。
				PRINTFORML
				CALL EMOTION_PLUS, "笑颜/ワ/对话框兴奋", MOB_E
				CALL PRINT_NAME_CLO, MOB_E
				PRINTFORMW 『おい、向こうのクラス、宣伝にCosplayして歩いてんぞ！』
				PRINTFORML
				CALL EMOTION_PLUS, "大口/红晕/对话框開心", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「マジ？ %CNAME("一人称")%らのクラスでもやろうかっ？！」
				PRINTFORML
				CALL EMOTION_PLUS, "对话框汗", MOB_D
				CALL PRINT_NAME_CLO, MOB_D
				PRINTFORMW 『いーから、誰かこのベニヤ持ってくれよ～っ！ 真っすぐ切れねえだろ～？』
				PRINTFORML
			ELSEIF COND("体育")
				SAVESTR:現在位置 = 野外
				CALL EMOTION_PLUS, "红晕", MOB_H
				CALL PRINT_NAME_CLO, MOB_H
				PRINTFORMW 「う～っし！ 今日は体育だし、走んぞ～っ」
				PRINTFORML
				CALL EMOTION_PLUS, "蹙眉/口哨２", MOB_F
				CALL PRINT_NAME_CLO, MOB_F
				PRINTFORMW 『あ゛～‥‥ 体育ダリい～‥‥』
				PRINTFORML
				CALL EMOTION_PLUS, "飘忽/困扰眉/叹气", MOB_G
				CALL PRINT_NAME_CLO, MOB_G
				PRINTFORMW 『岡田は足早いクセに体育嫌いなんだから～‥‥』
				PRINTFORML
			ELSEIF COND("水泳")
				SAVESTR:現在位置 = 野外
				CALL EMOTION_PLUS, "惊嚇/红晕", MOB_H
				CALL PRINT_NAME_CLO, MOB_H
				PRINTFORMW 「ちょ、てめえっ!! 足ひっぱんじゃねえよっ!!」
				PRINTFORML
				CALL EMOTION_PLUS, "＞＜/口哨２/红晕", MOB_F
				CALL PRINT_NAME_CLO, MOB_F
				PRINTFORMW 『わっはっはっは～っ！ %CALLNAME:TARGET%溺れろ～っ』
				PRINTFORML
				CALL EMOTION_PLUS, "飘忽/困扰眉/叹气", MOB_G
				CALL PRINT_NAME_CLO, MOB_G
				PRINTFORMW 『おいおい‥‥ あんまやると、老师マジで溺れてるって勘違いするんじゃね？』
				PRINTFORML
			ELSEIF RAND:4 == 0
				SAVESTR:現在位置 = 教室
				CALL EMOTION_PLUS, "笑颜/笑顔３/楕円/对话框爱心", MOB_D
				CALL PRINT_NAME_CLO, MOB_D
				PRINTFORMW 『～♪』
				PRINTFORML
				CALL EMOTION_PLUS, "飘忽/一文字", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「何？ あいつまたメッセしてんのか？」
				PRINTFORML
				CALL EMOTION_PLUS, "困扰眉/叹气", MOB_E
				CALL PRINT_NAME_CLO, MOB_E
				PRINTFORMW 『何だかんだで彼女とラ胸罩ブだよな～、あいつ』
				PRINTFORML
			ELSEIF RAND:3 == 0
				CALL EMOTION_PLUS, "ヮ/楕円", MOB_E
				CALL PRINT_NAME_CLO, MOB_E
				PRINTFORMW 『%CALLNAME:TARGET%、おい%CALLNAME:TARGET%見ろあそこっ』
				PRINTFORMW 『あの老师の裙、チャック開いてるぞ!!』
				PRINTFORML
				CALL EMOTION_PLUS, "惊嚇", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「ウソまじ？ 早く教えてやんねえとっ!!」
				PRINTFORML
				CALL EMOTION_PLUS, "半目/ヮ/楕円", MOB_D
				CALL PRINT_NAME_CLO, MOB_D
				PRINTFORMW 『バカ、教えたらダメだろ？ こういうのは黙ってコッソリ楽しまねえと!!』
				PRINTFORML
				CALL EMOTION_PLUS, "心情差/叹气", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「おめえらな‥‥‥」
				PRINTFORMW 「お～いっ！ 森本っ!!」
				PRINTFORML
				PRINTFORMW %CNAME("一人称")%はアホどもを放っておいて、森本を通じて老师にチャックの事を伝えたのだった。
				IF TALENT:討厭男人
					PRINTFORMW 性騷擾される辛さは、身をもって知ってるだけに、放っておけなかったからだ。
				ENDIF
				PRINTFORML
			ELSEIF RAND:2 == 0
				CALL EMOTION_PLUS, "飘忽", MOB_D
				CALL PRINT_NAME_CLO, MOB_D
				PRINTFORMW 『こう言っちゃなんだけど、うちのクラスってさ、女子の顔面偏差値高くねえ？』
				PRINTFORML
				CALL EMOTION_PLUS, "飘忽", MOB_E
				CALL PRINT_NAME_CLO, MOB_E
				PRINTFORMW 『確かに高い。特に可爱のが森本だよな？』
				PRINTFORML
				CALL EMOTION_PLUS, "飘忽", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「伊東と藤本はともかく、森本は頭いいし性格もいいし、いう事ねえって感じだよな～」
				PRINTFORML
				CALL EMOTION_PLUS, "△２/叹气", MOB_D
				CALL PRINT_NAME_CLO, MOB_D
				PRINTFORMW 『はぁあ～、俺ああいう彼女が欲しいよ～』
				PRINTFORML
				CALL EMOTION_PLUS, "嘲笑", MOB_E
				CALL PRINT_NAME_CLO, MOB_E
				PRINTFORMW 『何？ 你にはキレて当たり散らす彼女がいるんだろ？』
				PRINTFORML
				CALL EMOTION_PLUS, "ほんわか/困扰眉/△２/对话框汗", MOB_C
				CALL PRINT_NAME_CLO, MOB_C
				PRINTFORMW 『あいつもうやだよ～』
				PRINTFORMW 『返信が５分遅いってだけでキレるんだから～‥‥』
				PRINTFORML
				PRINTFORMW %CNAME("一人称")%にはよく分かんねえけど、彼女もちには彼女持ちの苦労があるらしい。
				PRINTFORML
			ELSE
				CALL EMOTION_PLUS, "对话框兴奋", MOB_D
				CALL PRINT_NAME_CLO, MOB_D
				PRINTFORMW 『%CALLNAME:TARGET%、おはよ～っ』
				PRINTFORML
				CALL EMOTION_PLUS, "对话框兴奋", MOB_E
				CALL PRINT_NAME_CLO, MOB_E
				PRINTFORMW 『%CALLNAME:TARGET%、おはよ～っ』
				PRINTFORML
				CALL EMOTION_PLUS, "大口/对话框兴奋", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORM 「%TEXTR("おはよ/はよーっす/ん‥‥‥おはよ/おはよう")%、吉村岡田。
				IF COND("春")
					PRINTFORMW %TEXTR(@"今日はなんかあったかくねえ？%CNAME("一人称")%眠くなりそうだよ。/今日はなんかいつもより、いい風が吹いてるよな？/なんか今日って、ポカポカしてる気がしねえ？")%」
				ELSEIF COND("夏")
					PRINTFORMW %TEXTR(@"いやはや、参るぐれえ日差しが很强よな/今日は暑くねえ？ 絶対いつもより暑いよな？/なんかいつもより太陽ヤベえよな？/すげえ寝苦しくてさ、寝不足なんだよ%CNAME("一人称")%")%」
				ELSEIF COND("秋")
					PRINTFORMW %TEXTR("今日は少し冷えねえ？ 秋だからかな？/けっこう最近涼しくなったよな～/やっとちょっと過ごしやすい季節变成了よな/だんだん葉っぱに色が付いてきたよな")%」
				ELSE
					PRINTFORMW %TEXTR(@"今日はすげえ風が冷たくね？/寒いよな、息が白色もんよ/今日はちょっと寒さがマシじゃね？/すげえ冷え込んできてねえ？")%」
				ENDIF
				PRINTFORML
				PRINTFORMW 今日も学校は平和だ‥‥
				PRINTFORML
			ENDIF
		ELSEIF CEVENT("婦女子コンビ") && CEVENT("あほコンビ") && CEVENT("森本まい") && RAND:2 == 0
			IF COND("土")
				CALL EMOTION_PLUS, "笑颜/红晕/对话框開心", MOB_A
				CALL PRINT_NAME_CLO, MOB_A
				PRINTFORMW 『%CALLNAME:TARGET%君%CALLNAME:TARGET%君っ！』
				PRINTFORML
				CALL EMOTION_PLUS, "笑颜/红晕/对话框開心", MOB_B
				CALL PRINT_NAME_CLO, MOB_B
				PRINTFORMW 『明日の周日、空いてるかな？』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/心情差/对话框憤怒", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「嫌だ行かねえぞ」
				PRINTFORML
				CALL EMOTION_PLUS, "＞＜", MOB_A
				CALL PRINT_NAME_CLO, MOB_A
				PRINTFORMW 『まだ誘ってもないのに酷いっ！』
				CALL EMOTION_PLUS, "＞＜", MOB_B
				CALL PRINT_NAME_CLO, MOB_B
				PRINTFORMW 『せめて話はきいてよ%CALLNAME:TARGET%君っ』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/心情差/对话框憤怒", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW どうせまた、オタクなイベントの買い物係頼むつもりなんだろ」
				PRINTFORML
				PRINTFORMW 『『その街道だけど話を聞いてよ～っ!!!』』
				PRINTFORML
			ELSEIF TEXTS("日期対応イベント") == "周考"
				IF RAND:3 == 0
					CALL EMOTION_PLUS, "涙目＞＜/憤怒眉/呀！/红晕/对话框汗", MOB_A
					CALL PRINT_NAME_CLO, MOB_A
					PRINTFORMW 『%CALLNAME:TARGET%君数学得意だったでしょ？ 勉強教えて～～っ!!』
					PRINTFORML
					CALL EMOTION_PLUS, "＞＜/憤怒眉/呀！/红晕/对话框汗", MOB_B
					CALL PRINT_NAME_CLO, MOB_B
					PRINTFORMW 『我たちすご～く数学不得意なのっ！ お願い%CALLNAME:TARGET%君っ!!』
					PRINTFORML
					CALL EMOTION_PLUS, "心情差/对话框憤怒", TARGET
					CALL PRINT_NAME_CLO, TARGET
					PRINTFORMW 「やだよ。你らの数学の出来なさ加減は異常だもんよ。一ケタの足し算練習してから言えっ」
					PRINTFORML
					PRINTFORMW 『『そんな事言わないでお願い助けて%CALLNAME:TARGET%く～んっ!!』』
					PRINTFORML
				ELSEIF RAND:2 == 0
					PRINTFORML
					PRINTFORMW テストが近いからっつって、伊東と藤本と勉強をすること变成了のだけど‥‥‥‥‥
					PRINTFORML
					CALL EMOTION_PLUS, "涙目＞＜/憤怒眉/会話口/红晕/对话框汗", MOB_A
					CALL PRINT_NAME_CLO, MOB_A
					PRINTFORMW 『えぇ～‥‥ これどうするんだっけ～？』
					PRINTFORML
					CALL EMOTION_PLUS, "＞＜/憤怒眉/会話口/红晕/对话框汗", MOB_B
					CALL PRINT_NAME_CLO, MOB_B
					PRINTFORMW 『あーんっ！ %CALLNAME:TARGET%君、分かんないよ～っ！』
					PRINTFORML
					CALL EMOTION_PLUS, "重置/半目/憤怒眉/△/对话框憤怒", TARGET
					CALL PRINT_NAME_CLO, TARGET
					PRINTFORMW 「さっき、そこは、説明してやっただろーがっ！」
					PRINTFORMW 「なんで５分前の説明がすっかり抜けちまうんだよっ!!」
					PRINTFORML
					PRINTFORMW 『『忘れちゃうのはしょうがないじゃな～いっ!!』』
					PRINTFORML
					PRINTFORMW こいつら思ったよりバカだな‥‥‥‥
					PRINTFORML
				ELSE
					PRINTFORML
					PRINTFORMW テストが近いっつって、伊東と藤本の勉強の面倒を見ること变成了。
					PRINTFORML
					CALL EMOTION_PLUS, "重置/心情差/对话框憤怒", TARGET
					CALL PRINT_NAME_CLO, TARGET
					PRINTFORMW 「おいこら！ ここ１６＋７が２６になってんぞっ！」
					PRINTFORMW 「もうおめえらは、算数からやり直せバカっ!!」
					PRINTFORML
					CALL EMOTION_PLUS, "＞＜/憤怒眉/会話口/红晕/对话框汗", MOB_A
					CALL PRINT_NAME_CLO, MOB_A
					PRINTFORMW 『いやぁ～んっ！ 見捨てないで%CALLNAME:TARGET%く～んっ!!』
					PRINTFORML
					CALL EMOTION_PLUS, "涙目＞＜/憤怒眉/会話口/红晕/对话框汗", MOB_B
					CALL PRINT_NAME_CLO, MOB_B
					PRINTFORMW 『%CALLNAME:TARGET%君に見捨てられたら我たち赤点だよ～～っ!!』
					PRINTFORML
					PRINTFORMW 算数レベルで出来ねえこいつらを、%CNAME("一人称")%は面倒見きれるのだろうか‥‥？
				ENDIF
			ELSEIF TEXTS("日期対応イベント") == "七夕"
				CALL EMOTION_PLUS, "重置/对话框兴奋", MOB_A
				CALL PRINT_NAME_CLO, MOB_A
				PRINTFORMW 『%CALLNAME:TARGET%君%CALLNAME:TARGET%君、今日はお祭り行く？』
				PRINTFORML
				CALL EMOTION_PLUS, "对话框兴奋", MOB_B
				CALL PRINT_NAME_CLO, MOB_B
				PRINTFORMW 『我たちは浴衣着て行君だよ。い～でしょ～？』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「へえ、おめえら浴衣着て祭り行くのか」
				CALL EMOTION_PLUS, "笑颜２/大口/红晕", TARGET
				PRINTFORMW 「気をつけろよ？ 誰かが女と間違えるかもしんねえし」
				PRINTFORML
				PRINTFORMW 『『ちょっと、それどーゆー意味っ？』』
				PRINTFORML
			ELSEIF TEXTS("日期対応イベント") == "即将到来文化祭"
				CALL EMOTION_PLUS, "重置/半目/憤怒眉/△/对话框憤怒", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「おい伊東藤本っ！ おめえら準備サボってんじゃねえぞこら」
				PRINTFORML
				CALL EMOTION_PLUS, "飘忽/困扰眉/栗口/托下巴", MOB_A
				CALL PRINT_NAME_CLO, MOB_A
				PRINTFORMW 『え～？ 文化祭の準備なら飽きた～』
				PRINTFORML
				CALL EMOTION_PLUS, "飘忽/困扰眉/栗口/頬手", MOB_B
				CALL PRINT_NAME_CLO, MOB_B
				PRINTFORMW 『漫研の準備だけでお腹いっぱいなの～』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/半目/憤怒眉/对话框憤怒/△", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「んなワガ妈妈言ってたら、いつまでたっても終わんねえだろーがっ！」
				PRINTFORML
			ELSEIF TEXTS("日期対応イベント") == "万圣节"
				CALL SETFLAG, "制服姿になる", TARGET
				CALL EMOTION_PLUS, "重置/＞＜/大口/红晕/对话框開心", MOB_H
				CALL PRINT_NAME_CLO, MOB_H
				PRINTFORMW 「ひゃっほーぅっ！ 伊東藤本っ！」
				PRINTFORMW 「トリック＆トリートだぁっ！」
				PRINTFORML
				CALL EMOTION_PLUS, "斜眉/〇〇/△２/对话框惊讶", MOB_A
				CALL PRINT_NAME_CLO, MOB_A
				PRINTFORMW 『ちょ、%CALLNAME:TARGET%君？！』
				PRINTFORML
				CALL EMOTION_PLUS, "斜眉/〇〇/△２/对话框惊讶", MOB_B
				CALL PRINT_NAME_CLO, MOB_B
				PRINTFORMW 『orじゃなくて＆なの？！』
				PRINTFORML
				PRINTFORMW 今日は万圣节だったから、伊東と藤本からお菓子をせしめてやった。
				PRINTFORML
			ELSEIF TEXTS("日期対応イベント") == "圣诞节前夕" && CEVENT("圣诞是ない") == 0
				CALL EMOTION_PLUS, "ワ/楕円/对话框兴奋", MOB_A
				CALL PRINT_NAME_CLO, MOB_A
				PRINTFORMW 『圣诞节前夕だねぇ、%CALLNAME:TARGET%君』
				PRINTFORML
				CALL EMOTION_PLUS, "笑颜/ワ/楕円/对话框兴奋", MOB_B
				CALL PRINT_NAME_CLO, MOB_B
				PRINTFORMW 『%CALLNAME:TARGET%君の圣诞节の予定は何か入ってるの？』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/飘忽/ヮ/红晕", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「特には‥‥‥ 圣诞が来るから、早く寝るっつー以外決めてねえけど？」
				PRINTFORML
				PRINTFORMW ――――――いると思うじゃんっ！ 悪魔な女仆がいるなら圣诞もいるって、ふつう思うじゃんっ!!
				PRINTFORML
				CALL SET_CEVENT, "圣诞是ない"
			ELSEIF TEXTS("日期対応イベント") == "圣诞节前夕" && CEVENT("圣诞是ない")
				CALL EMOTION_PLUS, "ワ/楕円/对话框兴奋", MOB_A
				CALL PRINT_NAME_CLO, MOB_A
				PRINTFORMW 『圣诞节前夕だねぇ、%CALLNAME:TARGET%君』
				PRINTFORML
				CALL EMOTION_PLUS, "笑颜/ワ/楕円/对话框兴奋", MOB_B
				CALL PRINT_NAME_CLO, MOB_B
				PRINTFORMW 『圣诞节には早く寝ないとだよ？ %CALLNAME:TARGET%君』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/ヮ/红晕", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「‥‥‥うっせえよ。いい加減そのネタでからかうのやめろっつーのに‥‥」
				PRINTFORML
				PRINTFORMW ――――――くそぅ‥‥これから毎年このネタで、%CNAME("一人称")%はからかわれるのか？
				PRINTFORML
			ELSEIF TEXTS("日期対応イベント") == "情人節翌日"
				CALL EMOTION_PLUS, "笑颜/ワ/红晕/对话框兴奋", MOB_A
				CALL PRINT_NAME_CLO, MOB_A
				PRINTFORMW 『ねえねえ%CALLNAME:TARGET%君。これ给っ』
				PRINTFORML
				CALL EMOTION_PLUS, "笑颜/ワ/红晕/对话框兴奋", MOB_B
				CALL PRINT_NAME_CLO, MOB_B
				PRINTFORMW 『だから白色情人節のお返し、ちょうだいね？』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/心情差", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「‥‥‥‥おめえら、情人節に遅刻してきた上に、お返し要求かよ」
				PRINTFORMW 「ったく、図々しいやつらだよ‥‥‥」
				PRINTFORML
				PRINTFORMW きっと聖バレンチヌウスも呆れてるに違いねえよ。
				PRINTFORML
			ELSEIF TEXTS("日期対応イベント") == "白色情人節"
				CALL EMOTION_PLUS, "笑颜/ワ/红晕/对话框開心", MOB_A
				CALL PRINT_NAME_CLO, MOB_A
				PRINTFORMW 『%CALLNAME:TARGET%君っ！ 今日は白色情人節だよ！』
				PRINTFORML
				CALL EMOTION_PLUS, "笑颜/ワ/红晕/对话框開心", MOB_B
				CALL PRINT_NAME_CLO, MOB_B
				PRINTFORMW 『巧克力のお返しちょうだい！ %CALLNAME:TARGET%君っ！』
				PRINTFORML
				CALL EMOTION_PLUS, "重置/心情差", TARGET
				CALL PRINT_NAME_CLO, TARGET
				PRINTFORMW 「‥‥‥あんな安っちい巧克力でしかも翌日だったくせに。　　　ほらよっ」
				PRINTFORML
				PRINTFORMW 『『やったぁ～～っ♪』』
				PRINTFORML
			ELSE
				IF DAYEV("試験当日")
					CALL EMOTION_PLUS, "重置/心情差/对话框・・・", TARGET
					CALL PRINT_NAME_CLO, TARGET
					PRINTFORMW 「‥‥‥さっきから伊東と藤本は何やってんだ？」
					PRINTFORML
					CALL EMOTION_PLUS, "〇〇/对话框乱", MOB_A
					CALL PRINT_NAME_CLO, MOB_A
					PRINTFORMW 『終わった～‥‥‥‥』
					PRINTFORML
					CALL EMOTION_PLUS, "〇〇/对话框・・・", MOB_B
					CALL PRINT_NAME_CLO, MOB_B
					PRINTFORMW 『色々終わった‥‥‥』
					PRINTFORML
				ELSEIF RAND:5 == 0
					CALL EMOTION_PLUS, "＞＜/△/对话框乱", MOB_B
					CALL PRINT_NAME_CLO, MOB_B
					PRINTFORMW 『%CALLNAME:TARGET%く～んっ！ 英語の教科書貸して君ない？』
					PRINTFORML
					CALL EMOTION_PLUS, "重置/半目/蹙眉短/△/对话框汗", TARGET
					CALL PRINT_NAME_CLO, TARGET
					PRINTFORMW 「はぁ？ 同じクラスなんだから、貸せるわけねえだろ」
					PRINTFORMW 「伊東はどうしたんだよ。教科書なら伊東に見せてもらえよ」
					PRINTFORML
					CALL EMOTION_PLUS, "＞＜/△/对话框乱", MOB_A
					CALL PRINT_NAME_CLO, MOB_A
					PRINTFORMW 『揃って忘れたの～‥‥ %CALLNAME:TARGET%君は森本桑と１冊にしない？』
					PRINTFORML
					CALL EMOTION_PLUS, "重置/心情差/对话框憤怒", TARGET
					CALL PRINT_NAME_CLO, TARGET
					PRINTFORMW 「バカな事言ってねえで、さっさと他のクラスのやつんとこ借りに行けっ」
					PRINTFORML
				ELSEIF RAND:4 == 0
					CALL EMOTION_PLUS, "笑颜/红晕/对话框開心", MOB_A
					CALL PRINT_NAME_CLO, MOB_A
					PRINTFORMW 『%CALLNAME:TARGET%君、漫研入って君ない？』
					PRINTFORML
					CALL EMOTION_PLUS, "笑颜/红晕/对话框開心", MOB_B
					CALL PRINT_NAME_CLO, MOB_B
					PRINTFORMW 『漫研入って我たちにネタ提供してよ、%CALLNAME:TARGET%君』
					PRINTFORML
					CALL EMOTION_PLUS, "重置/心情差/对话框乱", TARGET
					CALL PRINT_NAME_CLO, TARGET
					PRINTFORMW 「なんで%CNAME("一人称")%がＢＬ的なネタをおめえらに提供しなきゃなんだよ‥‥」
					PRINTFORML
					PRINTFORMW 『『だって%CALLNAME:TARGET%君かっこいいし、腐男子なんてネタとしてオイシイじゃないっ!!』』
					PRINTFORML
				ELSEIF RAND:3 == 0
					CALL EMOTION_PLUS, "斜眼/ワ/楕円/对话框兴奋", MOB_A
					CALL PRINT_NAME_CLO, MOB_A
					PRINTFORMW 『ねえねえ%CALLNAME:TARGET%君知ってる？』
					PRINTFORML
					CALL EMOTION_PLUS, "斜眼/ワ/楕円/对话框兴奋", MOB_B
					CALL PRINT_NAME_CLO, MOB_B
					PRINTFORMW 『この学校にある変な部活の噂っ！』
					PRINTFORML
					CALL EMOTION_PLUS, "重置/心情差/飘忽/对话框・・・", TARGET
					CALL PRINT_NAME_CLO, TARGET
					PRINTFORMW 「‥‥‥変な部活ってどんな部活なんだよ？」
					PRINTFORML
					PRINTFORMW ・・・・・・・・・・・・
					PRINTFORMW ・・・・・・
					PRINTFORMW ・・・
					PRINTFORML
					PRINTFORMW %CNAME("二人称")%の馬鹿野郎。あの部活がちょっと噂になってるじゃんよ‥‥‥
					PRINTFORML
				ELSEIF COND("体育")
					CALL SETFLAG, "体操服姿になる", MOB_A
					CALL EMOTION_PLUS, "困扰眉/飘忽/半開/叹气", MOB_A
					CALL PRINT_NAME_CLO, MOB_A
					PRINTFORMW 『はぁ～‥‥‥ 今日は体育ある～』
					PRINTFORML
					CALL SETFLAG, "体操服姿になる", MOB_B
					CALL EMOTION_PLUS, "困扰眉/飘忽/半開/叹气", MOB_B
					CALL PRINT_NAME_CLO, MOB_B
					PRINTFORMW 『体育なんか、なくなっちゃえばいいのに‥‥』
					PRINTFORML
					CALL SETFLAG, "体操服姿になる", TARGET
					CALL EMOTION_PLUS, "重置/心情差/对话框汗", TARGET
					CALL PRINT_NAME_CLO, TARGET
					PRINTFORMW 「んなこと变成了ら、おめえら絶対運動不足になりそうだよな‥‥‥」
					PRINTFORML
					PRINTFORMW 『『体育嫌～いっ』』
					PRINTFORML
				ELSEIF COND("水泳")
					CALL SETFLAG, "泳装姿になる", TARGET
					CALL EMOTION_PLUS, "重置/笑颜２/红晕/对话框兴奋", TARGET
					CALL PRINT_NAME_CLO, TARGET
					PRINTFORMW 「よっす。今日は授業に泳池があったよな？」
					PRINTFORML
					CALL SETFLAG, "泳装姿になる", MOB_A
					CALL EMOTION_PLUS, "困扰眉/飘忽/半開/对话框尷尬/叹气", MOB_A
					CALL PRINT_NAME_CLO, MOB_A
					PRINTFORMW 『あ～ぁ、ス領帯ルが良かったら泳装だって喜んで着るのに‥‥』
					PRINTFORML
					CALL SETFLAG, "泳装姿になる", MOB_B
					CALL EMOTION_PLUS, "困扰眉/飘忽/半開/对话框尷尬/叹气", MOB_B
					CALL PRINT_NAME_CLO, MOB_B
					PRINTFORMW 『ほんとにね～、泳池が嫌いってわけじゃないのに～‥‥』
					PRINTFORML
				ELSE
					CALL EMOTION_PLUS, "对话框兴奋", MOB_A
					CALL PRINT_NAME_CLO, MOB_A
					PRINTFORMW 『おはよ～、%CALLNAME:TARGET%君』
					PRINTFORML
					CALL EMOTION_PLUS, "对话框兴奋", MOB_B
					CALL PRINT_NAME_CLO, MOB_B
					PRINTFORMW 『%CALLNAME:TARGET%君おはよ～っ』
					PRINTFORML
					CALL EMOTION_PLUS, "重置/刚睡醒", TARGET
					CALL PRINT_NAME_CLO, TARGET
					PRINTFORM 「%TEXTR("おはよ/はよーっす/ん‥‥‥おはよ/おはよう")%、伊東と藤本。
					IF COND("春")
						PRINTFORMW %TEXTR(@"今日はなんかあったかくねえ？%CNAME("一人称")%眠くなりそうだよ。/今日はなんかいつもより、いい風が吹いてるよな？/なんか今日って、ポカポカしてる気がしねえ？")%」
					ELSEIF COND("夏")
						PRINTFORMW %TEXTR(@"いやはや、参るぐれえ日差しが很强よな/今日は暑くねえ？ 絶対いつもより暑いよな？/なんかいつもより太陽ヤベえよな？/すげえ寝苦しくてさ、寝不足なんだよ%CNAME("一人称")%")%」
					ELSEIF COND("秋")
						PRINTFORMW %TEXTR("今日は少し冷えねえ？ 秋だからかな？/けっこう最近涼しくなったよな～/やっとちょっと過ごしやすい季節变成了よな/だんだん葉っぱに色が付いてきたよな")%」
					ELSE
						PRINTFORMW %TEXTR(@"今日はすげえ風が冷たくね？/寒いよな、息が白色もんよ/今日はちょっと寒さがマシじゃね？/すげえ冷え込んできてねえ？")%」
					ENDIF
					PRINTFORML
					PRINTFORMW 今日も学校は平和だ‥‥
					PRINTFORML
				ENDIF
			ENDIF
		ELSEIF CEVENT("森本まい") == 0
			CALL EMOTION_PLUS, "紅潮/会話口", MOB_C
			CALL PRINT_NAME_CLO, MOB_C
			PRINTFORMW 『おはよう、%CALLNAME:TARGET%君。学校、少しは慣れてきた？』
			PRINTFORML
			PRINTFORMW 斜め前に座る女子が振り返って声をかけてきてくれた。
			PRINTFORMW えーと、森本まい桑‥‥‥だっけ？ 垂眼な印象の優しげで可爱、ちょっと委員長領帯プの子だ。
			PRINTFORMW きっと編入性の%CNAME("一人称")%に気を使って声をかけてきてくれたんだろう。
			PRINTFORML
			CALL EMOTION_PLUS, "重置/ヮ", TARGET
			CALL PRINT_NAME_CLO, TARGET
			PRINTFORMW 「桑きゅな、森本。まだ全部に慣れたわけじゃねえけど、少しは慣れてきたぞ」
			PRINTFORML
			PRINTFORMW 授業が始圆圈までの少しの時間、%CNAME("一人称")%は委員長女子の森本と楽しく喋って過ごした。
			PRINTFORML
			CALL SET_CEVENT, "森本まい"
			CFLAG:森本まい += 1
		ELSEIF CEVENT("婦女子コンビ") == 0
			CALL EMOTION_PLUS, "笑颜/会話口/对话框兴奋", MOB_A
			CALL PRINT_NAME_CLO, MOB_A
			PRINTFORMW 『%CALLNAME:TARGET%君%CALLNAME:TARGET%君っ！ 貸した本読んでくれた？』
			PRINTFORML
			CALL EMOTION_PLUS, "笑颜/会話口/对话框兴奋", MOB_B
			CALL PRINT_NAME_CLO, MOB_B
			PRINTFORMW 『あれすご～く良かったでしょ？ ね？ %CALLNAME:TARGET%君っ!!』
			PRINTFORML
			CALL EMOTION_PLUS, "重置/心情差/对话框憤怒", TARGET
			CALL PRINT_NAME_CLO, TARGET
			PRINTFORMW 「面白かったかどうかはともかく、なんで%CNAME("一人称")%にあれをススメたのかを小一時間ほど問い詰めたいよ‥‥」
			PRINTFORML
			PRINTFORML
			CALL PRINT_STRW, @"『やぁね～っ！ そんなの、我たちが腐女子だからに決まってるじゃなぁい_UH_』"
			PRINTFORML
			CALL EMOTION_PLUS, "重置/心情差/对话框憤怒", TARGET
			CALL PRINT_NAME_CLO, TARGET
			PRINTFORMW 「‥‥‥‥誰かこの腐女子どもを焼却処分にしてやってくれ」
			PRINTFORML
			CALL SET_CEVENT, "婦女子コンビ"
		ELSEIF CEVENT("あほコンビ") == 0
			CALL EMOTION_PLUS, "＞＜/大口/对话框兴奋", MOB_E
			CALL PRINT_NAME_CLO, MOB_E
			PRINTFORMW 『%CALLNAME:TARGET%～、数学のノート写さして君ねえ？』
			PRINTFORMW 『今度提出なのに、ノート真っ白なんだよ～』
			PRINTFORML
			CALL EMOTION_PLUS, "＞＜/大口/对话框兴奋", MOB_D
			CALL PRINT_NAME_CLO, MOB_D
			PRINTFORMW 『俺も俺も～っ』
			PRINTFORML
			CALL EMOTION_PLUS, "心情差", TARGET
			CALL PRINT_NAME_CLO, TARGET
			PRINTFORMW 「は？ 編入してきたばっかの%CNAME("一人称")%が、ノート埋まってるわけねえだろ？」
			PRINTFORML
			PRINTFORMW 『『それでも真っ白よりはマシじゃんか～』』
			CALL EMOTION_PLUS, "心情差/叹气", TARGET
			CALL PRINT_NAME_CLO, TARGET
			PRINTFORMW 「誰か何とかしてくれよ、このアホどもを‥‥」
			PRINTFORML
			CALL SET_CEVENT, "あほコンビ"
		ELSE
			IF RAND:3 == 0
				PRINTFORML
				PRINTFORMW 「　　　‥‥‥‥‥であるから、%TEXTR("物体Aから物体Bに力をはたらかせると、物体Bから物体Aに/Michael told me that he would arrive at three, but he hasn't come/この時、式の2(ab)のbに代入するのは/流れを感じることだけが大切なのだとしたら/1825年にオランダの船を除く欧米の船を砲撃し、追い払うことを命じ")%‥‥‥」
				PRINTFORML
				PRINTFORMW 制服着て頬杖ついて老师の言葉を聞き的同时、黒板に板書された文字をノートに写しとっていく。
				PRINTFORMW %CNAME("一人称")%ってなんか、真面目な学生風味じゃね？
				PRINTFORML
			ELSEIF COND("体育")
				PRINTFORML
				PRINTFORMW カチッ
				PRINTFORML
				PRINTFORMW 「11秒62っ！ すげえ、你けっこう足早えのなっ!!」
				PRINTFORML
				PRINTFORMW 体育の短距離走領帯ム測定で、足の早い生徒に賞賛を贈って笑い合う。
				PRINTFORMW ‥‥‥こういうのが友だちっつーやつなのかな？ なんて、ちょっと思ったりしながら‥‥
				PRINTFORML
			ELSE
				PRINTFORML
				PRINTFORMW 「‥‥‥‥‥ふぁ～‥‥ いい外、天気だな～」
				PRINTFORML
				PRINTFORMW ふと、窓の外見るとすげえいい天気だ。なんか平和だなー‥‥
				PRINTFORMW 少し気だるい天気のいい窓際の席で、まったり受ける授業は、控えめに言って最高に楽しいなっ♪
				PRINTFORML
			ENDIF
		ENDIF
	ENDIF
	CALL DEL_MOB
CASE "お仕事"

CASE "归途"
	;SAVESTR:現在位置 と SAVESTR:归途の行動 を決定する
	CALL EMOTEFACE, "挎包", TARGET
	CALL SETFLAG, "遭遇地点"
	CALL EMOTEFACE, "挎包", TARGET
	;地の文の前の台詞がある場合はここに書く
	SELECTCASE SAVESTR:現在位置
	CASE "阵雨"
		CALL EMOTION_PLUS, "惊嚇/挎包", TARGET
		PRINTFORMW 「ちょ、降らねえと思ってたのに降ってきたぞ、おいっ。%CNAME("一人称")%傘持ってねえのに…」
		PRINTFORMW 「あ、%CNAME("二人称")%傘持ってたか？ 悪いけど入れて君ね？」
	ENDSELECT

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

	SELECTCASE SAVESTR:归途の行動
	CASE "神社"
		CALL EMOTION_PLUS, "重置/挎包", TARGET
		PRINTFORMW 「へえ、すっげえでけえイチョウの木だなぁ‥‥」
		IF COND("秋")
			PRINTFORMW 「ん？ ギンナンくせえっつー事はこ此花メスのイチョウっつー事か」
		ENDIF
	CASE "相合傘"
		CALL EMOTION_PLUS, "重置/挎包", TARGET
		PRINTFORMW 「入れてくれて桑きゅ、%CNAME("二人称")%。%CNAME("一人称")%傘持ってなくてさ、まいったよ‥‥」
	CASE "内衣選び", "泳装選び"
		CALL EMOTION_PLUS, "红潮恍惚/挎包", TARGET
		PRINTFORMW 「ったくよ～‥‥なんで男２人でこんなとこ来てんだろうな？ %CNAME("二人称")%…」
	CASE "採購"
		SELECTCASE SAVESTR:現在位置
		CASE "超市"
			CALL EMOTION_PLUS, "重置/笑颜２/大口/挎包", TARGET
			PRINTFORMW 「お？ %TEXTR("巧克力点心/玉子/牛乳/ヨーグルト/シャンプー")%が特売してんじゃんっ！」
			PRINTFORMW 「せっかくだし買ってこうぜ、%CNAME("二人称")%」
		CASE "茶葉の量り売り"
			CALL EMOTION_PLUS, "重置/笑颜２/大口/挎包", TARGET
			PRINTFORMW 「あ、この店咖啡豆も売ってんのか。んじゃちょっと買ってこかな？」
		ENDSELECT
	;特定行動でのセリフ。DAILY_MESSAGE, "归途"の地の文を参考に随意場合分けしてください。
	CASE "站着读书"
		SELECTCASE SAVESTR:現在位置
		CASE "书店"
			CALL EMOTION_PLUS, "重置/挎包", TARGET
			PRINTFORMW 「%CNAME("二人称")%、%CNAME("一人称")%読み終わったんだけど、そろそろ帰んねえ？」
		CASE "レンタルショップ"
			CALL EMOTION_PLUS, "重置/挎包", TARGET
			PRINTFORMW 「%CNAME("二人称")%、これ一気に借りれるみてえだけど、せっかくだし借りて読まねえ？」
		ENDSELECT
	CASE "物色游戏"
		SELECTCASE SAVESTR:現在位置
		CASE "游戏店"
			CALL EMOTION_PLUS, "重置/笑颜２/大口/挎包", TARGET
			PRINTFORMW 「あ、%CNAME("二人称")%あったぞ！ ここだよ%CNAME("二人称")%の探してる游戏っ」
		CASE "二手商店"
			CALL EMOTION_PLUS, "重置/惊嚇/挎包", TARGET
			PRINTFORMW 「おおぅ！ この游戏、もう中古が売ってんぞ。あ、でも、そんな安くねえかも…」
			CALL EMOTEFACE, "重置/", TARGET
			PRINTFORMW 「そりゃそうか、人気だもんな～‥‥」
		ENDSELECT
	CASE "检查新刊"
		SELECTCASE SAVESTR:現在位置
		CASE "书店"
			CALL EMOTION_PLUS, "重置/挎包", TARGET
			PRINTFORMW 「ああ、今週は今日がそれの発売日だったけ？ どうすんだ？ それ買って帰んの？」
			PRINTFORMW 「%CNAME("一人称")%は站着读书でもかまわねえけど」
		CASE "レンタルショップ"
			CALL EMOTION_PLUS, "重置/挎包", TARGET
			PRINTFORMW 「%CNAME("二人称")%、新刊がもう借りれるみてえだけど、せっかくだし借りて帰んねえ？」
		ENDSELECT
	;基本ハルは買食物大好きっこだから、バリエーションをもう少し増やしたい。
	CASE "買食物"
		SELECTCASE SAVESTR:現在位置
		CASE "肉店"
			CALL EMOTION_PLUS, "重置/笑颜２/大口/挎包", TARGET
			PRINTFORMW 「コロッケうめえ～っ♪ 買食物しながらの归途って、なんでこんな楽しいんだろうなっ？」
		CASE "便利店"
			CALL EMOTION_PLUS, "重置/笑颜２/大口/挎包", TARGET
			PRINTFORMW 「便利店寄ると、つい、から油炸買っちまうんだよな～♪ 特に新しい味見つけるとなおさらだっ」
		CASE "漢堡店"
			CALL EMOTION_PLUS, "重置/挎包", TARGET
			PRINTFORMW 「新商品が出ると食わずにいられねえのがバーガーショップだよなー」
			CALL EMOTEFACE, "重置/飘忽/嘟嘴/挎包", TARGET
			PRINTFORMW 「それが戦略街道だとしても、ついつい乗っちまわねえ？」
		CASE "洋点心店"
			CALL EMOTION_PLUS, "重置/挎包", TARGET
			PRINTFORM 「%CNAME("二人称")%はシュー阴蒂ーム何味にするか決めたか？
			PRINTFORMW %CNAME("一人称")%今日は%TEXTR("定番のバニラ/抹茶味/草莓味/巧克力チップ入り/ココア")%にするよ」
		CASE "日式点心店"
			CALL EMOTION_PLUS, "重置/嘟嘴/红晕", TARGET
			PRINTFORMW 「ここの団子ってうめえけど、一粒がちっせえのが難点だよなあ‥‥ ついもうひと串欲しくなる…」
			CALL EMOTEFACE, "重置/憤怒眉/一文字/红晕", TARGET
			PRINTFORMW 「はっ！これが経営戦略っつーやつか‥‥」
		CASE "菠萝包店"
			CALL EMOTION_PLUS, "重置/嘟嘴/红晕/挎包", TARGET
			PRINTFORMW 「これが噂の菠萝包かぁ… ん！ 思ってたよりぜんぜんうめえなっ」
		CASE "甜甜圈店"
			CALL EMOTION_PLUS, "重置/ワ/红晕", TARGET
			PRINTFORMW 「%CNAME("二人称")%、そっちのひと口君ねえ？ %CNAME("一人称")%のもひと口分けるから」
			IF TALENT:相思相愛 && RAND:2
				CALL EMOTEFACE, "重置/心情差", TARGET
				CALL PRINT_STRW, @"「…って、あーん_UH_しようとすんじゃねえ。普通にちぎってよこせよバカっ」"
			ENDIF
		ENDSELECT
	CASE "レンタルショップ"
		SELECTCASE SAVESTR:归途の行動
		CASE "物色新作"
			CALL EMOTION_PLUS, "重置/挎包", TARGET
			PRINTFORMW 「あ、新作でこれ出たのか。観たかったし借りて帰ろうかな？」
		CASE "準新作を物色"
			CALL EMOTION_PLUS, "重置/憤怒眉/へ字/红晕/挎包", TARGET
			PRINTFORMW 「いい加減帰ろうぜ～%CNAME("二人称")%っ！」
			PRINTFORMW 「そのへんは何度も観たくせに、毎回選ぶの時間かけすぎだよっ」
		ENDSELECT
	CASE "游戏中心"
		SELECTCASE SAVESTR:归途の行動
		CASE "対戦游戏"
			CALL EMOTION_PLUS, "惊嚇/红晕/挎包", TARGET
			PRINTFORMW 「あ、ちょっ%CNAME("二人称")%ズリいぞっ！今のハメだろっ！ハメっ!!」
		CASE "クレーン游戏"
			CALL EMOTION_PLUS, "重置/憤怒眉/嘟嘴２/红晕/挎包", TARGET
			PRINTFORMW 「もうちょいもうちょい‥‥‥‥行け行け行け～っ！」
			CALL EMOTION_PLUS, "重置/笑颜２/大口/红晕/挎包", TARGET
			PRINTFORMW 「おっしゃ～！ やったな%CNAME("二人称")%、取れたぞっ!!」
		CASE "玩音游"
			PRINTFORMW 『もういっかい遊べるドンっ♪』
			CALL EMOTION_PLUS, "重置/心情差/叹气", TARGET
			PRINTFORMW 「またかよ～… %CNAME("二人称")%、ちょっと飽きたから代わって君ね？」
			PRINTFORML
			PRINTFORMW ハルは運動神経がいいくせに玩音游は苦手らしく、これ系の游戏は失敗続きでだんだん飽きてくるようだ。
		CASE "街机游戏"
			CALL EMOTION_PLUS, "惊嚇/挎包", TARGET
			PRINTFORMW 「うぉ！ すっげえいっぱいメダル出てきたっ！ こんなの使い切れっか？」
		CASE "大頭贴"
			CALL EMOTION_PLUS, "重置/笑颜２/大口/红晕/挎包", TARGET
			PRINTFORMW 「うわっ！ はは、見ろこれ、ちょっと目がデカすぎて、ちょっと気持ち悪くねえ？」
			;打情骂俏も相思相愛变成了らするようになる
			IF TALENT:相思相愛 && RAND:4 == 0
				CALL EMOTION_PLUS, "重置/飘忽/呀哒/赤面/圓圈", TARGET
				PRINTFORMW 「ちょ、近え近えっ！ 近すぎだよ%CNAME("二人称")%っ!! も～っ！」
				PRINTFORMW 「外から見えねえからって、チョーシ乗りすぎだぞてめえっ!!」
			ENDIF
		ENDSELECT
	CASE "情人旅館"
		CALL EMOTION_PLUS, "重置/心情差/挎包", TARGET
		PRINTFORMW 「うゎ～‥‥ あそこ爱心と粉紅の看板文字っつーとこがいかにもな建物だよな～‥‥」
		PRINTFORML
		PRINTFORMW 「は？ %CNAME("一人称")%は行かねえぞ。行きてえなら一人で行きやがれ、バカ%CNAME("二人称")%」
		PRINTFORMW 「見ろさっきから%TEXTR("あっちでおっ桑/油腻的中年男人/似乎见过的男学生")%がこっちジロジロ見てるじゃねえか。ほら行くぞっ」
	CASE "繞道"
		CALL EMOTION_PLUS, "重置/笑颜２/大口/挎包", TARGET
		PRINTFORMW 「%CNAME("二人称")%、たまにはちょっと道草食ったり遠回りして帰ってみるのも楽しいなっ」
	CASE "直帰"
		CALL EMOTION_PLUS, "重置/笑颜２/大口/挎包", TARGET
		PRINTFORMW 「こうやってただ胸罩胸罩歩いてるだけでも、それなりに楽しいなっ」
	CASE "圣诞节前夕"
		IF TALENT:恋慕 && RAND:5 == 0
			CALL EMOTION_PLUS, "飘忽/一文字/红晕/挎包", TARGET
			PRINTFORMW 「‥‥‥‥%CNAME("二人称")%今週末ってさ、いや、やっぱ何でもねえ」
		ELSE
			CALL EMOTION_PLUS, "重置/飘忽/一文字/挎包", TARGET
			PRINTFORMW 「そういやもうすぐ、圣诞节なんだな。%CNAME("二人称")%はどうせ、誰かと约会なんだろ？」
		ENDIF
	CASEELSE
		CALL EMOTION_PLUS, "重置/挎包", TARGET
		PRINTFORMW 「ん。そろそろ帰ろっか」
	ENDSELECT

;归途イベントの後になんとなく情人旅館に行こっかとなった際のセリフです
;STR:Ｈする場所 で場所を情人旅館以外にする事も出来ます。（例 STR:Ｈする場所 = 部室
CASE "放課後Ｈ的邀请"
	IF TALENT:恋慕
		CALL EMOTION_PLUS, "重置/飘忽/一文字/赤面", TARGET
		PRINTFORMW 「…………………」
	ENDIF
;お浴室に一緒に入ろうと誘われた場合。TFLAG:床イン = 1とすることで強制的にエロにも行ける
;浴室でスタートする場合には、代わりにTFLAG:お浴室でＨ = 1として下さい
CASE "一緒にお浴室"
	PRINTFORMW 「ぅわ、バカやめろ!! 今は普通に浴室の時間だよっ！」

;[999]選択後の台詞。TFLAG:床イン = 1とすることで強制的にエロにも行ける
;浴室でスタートする場合には、代わりにTFLAG:お浴室でＨ = 1として下さい
CASE "休憩"
	;台詞を書いたらRETURN 0を消してください
	IF PLACE("自宅")
		IF COND("夜")
			;お浴室
			IF PLACE("居間")
				PRINTFORMW 「あれ？ %CNAME("二人称")%も浴室か？ なら%CNAME("一人称")%はもうちょい後にするよ」
				PRINTFORML
				PRINTFORMW 「え？ バカいっしょに入るわけねえだろ？」
			ELSE
				PRINTFORMW 「ああ、もうこんな時間か。そろそろ寝ないと、明日起きれねえから、寝ようぜ」
			ENDIF
		ELSE
			PRINTFORMW 「ん？‥‥‥%CNAME("二人称")%、ヒマなら%CNAME("一人称")%と%TEXTR("トランプ/ポーカー/オセロ/游戏")%でもしねえ？」
		ENDIF
	;ここは実質昼のみ
	ELSEIF CEVENT("繞道ハル") && CEVENT("繞道／ハル") == 0
		TFLAG:地の文スキップ = 1
		PRINTFORMW そういえば%CALLNAME:TARGET%に、返回前の便利店を誘われたけど‥‥‥
		CALL PRINT_SELECT, "　行く/　返回"
		IF RESULT == 0
			CALL DRAWLINES, ""
			CALL K77_HaLL5c68a32_STOPBY_CONVENIENCESTORE
			CALL SET_CEVENT, "繞道／ハル"
		ELSEIF RESULT == 1
			PRINTFORMW 「そっか。じゃ、%CNAME("二人称")%は先帰ってて」
		ENDIF
	ELSEIF PLACE("部室")
		IF TALENT:恋慕 && RAND:10 == 0
			CALL EMOTEFACE, "重置/飘忽/へ字/赤面", TARGET
			PRINTFORMW 「‥‥‥%CNAME("二人称")%、今日是っしょに帰らねえ？」
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「ん？ 部活終わりか？ だったら帰って%TEXTR("英語/数学/現国/化学/歴史")%の課題でもやろっかな～？」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「%CNAME("二人称")%、游戏中心に新しい%TEXTR("対戦游戏/シューティング游戏/クレーン游戏のプライス/玩音游/体感游戏")%が入ったらしいぜ。帰りに一勝負やってかねえ？」
			ELSE
				PRINTFORMW 「おっしゃ帰ろうぜ～。今日も1日、お疲れ～」
			ENDIF
		ENDIF
	;場所移動後
	ELSE
		IF RAND:3 == 0
			PRINTFORMW 「あ、帰んの？ もう用事はすんだのか？」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「は？ いったい何するために%CNAME("一人称")%はここ来たんだ‥‥‥」
		ELSE
			PRINTFORMW 「え～、わざわざここまで来たのに、もう帰んの？ 別にいいけどさ～‥‥」
		ENDIF
	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("亲手自制点心")
		IF TALENT:料理擅長 == 2 && RAND:3 == 0
			PRINTFORMW 「よっす%CNAME("二人称")%。今日の点心は%TEXTS("点心")%だぞ」
			RETURN 1
		ELSEIF TALENT:料理擅長 && RAND:2 == 0
			PRINTFORMW 「%CNAME("二人称")%、%TEXTS("点心")%あるから茶にしよっか」
			RETURN 1
		;この分岐の時は下のTEXTS("点心")で分岐する台詞へと進む
		ELSE
			PRINTFORMW 「%CNAME("二人称")%、%TEXTS("点心")%食おうぜ、%TEXTS("点心")%っ」
		ENDIF
	ELSE
		RETURN 1
	ENDIF
	SELECTCASE TEXTS("点心")
	CASE "戚风蛋糕"
		PRINTFORMW 「あ、今日戚风蛋糕だから、冷蔵庫から付け合わせの生阴蒂ームとって君ね？」
	CASE "スコーン"
		PRINTFORMW 「今日のは%TEXTR("プレーン/紅茶の/抹茶の/巧克力チップ")%スコーンだ」
		PRINTFORMW 「ジャムとクロテッド阴蒂ームがあるから、たっぷりつけて食えよ？」
	CASE "ドーナツ"
		PRINTFORMW 「今日の点心はドーナツだぞ。%CNAME("一人称")%は巧克力が好きだけど、%CNAME("二人称")%は？」
	CASE "アップル餡餅"
		PRINTFORMW 「昨日りんごが安かったから、アップル餡餅にしてみたよ」
	CASE "野菜蛋糕"
		PRINTFORMW 「今日は%TEXTR("ニンジン/かぼちゃ/さつまいも/サトイモ/小松菜")%の野菜蛋糕持ってきたぞ」
	CASE "フルーツタルト"
		PRINTFORMW 「今日は%TEXTR("木苺/アメリカンチェリー/桃/苺/橘子")%のタルトだ。甘さは控えめだからな」
	CASE "乳酪蛋糕"
		PRINTFORMW 「こういうベイクド乳酪蛋糕には、やっぱ咖啡じゃねえ？」
	CASE "ガトーショコラ"
		PRINTFORML 「ん？ 意外と簡単なんだぞ、このガトーショコラ。炊飯器で作るやつだし」
	CASE "パウンド蛋糕"
		PRINTFORML 「%CNAME("二人称")%、ナッツたっぷりのパウンド蛋糕食うか？」
	CASE "罩杯蛋糕"
		PRINTFORMW 「そんな凝ったもんじゃねえけど、罩杯蛋糕焼いてみた」
		PRINTFORMW 「ははっ。材料はホット蛋糕ミックスなんだよ」
	CASE "ラスク"
		PRINTFORMW 「今日はお手軽にラスクだ。簡単だから%CNAME("二人称")%でも出来んじゃね？」
	CASE "冰BOX曲奇"
		PRINTFORMW 「%CNAME("二人称")%、今日はバニラとココアの冰BOX曲奇だぞ」
		PRINTFORMW 「いっぱいあるから、たっぷり食えよ？」
	CASEELSE
	ENDSELECT
;点心１：料理擅長１になると持ってくるようになる。		パウンド蛋糕、罩杯蛋糕、冰BOX曲奇、ラスク
;点心２：料理擅長２になると持ってくるようになる。		ガトーショコラ、乳酪蛋糕、フルーツタルト、野菜蛋糕
;点心３：便当が１５０超えると持ってくるようになる？	アップル餡餅、ドーナツ、スコーン、戚风蛋糕

;これは昼か夜
CASE "打招呼"
	IF COND("夜")
		GREETING = ばんは
	ELSEIF COND("昼")
		GREETING = こんちゃー
	ELSE
		GREETING = はよ～
	ENDIF
	SELECTCASE STR:日常イベント名
	CASE "打招呼ハグ"
			;初めて
		IF DEVENT(STR:日常イベント名) == 0
			CALL EMOTION_PLUS, "重置/心情差", TARGET
			PRINTFORMW 「よっす%CNAME("二人称")%‥‥って、ここは外国かよ‥‥‥」
		ELSEIF COND("易出汗", MASTER)
			CALL EMOTION_PLUS, "心情差/", TARGET
			PRINTFORMW 「もう‥‥！ 汗まみれなのに抱きついて君なよ、バカ%CNAME("二人称")%っ」
			IF COND("易出汗")
				PRINTFORMW 「とにかく出口ろ。お互い汗まみれでくっつきあうとか、頭おかしいからっ」
				PRINTFORMW 「まず汗を拭け汗をっ！ ‥‥ほんとしょーがねえ野郎だなっ」
				PRINTFORML
				IF TALENT:恋慕
					PRINTFORMW %CALLNAME:MASTER%が抱きついたことを憤怒ながらも、%CALLNAME:TARGET%は毛巾を差し出してくれた。
					PRINTFORML
				ENDIF
			ENDIF
		ELSEIF TALENT:恋慕 && RAND:3 == 0
			CALL EMOTION_PLUS, "重置/红晕", TARGET
			PRINTFORMW 「ああうん。‥‥‥ったくよ～‥‥‥‥むぅ‥‥‥」
		ELSE
			;你に先に打招呼をされた
			IF CFLAG:打招呼した == 0
				CALL EMOTION_PLUS, "心情差", TARGET
				PRINTFORMW 「出口ろ%CNAME("二人称")%‥‥ 打招呼で抱きつくこたねえだろ」
			ELSE
				CALL EMOTION_PLUS, "心情差", TARGET
				PRINTFORMW 「‥‥%GREETING%」
				PRINTFORMW 「って抱きつくなっ！ ここは日本だ外国じゃねえっ」
			ENDIF
		ENDIF
	CASE "打招呼接吻"
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			CALL EMOTION_PLUS, "心情差/红晕", TARGET
			PRINTFORMW 「ちょ、いきなり何すんだよバカ%CNAME("二人称")%っ！」
		ELSE
			;你に先に打招呼をされた
			IF CFLAG:打招呼した == 0
				CALL EMOTION_PLUS, "心情差/红晕", TARGET
				PRINTFORMW 「‥‥‥%GREETING%じゃねえ」
				PRINTFORMW 「普通地打招呼出来ねえのかよ、普通にさ‥‥‥」
			ELSE
				CALL EMOTION_PLUS, "心情差/红晕/叹气", TARGET
				PRINTFORMW 「‥‥‥%GREETING%」
				PRINTFORMW 「絶対これは普通の打招呼じゃねえ‥‥‥いくら%CNAME("二人称")%が言い張っても騙されねえからな？」
			ENDIF
		ENDIF
	CASE "打招呼口交", "打招呼舐陰"
		IF TALENT:淫核 || TALENT:淫乱 || TALENT:恋慕
			;初めて
			IF DEVENT(STR:日常イベント名) == 0
				CALL EMOTION_PLUS, "憤怒", TARGET
				PRINTFORMW 「おめえにはＴＰＯとかねえわけっ！？ は？ あるからこうやって打招呼してるだぁ？」
				PRINTFORMW 「豆腐の角に頭でもぶつけてこいバカっ!!」
			ELSE
				IF RAND:3 == 0
					CALL EMOTION_PLUS, "憤怒", TARGET
					PRINTFORMW 「いい加減にしろっ!! %CNAME("一人称")%は人前でこういう事されんのやなのっ!!」
				ELSEIF RAND:2 == 0
					CALL EMOTION_PLUS, "憤怒/笑颜２", TARGET
					PRINTFORMW 「おいこら、てめえこれを他人が見たらどう思うかは考えてねえだろっ」
					CALL EMOTEFACE, "重置/憤怒", TARGET
					PRINTFORMW 「他人に見られたら、どう言い繕うつもりなんだよ大馬鹿野郎っ！ 死ねっ！ いっぺん死んで来いバカっ」
					CALL EMOTEFACE, "重置/心情差", TARGET
					PRINTFORMW 「どうせ死んでも生き返るんだし、マジで死んで来いバカっ」
				ELSE
					CALL EMOTION_PLUS, "憤怒", TARGET
					PRINTFORMW 「ちょ、おめえにはＴＰＯとかねえわけっ！？ は？ あるからこうやって打招呼してるだぁ？」
					PRINTFORMW 「豆腐の角に頭でもぶつけてこいバカっ!! いや、おめえなら鉄筋コン阴蒂ートの角でもいいっ!!」
				ENDIF
			ENDIF
		;初めて
		ELSEIF DEVENT(STR:日常イベント名) == 0
			CALL EMOTION_PLUS, "憤怒/", TARGET
			PRINTFORMW 「‥‥‥最低な打招呼だな、おい」
		ELSE
			CALL EMOTION_PLUS, "憤怒/笑颜２", TARGET
			PRINTFORMW 「おいこら、てめえこれを他人が見たらどう思うかは考えてねえだろ」
			CALL EMOTEFACE, "重置/憤怒", TARGET
			PRINTFORMW 「他人に見られたら、どう言い繕うつもりなんだよ大馬鹿野郎っ！ 死ねっ！ いっぺん死んで来いバカっ」
			CALL EMOTEFACE, "重置/心情差", TARGET
			PRINTFORMW 「どうせ死んでも生き返るんだし、マジで死んで来いバカっ」
		ENDIF
	CASEELSE
	;你に先に打招呼をされた
	IF CFLAG:打招呼した == 0
		CALL EMOTION_PLUS, "重置", TARGET
		PRINTFORMW 「あー、うん。よっす、%CNAME("二人称")%‥‥」
	ELSE
		CALL EMOTION_PLUS, "重置", TARGET
		PRINTFORMW 「よっす、%CNAME("二人称")%」
	ENDIF
	ENDSELECT
CASE "叫醒"
	CALL EMOTION_PLUS, "刚睡醒", TARGET
	PRINTFORMW 「ん～‥‥ まだちょっと眠いんだけど…」
;酔った際に眠くなって自分的房間に返回際のセリフ
CASE "眠い"
	CALL EMOTION_PLUS, "刚睡醒", TARGET
	PRINTFORMW 「あ～‥‥‥ 酒のせいか、眠くなってきちまった。先部屋返回わ。休息、%CNAME("二人称")%」
;全裸終了の際のセリフ
CASE "服を着た"
	CALL EMOTION_PLUS, "重置/困扰眉/半目", TARGET
	PRINTFORMW 「や、なんかちっと、弾けすぎたあとって、妙に自分の冷静さが嫌にならねえ？」
;暑かったり躁动难忍してたり酔っぱらってたりで内衣姿变成了際のセリフ
CASE "薄着变成了"
	CALL EMOTION_PLUS, "过电/＞＜/憤怒眉/呀哒/赤面２"
	PRINTFORMW 「もー無理。我慢とか無理っ。あっついんだよっ！」
	PRINTFORML
	PRINTFORMW そう言いながら%CALLNAME:TARGET%は、勢いよく服を脱いだ
;易出汗状態の際に裙の中に扇風機の風を当てた際のセリフ。[粗野]or[開朗]or[小悪魔]限定
CASE "股間に扇風機"
	CALL EMOTION_PLUS, "眯眯眼/大口"
	PRINTFORMW 「あ～‥‥ 涼し～っ」
CASE "Talk"
	SELECTCASE STR:日常イベント名
	;これはCSTR:点心 に亲手自制属性のものが設定されている時のみ
	CASE "夸奖点心"
		CALL EMOTION_PLUS, "重置/笑颜２/大口/红晕"
		PRINTFORMW 「ん？ これうめえ？ %CNAME("二人称")%の口に合うなら、作った甲斐があるよ」
		IF CFLAG:ハル心情差
			CFLAG:ハル心情差 -= 1
		ENDIF
	CASE "夸奖"
		IF TALENT:恋慕 && RAND:2 == 0
			CALL EMOTEFACE, "心情差/飘忽/紅潮２", TARGET
			PRINTFORMW 「・・・・・・・・・・ぁー、ぅん」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ELSE
			IF CFLAG:ハル心情差 && RAND:2 == 0
				CALL EMOTION_PLUS, "心情差", TARGET
				PRINTFORMW 「‥‥‥ふーん。しょーがねえから、ちっとぐれえは心情とられてやんよ」
				CFLAG:ハル心情差 -= 1
			ELSEIF STATE("酔酒")
				CALL EMOTION_PLUS, "酔酒/", TARGET
				PRINTFORMW 「えっへっへ～♪ そうだろ？ %CNAME("一人称")%エライだろ～？」
			ELSE
				IF RAND:2 == 0
					CALL EMOTION_PLUS, "心情差", TARGET
					PRINTFORMW 「はぁ～あ‥‥ む～‥‥ぬ～‥‥何？ %CNAME("一人称")%のご心情取ろうっつーわけ？」」
					STR:日常イベント名 =
				ELSE
					CALL EMOTION_PLUS, "心情差", TARGET
					PRINTFORMW 「‥‥‥‥？ %CNAME("一人称")%なんか%CNAME("二人称")%にいい事したっけ？」
					STR:日常イベント名 =
				ENDIF
			ENDIF
		ENDIF
	CASE "甜言蜜语"
		IF TALENT:恋慕 && RAND:2 == 0
			CALL EMOTION_PLUS, "飘忽/憤怒眉/嘟嘴３/紅潮"
			PRINTFORMW 「・・・・・・・・・・ぉ、ぉぅ」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ELSEIF CALCF("甜言蜜语成功")
			IF CFLAG:ハル心情差 && RAND:2 == 0
				CALL EMOTION_PLUS, "心情差", TARGET
				PRINTFORMW 「‥‥‥ちったぁ心情とろうっつー気があるみてえだな」
				CFLAG:ハル心情差 -= 1
			ELSEIF STATE("酔酒")
				CALL EMOTION_PLUS, "酔酒", TARGET
				PRINTFORMW 「も～♪ そんなことみんなに言ってたら、%CNAME("二人称")%そのうちに刺されんぞ～？」
				IF CFLAG:ハル心情差
					CFLAG:ハル心情差 -= 1
				ENDIF
			ELSE
				IF RAND:3 == 0
					CALL EMOTION_PLUS, "心情差", TARGET
					PRINTFORMW 「はぁ～あ‥‥ む～‥‥」
					STR:日常イベント名 =
					IF CHARA_NUM("室内の邪魔者")
						PRINTFORMW 「人前でそういう事言うの、恥ずかしくねえのか？」
					ENDIF
				ELSEIF RAND:2 == 0
					CALL EMOTION_PLUS, "飘忽/叹气", TARGET
					PRINTFORMW 「ハイハイ。%CNAME("二人称")%は誰にでもそゆ事言うもんな―」
				ELSE
					CALL EMOTION_PLUS, "心情差", TARGET
					PRINTFORMW 「悪魔も惊嚇な甜囁き言葉だな。%CNAME("一人称")%を気分よくさせて、どうしようっつーんだ？」
					STR:日常イベント名 =
				ENDIF
			ENDIF
		ELSE
			PRINTFORMW 「是是。%CNAME("二人称")%は物のついでとか、息するようni↘つー感じでそゆ事言うやつだしな」
		ENDIF
	CASEELSE
		IF CFLAG:ハル心情差 > 15 && RAND:5
			CALL EMOTION_PLUS, "重置/憤怒/嘟嘴/对话框憤怒", TARGET
			PRINTFORMW 「‥‥今は%CNAME("一人称")%、%CNAME("二人称")%とは話したくねえっ」
		ELSEIF CFLAG:ハル心情差 > 5 && RAND:3
			CALL EMOTION_PLUS, "重置/飘忽/へ字/憤怒眉", TARGET
			PRINTFORMW 「‥‥%CNAME("二人称")%なんか、嫌いだ‥‥」
		ELSEIF CFLAG:ハル心情差 && RAND:7 == 0
			CALL EMOTION_PLUS, "重置/憤怒眉/飘忽/一文字", TARGET
			PRINTFORMW 「別に、%CNAME("一人称")%心情悪くなんかねえよ」
		ELSEIF STATE("酔酒")
			IF RAND:3 == 0
				CALL EMOTION_PLUS, "酔酒", TARGET
				PRINTFORMW 「えぇ～？ それがほんとならすげえじゃん%TEXTR(@"%CNAME("二人称","甘え")%/%CNAME("二人称","かな")%")%っ♪」
			ELSEIF RAND:2 == 0
				CALL EMOTION_PLUS, "酔酒", TARGET
				PRINTFORMW 「またまたぁ～♪ %TEXTR(@"%CNAME("二人称","甘え")%/%CNAME("二人称","かな")%")%それ、話盛ってるだろ～？」
			ELSE
				CALL EMOTION_PLUS, "酔酒", TARGET
				PRINTFORMW 「あははぁ～♪ その話ほんとかよ？ %CNAME("一人称")%信じちゃうぞ～？」
			ENDIF
		ELSEIF CEVENT("－１０００") && CEVENT("不安と不満") == 0
			CALL EMOTION_PLUS, "重置/憤怒眉/一文字/本/"
			PRINTFORM 「%TEXTR("う～ん、やっぱこれも‥‥/えーと‥‥‥これは‥‥/むぅ～‥‥これもか‥‥/なるほど‥‥？/ふむ、ぺらり‥‥")%」などと言い的同时、
			PRINTFORMW %CALLNAME:TARGET%は%CALLNAME:MASTER%を無視して、部屋の片隅で何かの情報誌を読んでいる。
			PRINTFORMW そんなに熱心にいったい何を読んでいるんだろう‥‥？
		ELSEIF RAND:5 == 0 && DEVENT("日誌その１０")
			IF TEXTS("日期対応イベント") == "周考"
				CALL EMOTION_PLUS, "重置/本", TARGET
				PRINTFORMW 「ん？ もうすぐテストだろ？ ちっとぐれえ勉強やっとかねえと、赤点とかやだしな」
			ELSEIF TEXTS("日期対応イベント") == "即将到来文化祭"
				CALL EMOTION_PLUS, "重置/", TARGET
				PRINTFORMW 「なんか最近、学校が活気づいてるっつーか、浮ついてる感じがしねえ？」
				CALL EMOTEFACE, "重置/笑颜２/大口/对话框開心", TARGET
				PRINTFORMW 「やっぱ文化祭前だしかな？」
			ELSEIF TEXTS("日期対応イベント") == "圣诞节前夕"
				IF CEVENT("圣诞是ない") == 0
					CALL EMOTION_PLUS, "重置/笑颜２/大口/红晕/对话框開心", TARGET
					PRINTFORMW 「なぁなぁ%CNAME("二人称")%、圣诞って空飛ぶんだろ？」
					PRINTFORMW 「すげえよなぁ？ やっぱ動力は%TEXTR("トナカイが支えてるんだろ？/ソリの下にあるのか？/ジェット燃料で動くのかな？/魔法の類かな？")%」
					PRINTFORMW ‥‥‥‥夢があるの是い事なので、%CALLNAME:MASTER%はあえて%CALLNAME:TARGET%に圣诞是ないとは言わなかった。
				ELSE
					CALL EMOTION_PLUS, "重置/飘忽/一文字/托下巴", TARGET
					PRINTFORMW 「%CNAME("二人称")%、家もそろそろツリー飾らねえ？ やっぱちょっとぐれえ圣诞节してえし‥‥」
					PRINTFORMW %CALLNAME:MASTER%が圣诞を迎える準備だしなと%CALLNAME:TARGET%に言うと、%CALLNAME:TARGET%は真っ赤になって怒った。
					CALL EMOTEFACE, "重置/憤怒/赤面２", TARGET
					PRINTFORMW 「うっせえ！ %CNAME("一人称")%はただ圣诞节のお祭り気分がしてえだけなのっ!!」
					PRINTFORMW どうやら圣诞の事を学校でからかわれたのを思い出したらしい。
				ENDIF
			ELSEIF TEXTS("日期対応イベント") == "圣诞节"
				CALL EMOTION_PLUS, "重置/笑颜２/大口/红晕/对话框開心", TARGET
				PRINTFORMW 「%CNAME("二人称")%、メリ阴蒂っ！ 送禮交換の用意是いか？」
			ELSEIF TEXTS("日期対応イベント") == "兔女郎の日"
				CALL EMOTION_PLUS, "重置/心情差", TARGET
				PRINTFORMW 「は？ 今日は兔女郎の日だから兔の恰好しろだぁ？」
				CALL EMOTEFACE, "重置/目陰効果/半目/憤怒眉/呀哒", TARGET
				PRINTFORMW 「‥‥‥まさか本気で言ってるわけじゃねえだろうな？」
				CALL EMOTION_PLUS, "重置/惊嚇", TARGET
				PRINTFORMW 「えぇ？！ %CNAME("一人称")%用の兔女郎制服が用意してあるぅ？！」
				CALL EMOTEFACE, "重置/斜眼４/飘忽/困扰眉/半開/叹气", TARGET
				PRINTFORMW 「ほんとバカだろおめえ‥‥」
			ELSEIF TEXTS("日期対応イベント") == "万圣节"
				CALL EMOTION_PLUS, "重置/笑颜２/大口/", TARGET
				PRINTFORMW 「%CNAME("二人称")%、トリックオアトリートっ！」
				CALL EMOTION_PLUS, "重置/惊嚇", TARGET
				PRINTFORMW 「は？ え？ お菓子はねえから恶作剧させろ？」
				CALL EMOTEFACE, "重置/憤怒/赤面２", TARGET
				PRINTFORMW 「ちょ、どこ触ってんだこの、バカっ！ やめろっ！ 最悪だこのエロ%CNAME("二人称")%っ!!」
			ELSEIF TEXTS("日期対応イベント") == "七夕" && COND("夜")
				CALL EMOTION_PLUS, "重置/", TARGET
				PRINTFORMW 「ん？ あぁ、どれがベガで、どれがアル領帯ルなのかと思って、空見てたとこ」
				CALL EMOTEFACE, "重置/笑颜２/ヮ", TARGET
				PRINTFORMW 「ほら、今日は七夕だろ？ 年に一回ぐれえはそゆのもいいじゃん」
			ELSEIF TEXTS("日期対応イベント") == "情人節" || TEXTS("日期対応イベント") == "情人節翌日"
				IF TALENT:相思相愛 && RAND:3 == 0
					CALL EMOTION_PLUS, "重置/心情差/飘忽/对话框・・・", TARGET
					PRINTFORMW 「・・・・・・・・・・・・・・・・・・・・・・・・・・%CNAME("二人称","どもり")%
					CALL EMOTEFACE, "重置/心情差/飘忽/紅潮", TARGET
					PRINTFORMW 「・・・・・・・・・・・・・・・・・・・・」
					CALL EMOTEFACE, "重置/心情差/飘忽/紅潮２", TARGET
					PRINTFORMW 「・・・・・・・・・・・・・・・・・」
					CALL EMOTEFACE, "重置/心情差/飘忽/赤面", TARGET
					PRINTFORMW 「・・・・・・・・・・・・・・・・・・・・・・・」
					CALL EMOTEFACE, "重置/心情差/飘忽/赤面２", TARGET
					PRINTFORMW 「・・・・・・・・・・・・・・・・・・・・・・・・・・・・・やっぱなんでもね」
				ELSE
					IF RAND:2 == 0
						CALL EMOTION_PLUS, "重置/pocky", TARGET
						PRINTFORMW 「ん？ これか？ 情人節だったし、女子にもらったんだよ」
						PRINTFORMW 「%CNAME("二人称")%も食う？」
						PRINTFORMW %CALLNAME:TARGET%は見た目街道、学校でそれなりにモテるようで、紙袋いっぱいの巧克力がそばに置いてある。
					ELSE
						CALL EMOTION_PLUS, "重置/心情差", TARGET
						PRINTFORMW 「‥‥なんだよ%CNAME("二人称")%。さっきからこっちチラチラ見て」
						PRINTFORMW 「巧克力？ なんで%CNAME("一人称")%が%CNAME("二人称")%に巧克力とか用意しねえといけねえんだ？」
						PRINTFORMW 「情人節はお歳暮とかお中元じゃねえんだから、世話んなってるとかじゃしねえもんだろ」
					ENDIF
				ENDIF
			ELSEIF TEXTS("日期対応イベント") == "白色情人節"
				IF CEVENT("岡田の誕生日") && RAND:2 == 0
					CALL EMOTION_PLUS, "重置/半目/いー/红晕", TARGET
					PRINTFORMW 「ん？ これか？ クラスのやつにもらったんだよ」
					CALL EMOTEFACE, "重置/笑颜２/いー/红晕", TARGET
					PRINTFORMW 「情人節が誕生日っつーやつがいるから、そのお返しになっ♪」
				ELSE
					CALL EMOTION_PLUS, "重置/嘟嘴/红晕", TARGET
					PRINTFORMW 「あ、%CNAME("二人称")%。これ白色情人節のお返しが余ったんだけど、１コ食わねえ？」
					PRINTFORMW どうやら%CALLNAME:TARGET%は、巧克力をもらった分、きちんとお返しをしたらしい。
				ENDIF
			ELSE
				CALL EMOTION_PLUS, "重置/", TARGET
				PRINTFORMW 「なんだよ%CNAME("二人称")%、こっちじっと見て」
			ENDIF
		;どうやらハルは、婦女子コンビにBL同人誌を借りて、男同士の恋愛についての勉強中らしい
		ELSEIF RAND:6 == 0 && TALENT:恋慕 && PLACE("ハル的房間")
			CALL EMOTION_PLUS, "重置/心情差/本", TARGET
			PRINTFORMW 「‥‥‥これ？ クラスのやつに借りた‥‥同人誌だよ」
			PRINTFORMW 「‥‥‥‥‥は？ 読んでみてえ？」
			CALL EMOTEFACE, "心情差/呀哒/赤面２/对话框憤怒/本", TARGET
			PRINTFORMW 「やだ。絶対見せねえっ！ み、見ようとすんなバカっ」
		ELSEIF PLACE("ハル的房間") && RAND:4 == 0
			IF RAND:3 == 0
				CALL EMOTION_PLUS, "重置/心情差", TARGET
				PRINTFORMW 「おいっ！ 勝手にタンス開けて%CNAME("一人称")%の胖次を漁ろうとするんじゃねえっ!!」
			ELSEIF RAND:2 == 0
				CALL EMOTION_PLUS, "重置/心情差", TARGET
				PRINTFORMW 「ちょ、%CNAME("二人称")%‥‥」
				PRINTFORMW 「いくらおめえが%CNAME("二人称")%だとしても、あんま%CNAME("一人称")%的房間の中は弄り回すんじゃねえっ」
			ELSE
				CALL EMOTION_PLUS, "重置/", TARGET
				PRINTFORMW 「‥‥なんだよ%CNAME("二人称")%。キョロキョロして‥‥」
				CALL EMOTEFACE, "重置/心情差", TARGET
				PRINTFORMW 「はぁ？ え、エロ本だぁ？」
				CALL EMOTEFACE, "重置/憤怒/赤面", TARGET
				PRINTFORMW 「うっせえバカっ！ んなもん尋找んじゃねえっ！ ちょっ、プライバシーの侵害だぞっ!!」
			ENDIF
		ELSEIF  PLACE("主人公的房間") && RAND:4 == 0
			IF RAND:2 == 0
				CALL EMOTION_PLUS, "重置/飘忽/へ字４", TARGET
				PRINTFORMW （%CNAME("二人称")%的房間って、%CNAME("一人称")%的房間と、なんか气味が違えな‥‥）
			ELSE
				CALL EMOTION_PLUS, "重置/飘忽/へ字４", TARGET
				PRINTFORMW （あ‥‥%CNAME("二人称")%ってあの本読むのか‥‥）
				IF TALENT:討厭男人 && RAND:3
					CALL EMOTEFACE, "重置/憤怒眉短/へ字", TARGET
					PRINTFORMW （！）
					CALL EMOTEFACE, "重置/心情差/赤面２", TARGET
					PRINTFORMW 「おい%CNAME("二人称")%、部屋に人呼ぶ時は、エロ本ぐれえ隠しやがれバカっ」
				ELSE
					CALL EMOTEFACE, "重置/", TARGET
					PRINTFORMW 「%CNAME("二人称")%、あの本棚の本、面白かったなら貸して君ね？」
				ENDIF
			ENDIF
		ELSEIF COND("昼") && PLACE("更衣室") && RAND:4 == 0
			PRINTFORMW 「なあ、%CNAME("二人称")%の部活内容がトンチキなのはともかく、何の用があってこんなとこ確保してんだ？」
		ELSEIF COND("昼") && PLACE("体育倉庫") && RAND:4 == 0
			CALL EMOTION_PLUS, "重置/心情差", TARGET
			PRINTFORMW 「おい、ここの鍵ってどやって手にいれたんだ？」
			CALL EMOTEFACE, "重置/心情差/叹气", TARGET
			PRINTFORMW 「‥‥って、あの人がいれば、たいていの事は何とでもなるか」
		ELSEIF COND("昼") && PLACE("做爱房") && RAND:4 == 0
			CALL EMOTION_PLUS, "重置/心情差/叹气", TARGET
			PRINTFORMW 「ここって元は何的房間だったんだろうな？」
			PRINTFORMW 「做爱房なんかじゃなかったことは確かなんだろ？」
		ELSEIF COND("昼") && PLACE("保健室") && RAND:5 == 0
			CALL EMOTION_PLUS, "重置/飘忽/一文字", TARGET
			PRINTFORMW 「‥‥あれ？ 今日、保険の老师はどうしたんだ？」
		ELSEIF PLACE("部室") && TALENT:料理擅長 == 0 && RAND:5 == 0
			IF RAND:2 == 0
				CALL EMOTION_PLUS, "重置/红晕", TARGET
				PRINTFORMW 「な、ここの冷蔵庫の中って見てもいいのか？」
				CALL EMOTEFACE, "重置/通常眉短３/小口", TARGET
				PRINTFORMW 「え？ 勝手に使ってもいいのか？」
				CALL EMOTEFACE, "笑颜２/大口/红晕", TARGET
				PRINTFORMW 「やりぃっ!! じゃ咖啡淹れよっと」
			ELSE
				CALL EMOTION_PLUS, "重置/嘟嘴/红晕", TARGET
				PRINTFORMW 「%CNAME("二人称")%、この部活って点心食いながらするもんなのか？」　　　モグモグ・・・
			ENDIF
		ELSEIF PLACE("部室") &&CFLAG:ハル弁当指数 >= 80 && RAND:4 == 0 && COND("点心当番")
			CALL EMOTEFACE, "重置/心情差", TARGET
			PRINTFORMW 「今度は点心に%TEXTR("パウンド蛋糕/乳酪蛋糕/フルーツタルト/野菜蛋糕")%が食いてえ？」
			CALL EMOTEFACE, "重置/憤怒眉/飘忽/红晕", TARGET
			PRINTFORMW 「‥‥‥あっそ」
		ELSEIF PLACE("部室") && TALENT:料理擅長 && RAND:4 == 0
			CALL EMOTION_PLUS, "重置/心情差", TARGET
			PRINTFORMW 「は‥‥？ 部活の点心に%TEXTR("ドーナツ/ガトーショコラ/曲奇/ラスク")%が食いてえだぁ？」
			IF CFLAG:ハル心情差
				CALL EMOTEFACE, "心情差/飘忽/叹气", TARGET
				PRINTFORMW 「食いたきゃ自己作ればいいじゃん」
			ELSEIF FIND_COND("料理擅長")
				ACTOR = FIND_COND("料理擅長")
				PRINTFORMW 「あそ。%TEXTR(@"%CNAME("弗理希艾尔")%/有能な女仆桑/何でも出来る悪魔桑/%CNAME(CALLNAME:ACTOR)%")%にでも頼んでみれば？」
			ENDIF
		ELSEIF RAND:4 == 0 && DEVENT("日誌その１０") && PLACE("居間")
			CALL EMOTION_PLUS, "重置/一文字/本", TARGET
			PRINTFORMW 「ん？ これ？ 同クラのやつに借りた本だよ」
			CALL EMOTEFACE, "重置/", TARGET
			PRINTFORMW 「‥‥‥たまには紙の本も悪くねえな。%CNAME("二人称")%も読む？」
		ELSEIF RAND:3 == 0 && CFLAG:掀起裙子 == 0 && CFLAG:ハル心情差 == 0
			CALL EMOTION_PLUS, "重置/心情差", TARGET
			CFLAG:ハル心情差 += 1
			PRINTFORMW 「は？ 胖次の色？」
			IF EQUIP:胖次 && RAND:2
				PRINTFORMW 「%CLOCOLOR(CSTR:胖次, "形容詞")%のだよ。それがどうした」
				CALL SETFLAG_DAILY, "胖次色確認"
			ELSE
				PRINTFORMW 「‥‥‥‥余計な事聞君じゃねえよ、%CNAME("二人称")%」
			ENDIF
		ELSEIF DEVENT("日誌その１０") == 0 && RAND:3 == 0
			CALL EMOTION_PLUS, "重置", TARGET
			PRINTFORMW 「どした？%CNAME("二人称")%　%CNAME("一人称")%なんか見て」
		ELSEIF FLAG:対複数
			CALL EMOTION_PLUS, "重置", TARGET
			PRINTFORMW 「そんで？ その後そいつ、どうなったんだ？」
		ELSE
			IF COND("春")
				IF TALENT:叛逆 || CFLAG:ハル心情差
					CALL EMOTION_PLUS, "重置/心情差", TARGET
				ELSE
					CALL EMOTION_PLUS, "重置", TARGET
				ENDIF
				PRINTFORMW 「%TEXTR(@"今日はなんかあったかくねえ？%CNAME("一人称")%眠くなりそうだよ。/今日はなんかいつもより、いい風が吹いてるよな？/なんか今日って、ポカポカしてる気がしねえ？")%」
			ELSEIF COND("夏")
				IF TALENT:叛逆 || CFLAG:ハル心情差
					CALL EMOTION_PLUS, "重置/心情差", TARGET
				ELSE
					CALL EMOTION_PLUS, "重置/半目/半開/頬汗", TARGET
				ENDIF
				PRINTFORMW 「あ"～‥‥う゛～‥‥%TEXTR(@"いやはや、参るぐれえ日差しが很强よな/今日は暑くねえ？ 絶対いつもより暑いよな？/なんかいつもより太陽ヤベえよな？ すげえ晒痕しそう～…/昨日すげえ寝苦しくてさ、寝不足なんだよ%CNAME("一人称")%")%」
			ELSEIF COND("秋")
				IF TALENT:叛逆 || CFLAG:ハル心情差
					CALL EMOTION_PLUS, "重置/心情差", TARGET
				ELSE
					CALL EMOTION_PLUS, "重置/红晕", TARGET
				ENDIF
				PRINTFORMW 「はぁ～…%TEXTR(@"今日は少し冷えねえ？ 秋だからかな？/最近けっこう涼しくなってきたよな～/やっとちょっと過ごしやすい季節变成了よな/だんだん葉っぱに色が付いてきたよな。%CNAME("二人称")%、今度紅葉見に行ってみねえか？")%」
			ELSE
				IF TALENT:叛逆 || CFLAG:ハル心情差
					CALL EMOTION_PLUS, "重置/心情差", TARGET
				ELSE
					CALL EMOTION_PLUS, "重置/蹙眉/～", TARGET
				ENDIF
				PRINTFORMW 「%TEXTR(@"今日はすげえ風が冷たくね？ 寒いよな、息が白色もんよ/今日はちょっと寒さがマシじゃね？/う～さむさむっ。なんか今日すげえ冷え込んできてねえ？/なんか寒いから雪とか降らねえかな～？ 降ったら色々遊べるのにな？")%」
			ENDIF
		ENDIF
	ENDSELECT
;TFLAG:取引拒否 = 1とすることで、你のたわごとを却下できます
CASE "Ｈ的約定"
	;台詞を書いたら下のRETURN 0を消してください
	;この角色自身が前回赤点で、それどころではない（学生以外は、この分岐には来ません）
	IF COND("成績：赤点")
		PRINTFORMW 「ダメ。今は性交にうつつ抜かしてる場合なんかじゃねえんだよ」
		TFLAG:取引拒否 = 1
	;以下はご褒美を给事にＯＫして给…ないかも？
	ELSE
		IF TALENT:恋慕 && CEVENT("エロい事した")
			;前回既に你が良い点を取っている場合には”学年上位”を要求します
			IF COND("成績：優秀", MASTER)
				CALL EMOTION_PLUS, "心情差/红晕/叹气", TARGET
				PRINTFORMW 「はぁ？ いい点とれたらエロい事させて欲しいだぁ？ ・・・・いや、そんな必死に頼むなよ」
				PRINTFORMW 「はぁ‥‥わかったよ、%CNAME("二人称")% ‥‥‥‥ちょとだけ、だからな？」
			;そうでない場合には平均点を結構上回る程度でＯＫです
			ELSE
				CALL EMOTION_PLUS, "心情差/红晕/叹气", TARGET
				PRINTFORMW 「はぁ？ いい点とれたらエロい事させて欲しいだぁ？ ・・・・いや、そんな必死に頼むなよ」
				PRINTFORMW 「む～‥‥まぁ、成績がよかったらな」
			ENDIF
		ELSEIF STATE("酔酒")
			;酔ってるのでＯＫします。前回既に你が良い点を取っている場合には”学年上位”を要求します
			IF COND("成績：優秀", MASTER)
				CALL EMOTION_PLUS, "酔酒", TARGET
				PRINTFORMW 「ふにゅ？ いい点とれたらご褒美が欲しいのか？ ‥‥‥むぅ、どうしよっかな～？」
				PRINTFORMW 「しょーがねーなー‥‥ じゃ次のテスト、すげえいい点だったらって事でどうだ？」
				CFLAG:ハル酔っ支付のあやまち += 1
			;そうでない場合には平均点を結構上回る程度でＯＫです
			ELSE
				CALL EMOTION_PLUS, "酔酒", TARGET
				PRINTFORMW 「‥‥‥‥んん？？ %CNAME("二人称","甘え")%はテストのご褒美が欲しいのかぁ‥‥‥」
				PRINTFORMW 「えぇ？ しょーがねえ%CNAME("二人称","かな")%だなぁ～‥‥‥」
				CFLAG:ハル酔っ支付のあやまち += 1
			ENDIF
		ELSE
			;素面で恋慕がない状態ではＯＫしません。ただ成績で分岐は有ます。成績優秀だと要領よさそうだからと断ります
			IF COND("成績：優秀", MASTER)
				CALL EMOTION_PLUS, "心情差", TARGET
				PRINTFORMW 「はぁ？ いい点とれたらエロい事させて欲しいだぁ？ ・・・・いや、そんな必死に頼むなよ」
				PRINTFORMW 「やだよ。%CNAME("二人称")%ってサラッと要領よく高得点取ってきそうだし‥‥」
				CFLAG:ハル心情差 += 1
				CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
				IF TALENT:討厭男人 < 2
					TALENT:討厭男人 = 2
					CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
				ENDIF
				TFLAG:取引拒否 = 1
			;そうでない場合には単に心情が悪くなります。
			ELSE
				CALL EMOTION_PLUS, "憤怒", TARGET
				PRINTFORMW 「‥‥‥‥頼む相手、間違えてねえか？」
				CFLAG:ハル心情差 += 1
				CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
				IF TALENT:討厭男人 < 2
					TALENT:討厭男人 = 2
					CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
				ENDIF
				TFLAG:取引拒否 = 1
			ENDIF
		ENDIF
	ENDIF
CASE "拭汗"
	IF RAND:3 == 0
		CALL EMOTION_PLUS, "", TARGET
		PRINTFORMW 「ふ～‥‥ %CNAME("二人称")%、%CNAME("一人称")%汗臭くねえよな？」
	ELSEIF RAND:2 == 0
		CALL EMOTION_PLUS, "", TARGET
		PRINTFORMW 「桑きゅ%CNAME("二人称")%。ちょうど汗まみれが気持ち悪かったんだよ」
	ELSE
		CALL EMOTION_PLUS, "", TARGET
		PRINTFORMW 「ああ、桑きゅ。毛巾貸してくれたら、あとは自己拭くから」
	ENDIF
CASE "淋浴独り言"
	CALL EMOTION_PLUS, "", TARGET
	;PRINTFORMW 「は。清爽した～」
CASE "淋浴"
	;実は内衣を漁ったのに気づかれています
	IF COND("淋浴：内衣漁りバレ")
		IF TALENT:叛逆 || CFLAG:ハル心情差
			CALL EMOTION_PLUS, "心情差", TARGET
			PRINTFORMW 「ふ。%CNAME("二人称")%、淋浴入ってたのが%CNAME("一人称")%でガッカリした？ ザマミロっ」
			CFLAG:ハル心情差 += 1
			CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
			IF TALENT:討厭男人 < 2
				TALENT:討厭男人 = 2
				CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
			ENDIF
		ELSE
			PRINTFORMW 「ったく～‥‥ ノゾキとかすんなよな～‥‥」
			CFLAG:ハル心情差 += 1
			CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
			IF TALENT:討厭男人 < 2
				TALENT:討厭男人 = 2
				CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
			ENDIF
		ENDIF
	ELSE
		PRINTFORMW 「よっす、%CNAME("二人称")%。来てたんだな」
	ENDIF
CASE "淋浴後换装"
	;初めて
	IF TALENT:叛逆 || DEVENT(STR:日常イベント名) == 0
		CALL EMOTION_PLUS, "重置/憤怒眉/呀哒３", TARGET
		PRINTFORMW 「おい%CNAME("二人称")%。なんでこんなもん着替えに仕込んでんだよ。バカじゃねえのか？」
		PRINTFORMW 「いいから%CNAME("一人称")%の服返せってば」
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ELSE
		CALL EMOTION_PLUS, "重置/飘忽/半目/憤怒眉/半開/叹气", TARGET
		PRINTFORMW 「はぁ～‥‥ %CNAME("一人称")%、だんだん%CNAME("二人称")%の奇行にも慣れてきた気がすんよ」
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ENDIF

CASE "淋浴後换装失敗"
	;初めて
	IF DEVENT(STR:日常イベント名) == 0
		CALL EMOTION_PLUS, "重置/憤怒眉/一文字", TARGET
		PRINTFORMW 「%CNAME("二人称")%、これ返すっ」
		PRINTFORML
		PRINTFORMW そう言って%CALLNAME:TARGET%は%CALLNAME:MASTER%の仕込んでおいた着替えを突き出してきた。
		PRINTFORMW どうやら自分の着替えがあったので、そっちを着ることにしたらしい。
		PRINTFORMW 次は%CALLNAME:TARGET%の着替えを隠してしまおうか？ いや、それはやりすぎか？
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ELSEIF TALENT:叛逆 || CFLAG:ハル心情差
		CALL EMOTION_PLUS, "重置/憤怒眉/一文字", TARGET
		PRINTFORMW 「%CNAME("二人称")%、なんか変な服が置いてあったけど、あれ%CNAME("二人称")%の仕業だろ」
		PRINTFORML
		PRINTFORMW やはり着替えのカゴに自分の服があると%CALLNAME:MASTER%の用意した服を着てくれないらしい
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ELSE
		CALL EMOTION_PLUS, "重置/飘忽/憤怒眉/半開/叹气", TARGET
		PRINTFORMW 「ったく、どこでこんなもん調達してんだか‥‥」
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ENDIF

;睡眠中の悪戯
CASE "趁睡袭击"
	;梦话
	CALL KOJO_SLEEP_K77
	WAIT
CASE "互动"
	SELECTCASE STR:日常イベント名
	CASE "一起学习"
		IF CFLAG:好感度 >= 2000 && CEVENT("いっしょに勉強") == 0 && DEVENT("質問１")
			CALL SET_CEVENT, "いっしょに勉強"
			CALL K77_HaLL5c68a32_STADYTIME
		ELSEIF STATE("酔酒")
			CALL EMOTION_PLUS, "酔酒", TARGET
			PRINTFORMW カリカリ・・・　カリカリカリ・・・
			CALL EMOTION_PLUS, "酔酒/＞＜/ワ/对话框開心", TARGET
			PRINTFORML 「あれ～？ どこで間違ってるんだ～？　ん？ んん？ ‥‥‥う～ん、分かんねっ」
		ELSEIF RAND:3 == 0
			CALL EMOTION_PLUS, "", TARGET
			PRINTFORMW カリカリ・・・　カリカリカリ・・・
			PRINTFORML
			PRINTFORML 「あれ？ どこで間違ってるんだ？　ん？ んん？ ‥‥‥ああ、ここか」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ELSEIF RAND:2 == 0
			CALL EMOTION_PLUS, "", TARGET
			PRINTFORMW カリカリ・・・　カリカリカリ・・・
			PRINTFORML
			PRINTFORML 「あ、 そっか。　えーと？？　‥‥‥‥‥次はこうか？」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ELSE
			CALL EMOTION_PLUS, "", TARGET
			PRINTFORMW カリカリ・・・　カリカリカリ・・・
			PRINTFORML
			PRINTFORML 「んん？ ここ、どうやったっけ？　‥‥‥‥ああ、こうか」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ENDIF
 	CASE "给对方剃毛"
		PRINTFORML
	CASE "托一托胸部"
		;你の性騷擾詳細はSTR:PLAY内容で分岐させることができる。
		SELECTCASE STR:PLAY内容
		CASE "乳环"
			PRINTFORML
		CASE "陥没乳頭", "乳頭"
			PRINTFORML
		CASE "巨乳輪"
			PRINTFORML
		;其他は胸部を揉んだり
		CASEELSE
			CALL EMOTION_PLUS, "心情差", TARGET
			PRINTFORML 「・・・・・こんな扁平な胸揉んで、いったい何が楽しいんだ？」
		ENDSELECT
	CASE "按摩"
		IF STATE("酔酒")
			IF RAND:3 == 0
				CALL EMOTION_PLUS, "酔酒", TARGET
				CALL PRINT_STRW, @"「えへぇ～_UH_ %CNAME("二人称","甘え")%のマッサ気持ちい～‥‥」"
				CALL PRINT_STRW, @"「もっとしてくれ %CNAME("二人称","かな")% えへへぇ～_UH_」"
				IF CFLAG:ハル心情差
					CFLAG:ハル心情差 -= 1
				ENDIF
			ELSEIF RAND:2 == 0
				CALL EMOTION_PLUS, "酔酒", TARGET
				CALL PRINT_STRW, @"「ふふぇ～_UH_ %CNAME("二人称","甘え")%マッサ気持ちい～ぞ～‥‥_UH_」"
				CALL PRINT_STRW, @"「%CNAME("二人称","かな")%はマッサ名人だな～‥‥ えへへぇ～_UH_」"
				IF CFLAG:ハル心情差
					CFLAG:ハル心情差 -= 1
				ENDIF
			ELSE
				CALL EMOTION_PLUS, "酔酒", TARGET
				CALL PRINT_STRW, @"「ははは。%CNAME("二人称","かな")%それ_UH_ちょっとくすぐったいぞ？」"
				CALL PRINT_STRW, @"「でも気持ちい～っ_UH_ %CNAME("二人称","甘え")%もっとぉ～_UH_」"
				IF CFLAG:ハル心情差
					CFLAG:ハル心情差 -= 1
				ENDIF
			ENDIF
		ELSE
			CALL EMOTION_PLUS, "眯眯眼/斜眉/红晕/笑顔３/对话框開心"
			PRINTFORMW 「桑きゅ、%CNAME("二人称")%。あ～、気持ちいい～・・・」
			PRINTFORML 「‥‥ん？ はは。分かったよ。これ終わったら%CNAME("二人称")%も揉んでやっから」
			IF CFLAG:ハル心情差 && RAND:3 == 0
				CFLAG:ハル心情差 -= 1
			ENDIF
		ENDIF
	CASE "接吻"
		IF CSTR:PREV_DAILYCOM == STR:日常イベント名
			CALL EMOTION_PLUS, "〇〇/憤怒眉/呀哒"
			PRINTFORMW 「！！」
			PRINTFORML 「急に何するんだよ。危うく頭突きするとこだっただろっ!!」
		ELSEIF FLAG:二人きり
			CALL EMOTION_PLUS, "半目/飘忽/憤怒眉/△/红晕"
			PRINTFORML 「‥‥‥‥‥‥‥ちょ、唐突だな、もーっ!!」
		ELSE
			CALL EMOTION_PLUS, "憤怒眉/△/红晕"
			PRINTFORML 「はぁ～・・・%CNAME("二人称")%の考えてる事、ほんとよく分かんねえよ」
		ENDIF
	CASE "膝枕"
		IF TALENT:恋慕
			CALL EMOTION_PLUS, "心情差/飘忽/红晕", TARGET
			PRINTFORMW 「‥‥‥‥%CNAME("二人称")%、男相手に膝枕って、おかしくねえ？」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ELSEIF TALENT:恋慕 && STATE("酔酒")
			CALL EMOTION_PLUS, "重置/酔酒", TARGET
			CALL PRINT_STRW, @"「えへへっ_UH_ %CNAME("二人称","かな")%、膝枕きもちい～ぞっ_UH_」"
			CALL PRINT_STRW, @"「え～？ %CNAME("一人称")%がいつもと違う？」"
			CALL PRINT_STRW, @"「そんなことねえって%CNAME("二人称","甘え")%_UH_ 普通だよ%CNAME("一人称")%～_UH_」"
		ELSEIF STATE("酔酒")
			IF RAND:3 == 0
				CALL EMOTION_PLUS, "重置/酔酒", TARGET
				CALL PRINT_STRW, @"「ふふふぇ～_UH_ %CNAME("二人称","・")%_UH_ 诶嘿嘿ふぇ～_UH_」"
				CALL PRINT_STRW, @"「えへへぇ_UH_ %CNAME("二人称","甘え")%の膝枕っ_UH_」"
			ELSEIF RAND:2 == 0
				CALL EMOTION_PLUS, "重置/酔酒", TARGET
				CALL PRINT_STRW, @"「えへ_UH_ %CNAME("二人称")%の膝にゴロゴロだぁ～♪ えっへっへ～♪ 」"
				CALL PRINT_STRW, @"「%CNAME("二人称","甘え")%の膝は%CNAME("一人称")%のもの～っ_UH_」"
			ELSE
				CALL EMOTION_PLUS, "重置/酔酒", TARGET
				CALL PRINT_STRW, @"「ごろごろ～_UH_ ごろごろごろ～_UH_」"
				CALL PRINT_STRW, @"「男性のクセにいい膝してんな～‥‥気持ちぃ～_UH_」"
			ENDIF
		ELSE
			IF RAND:3 == 0
				CALL EMOTION_PLUS, "重置/心情差/红晕", TARGET
				PRINTFORMW 「ちょ、%CNAME("二人称")%これ、ちょっと恥ずかしくねえ？」
				PRINTFORMW %CALLNAME:TARGET%は少し居心地悪そうに、%CALLNAME:MASTER%の膝の上に転がっている。
			ELSEIF RAND:2 == 0
				CALL EMOTION_PLUS, "重置/心情差/飘忽", TARGET
				PRINTFORMW 「‥‥‥‥‥%CNAME("二人称")%、膝枕って、男同士でもするものなのか？」
			ELSE
				CALL EMOTION_PLUS, "重置/笑颜２/困扰眉/红晕", TARGET
				PRINTFORMW 「‥‥‥男同士で膝枕とか、はたから見たら、かなりおかしな図になってるよな、これ」
				PRINTFORML そう言いながらも%CALLNAME:TARGET%は大人しく膝枕されて寝っ転がっている。
			ENDIF
		ENDIF
	CASE "泡茶"
		IF STATE("酔酒")
			CALL EMOTION_PLUS, "酔酒/ヮ", TARGET
			PRINTFORMW 「わ～いっ♪ %CNAME("二人称")%が淹れてくれたのか～♪ うめえぞ～♪」
		ELSE
			IF CFLAG:ハル心情差 || TALENT:叛逆
				CALL EMOTION_PLUS, "重置/心情差", TARGET
			ELSE
				CALL EMOTION_PLUS, "重置/", TARGET
			ENDIF
			PRINTFORMW 「桑きゅ、%CNAME("二人称")%。ちょうどなんか飲みてえと思ってたとこなんだ」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ENDIF
	;CALL SET_CEVENT, "飲酒拒否"でお酒を飲まないようにできる。
	;このフラグはCALL DEL_CEVENT, "飲酒拒否"で消すことができる
	CASE "勸酒"
		IF CEVENT("飲酒拒否") == 0 && CFLAG:ハル飲酒 && CEVENT("飲酒拒否だった") == 0
			CALL EMOTION_PLUS, "重置/心情差", TARGET
			PRINTFORMW 「酒？ %CNAME("一人称")%は飲まねえぞ。この前飲んでハメ外し過ぎたからな」
			CALL SET_CEVENT, "飲酒拒否"
		ELSEIF CEVENT("飲酒拒否") == 0 && CEVENT("飲酒拒否だった") && CFLAG:ハル飲酒 >= 3+RAND:2
			CALL EMOTION_PLUS, "重置/心情差", TARGET
			PRINTFORMW 「酒？ 今日は%CNAME("一人称")%飲まねえぞ。飲んでハメ外し過ぎるのはやだからな」
			PRINTFORMW 本日は虽然很可惜、%CALLNAME:TARGET%に飲酒を断られてしまった。
			PRINTFORMW %CALLNAME:TARGET%には、日を改めてまたいっしょに酒を飲むことを誘ってみようか。
			CALL SET_CEVENT, "飲酒拒否"
		ELSEIF RAND:3 == 0 && CEVENT("飲酒ＯＫ")
			CALL EMOTION_PLUS, "心情差", TARGET
			PRINTFORML 「む。‥‥‥‥これは酒か。酒だな‥‥‥‥むむ」
			CFLAG:ハル飲酒 += 1
		ELSEIF RAND:2 == 0 && CEVENT("飲酒ＯＫ") == 0
			CALL EMOTION_PLUS, "心情差", TARGET
			PRINTFORML 「ぬ。‥‥‥‥酒か。酔っ払らわせてどうするつもりだ？ ‥‥‥‥むむ」
			CFLAG:ハル飲酒 += 1
		ELSE
			CALL EMOTION_PLUS, "重置/半目/憤怒眉/△", TARGET
			PRINTFORMW 「にゅ‥‥‥ 酒飲むのか‥‥ むむぅ‥‥‥むぅ‥‥」
			CFLAG:ハル飲酒 += 1
		ENDIF
	;当然だが尾巴がある相手のみ
	CASE "抚摸尾巴"
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			PRINTFORML
		;連続実行
		ELSEIF CSTR:PREV_DAILYCOM == STR:日常イベント名
			PRINTFORML
		;この時間で初実行
		ELSEIF CHOSE_DEVENT(STR:日常イベント名) == 0 && RAND:2
			PRINTFORML
		ELSE
			PRINTFORML
		ENDIF
	CASE "摸頭"
		IF TALENT:恋慕
			CALL EMOTION_PLUS, "笑颜２/通常眉３/笑顔３/红晕", TARGET
			PRINTFORML 「ぁ‥‥‥‥ へへ‥‥‥‥」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ELSEIF STATE("酔酒")
			IF RAND:3 == 0
				CALL EMOTION_PLUS, "酔酒/对话框開心", TARGET
				PRINTFORMW 「わ～いっ♪ %CNAME("二人称","甘え")%にいー子いー子されたぁ～♪」
			ELSEIF RAND:2 == 0
				CALL EMOTION_PLUS, "酔酒/对话框兴奋", TARGET
				PRINTFORMW 「いいぞ～♪ もっといー子しろ%CNAME("二人称","甘え")%～♪」
			ELSE
				CALL EMOTION_PLUS, "酔酒", TARGET
				CALL PRINT_STRW, @"「えへぇ～_UH_ %CNAME("二人称")%にいー子いー子されちったぁ～_UH_」"
			ENDIF
		ELSE
			CALL EMOTION_PLUS, "笑颜２/通常眉３/笑顔３"
			PRINTFORML 「いー子いー子？ なんか小さい子にするみてえだな」
		ENDIF
	;胸元にチップを差し込まれます。兔女郎制服限定
	CASE "给小费"
		CALL EMOTION_PLUS, "重置/心情差", TARGET
		PRINTFORML 「‥‥おひねり桑きゅ、%CNAME("二人称")%」
		IF CFLAG:ハル心情差
			CFLAG:ハル心情差 -= 1
		ENDIF
	;送禮貰った感想です。何を貰ったか含め、好きに書いてください
	;なんだかんだ文句言う時もあるけど、ハルの心情がよくなる指令
	CASE "送一份小礼物"
		;誕生日だけは酔酒状態より優先にする
		IF CFLAG:ハル起動経過日数 >= NUM("１年の長さ") && CFLAG:ハル起動経過日数 % NUM("１年の長さ") == 0
			CALL EMOTION_PLUS, "重置/通常眉短３/栗口/红晕", TARGET
			PRINTFORMW 「え‥‥ 今日で%CNAME("一人称")%が起動してから１年だから誕生日の送禮？」
			CALL EMOTEFACE, "重置/笑颜２/ヮ/红晕", TARGET
			PRINTFORMW 「桑きゅな、%CNAME("二人称")%っ。覚えててくれて桑きゅっ♪」
			CFLAG:ハル心情差 = 0
		ELSEIF STATE("酔酒")
			CALL EMOTION_PLUS, "酔酒/", TARGET
			PRINTFORML 「へ？ %CNAME("二人称","甘え")%%TEXTR("タワシ/お浴室洗剤/ゴミパック/歯磨き粉")%くれんの？ ふーん、桑きゅな～♪」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ELSEIF TEXTS("日期対応イベント") == "猫の日"
			CALL EMOTION_PLUS, "重置/心情差", TARGET
			PRINTFORMW 「おい。いくらネコの日だからって、猫耳よこすんじゃねえよ」
			CALL EMOTEFACE, "重置/憤怒/赤面", TARGET
			PRINTFORMW 「こんなもん%CNAME("一人称")%が付けるわけねえだろっ」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ELSEIF TEXTS("日期対応イベント") == "七夕"
			CALL EMOTION_PLUS, "重置/红晕", TARGET
			PRINTFORMW 「ん？ ああ、短冊かぁ。分かったよ、%CNAME("一人称")%もなんか書く」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ELSEIF TEXTS("日期対応イベント") == "万圣节"
			CALL EMOTION_PLUS, "重置/笑颜２/通常眉短３/大口/红晕", TARGET
			PRINTFORMW 「ん？ 送禮？ あそっか、万圣节のお菓子なっ！ %CNAME("二人称")%もノリいいなーっ」
			PRINTFORMW 「%CNAME("一人称")%もこゆの好きだぞっ」
			CFLAG:ハル心情差 = 0
		ELSEIF TEXTS("日期対応イベント") == "圣诞节" || TEXTS("日期対応イベント") == "圣诞节翌日"
			CALL EMOTION_PLUS, "重置/通常眉３/笑颜２/大口/红晕", TARGET
			PRINTFORMW 「わ。圣诞节送禮？ %CNAME("一人称")%からはジンジャー曲奇やるよっ」
			CFLAG:ハル心情差 = 0
		ELSEIF TEXTS("日期対応イベント") == "大晦日" || TEXTS("日期対応イベント") == "新年"
			CALL EMOTION_PLUS, "重置/通常眉３/笑颜２/大口/红晕", TARGET
			PRINTFORMW 「やったぁ！ お年玉だっ！ 桑きゅなー%CNAME("二人称")%っ」
			CFLAG:ハル心情差 = 0
		ELSEIF TEXTS("日期対応イベント") == "情人節" || TEXTS("日期対応イベント") == "情人節翌日"
			IF TALENT:相思相愛
				CALL EMOTION_PLUS, "重置/飘忽/△/红晕", TARGET
				PRINTFORMW 「あ‥‥‥あーうん」
				CALL EMOTEFACE, "重置/飘忽/半目/△/赤面２", TARGET
				PRINTFORMW 「その‥‥‥桑きゅな」
				CALL EMOTEFACE, "重置/目影効果/飘忽/半目/△/赤面２/頬手", TARGET
				PRINTFORMW 「う～‥‥‥‥‥‥ む～‥‥‥‥‥‥‥ じゃ、%CNAME("一人称")%からも、これ‥‥‥‥」
				PRINTFORML
				CALL PRINT_STRW, @"%CALLNAME:MASTER%は%CALLNAME:TARGET%からお返しの本命巧克力をもらった_UH_"
				CFLAG:ハル心情差 = 0
			ELSEIF TALENT:恋慕
				CALL EMOTION_PLUS, "重置/嘟嘴/红晕", TARGET
				PRINTFORMW 「あ‥‥巧克力？」
				CALL EMOTEFACE, "重置/飘忽/嘟嘴/红晕", TARGET
				PRINTFORMW 「あぁ‥‥‥じゃあ、これ‥‥‥お、お返しに」
				CALL EMOTEFACE, "重置/呀哒２/红晕/对话框汗３", TARGET
				PRINTFORMW 「いや、あれだよ？ %CNAME("一人称")%も食いきれねえぐれえもらったしだよ？」
				PRINTFORML
				PRINTFORMW %CALLNAME:MASTER%は%CALLNAME:TARGET%からおすそ分け(？)の巧克力をもらった！
				IF CFLAG:ハル心情差
					CFLAG:ハル心情差 -= 1
				ENDIF
			ELSE
				CALL EMOTION_PLUS, "重置/嘟嘴", TARGET
				PRINTFORMW 「ん？ 巧克力？ ああ、情人節だもんな」
				PRINTFORMW 「何？ %CNAME("二人称")%ももらいすぎて余ったクチ？」
				PRINTFORMW 「女子ってなんでこういうイベントで盛り上がるの好きなのかね？」
				CALL EMOTEFACE, "重置/笑颜２/いー/红晕", TARGET
				PRINTFORMW 「んじゃ%CNAME("一人称")%からもお返しni↘。３つやるから消費しろよ」
				PRINTFORML
				PRINTFORMW %CALLNAME:MASTER%は%CALLNAME:TARGET%からおすそ分けの巧克力をもらった
				IF CFLAG:ハル心情差
					CFLAG:ハル心情差 -= 1
				ENDIF
			ENDIF
		ELSE
			CALL EMOTION_PLUS, "重置/", TARGET
			PRINTFORML 「ん？ ・・・%TEXTR("ボールペン/消し避孕套/シャーペン/下敷き/ノート")%？ くれるのか？ これ。桑きゅな」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ENDIF
	CASE "送一份普通的礼物"
		IF CFLAG:ハル起動経過日数 >= NUM("１年の長さ") && CFLAG:ハル起動経過日数 % NUM("１年の長さ") == 0
			CALL EMOTION_PLUS, "重置/通常眉短３/栗口/红晕", TARGET
			PRINTFORMW 「え‥‥ 今日で%CNAME("一人称")%が起動してから１年だから誕生日の送禮？」
			CALL EMOTEFACE, "重置/笑颜２/ヮ/红晕", TARGET
			PRINTFORMW 「桑きゅな、%CNAME("二人称")%っ。覚えててくれて桑きゅっ♪」
			CALL EMOTEFACE, "重置/大口/红晕", TARGET
			PRINTFORMW 「うわ。しかもこれ、%CNAME("一人称")%が欲しがってたやつじゃんっ！ うわーっすげえ嬉しいぞっ」
			CFLAG:ハル心情差 = 0
		ELSEIF STATE("酔酒")
			CALL EMOTION_PLUS, "酔酒/", TARGET
			PRINTFORMW 「わ～♪ これ%CNAME("一人称")%が欲しいって言ってたの、覚えててくれたのか？」
			PRINTFORMW 「桑きゅな%CNAME("二人称","甘え")%～♪ 大事にするよこれ～♪」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ELSEIF TEXTS("日期対応イベント") == "比基尼の日"
			CALL EMOTION_PLUS, "重置/心情差", TARGET
			PRINTFORMW 「は？ 送禮？ ‥‥‥ってなんで比基尼なんだよっ!!」
			CALL EMOTEFACE, "重置/憤怒/红晕", TARGET
			PRINTFORMW 「しかも下だけじゃなくて胸罩まであるやつとか、いらねえんだけどっ？！」
			CALL EMOTEFACE, "重置/憤怒/对话框憤怒", TARGET
			PRINTFORMW 「%CNAME("一人称")%女装趣味とかねえからっ!!」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ELSEIF TEXTS("日期対応イベント") == "万圣节"
			CALL EMOTION_PLUS, "重置/红晕", TARGET
			PRINTFORMW 「送禮？ あ、今日万圣节だしか」
			CALL EMOTEFACE, "重置/通常眉短２/栗口/红晕", TARGET
			PRINTFORMW 「おお！ ここの胖次プキン餡餅って有名なんじゃなかったっけ？」
			CFLAG:ハル心情差 = 0
		ELSEIF TEXTS("日期対応イベント") == "圣诞节" || TEXTS("日期対応イベント") == "圣诞节翌日"
			CALL EMOTION_PLUS, "重置/大口/红晕", TARGET
			PRINTFORMW 「うわ。でけえ圣诞节蛋糕っ!! 桑きゅ%CNAME("二人称")%っ！ せっかくだし、これは大家食おうぜ!!」
			CFLAG:ハル心情差 = 0
		ELSEIF TEXTS("日期対応イベント") == "大晦日" || TEXTS("日期対応イベント") == "新年"
			CALL EMOTION_PLUS, "重置/笑颜２/大口/红晕", TARGET
			PRINTFORMW 「%CNAME("二人称")%からのお年玉だぁっ！ しかもけっこういっぱい入ってる!! やったぁ！」
			CALL EMOTEFACE, "重置/笑颜２/ヮ/红晕", TARGET
			PRINTFORMW 「桑きゅな～%CNAME("二人称")%っ。大事に使うよっ」
			CFLAG:ハル心情差 = 0
		ELSEIF TEXTS("日期対応イベント") == "情人節" || TEXTS("日期対応イベント") == "情人節翌日"
			IF TALENT:相思相愛
				CALL EMOTION_PLUS, "重置/栗口/红晕", TARGET
				PRINTFORMW 「え‥‥あ、これもしかして、情人節の‥‥？」
				CALL EMOTEFACE, "重置/飘忽/一文字/红晕", TARGET
				PRINTFORMW 「あ、あ～、さ、桑きゅ‥‥じゃねえ‥‥う～‥‥その、う～‥‥」
				CALL EMOTEFACE, "重置/飘忽/半目/小口３/赤面２/托下巴", TARGET
				PRINTFORMW 「こ、こんないいもんじゃねえけど‥‥一応、巧克力なら‥‥む～‥‥」
				PRINTFORML
				CALL PRINT_STRW, @"%CALLNAME:MASTER%は%CALLNAME:TARGET%からお返しの本命巧克力をもらった_UH_"
				CFLAG:ハル心情差 = 0
			ELSEIF TALENT:恋慕
				CALL EMOTION_PLUS, "重置/ヮ/红晕", TARGET
				PRINTFORMW 「%CNAME("一人称")%に送禮？」
				CALL EMOTEFACE, "重置/笑颜２/ヮ/红晕", TARGET
				PRINTFORMW 「へえ、なんだろ‥‥？」
				CALL EMOTEFACE, "重置/大口/红晕", TARGET
				PRINTFORMW 「おぉうっ！ ちょ、%CNAME("二人称")%これっ！ %CNAME("一人称")%が探してたやつじゃんっ」
				CALL EMOTEFACE, "重置/小口/红晕", TARGET
				PRINTFORMW 「え？ ‥‥‥‥情人節だから‥‥？」
				CALL EMOTEFACE, "重置/飘忽/小口/红晕/頬手", TARGET
				PRINTFORMW 「ふ、ふーん‥‥そう‥‥ えーと‥‥ う～‥‥ さ、桑きゅな‥‥？」
				CALL EMOTEFACE, "重置/斜眼４/憤怒眉/呀哒２/红晕", TARGET
				PRINTFORMW 「って、坦率に受け取りにくいわっ！ このバカ%CNAME("二人称")%っ!!」
				IF CFLAG:ハル心情差
					CFLAG:ハル心情差 -= 1
				ENDIF
			ELSE
				CALL EMOTION_PLUS, "重置", TARGET
				PRINTFORMW 「送禮‥‥？」
				CALL EMOTEFACE, "重置/栗口/红晕", TARGET
				PRINTFORMW 「んん？ おぉ！ これ%CNAME("一人称")%が欲しがってたやつじゃんっ！」
				CALL EMOTEFACE, "重置/ワ/红晕", TARGET
				PRINTFORMW 「いいのか？ %CNAME("二人称")%、これもらっても？」
				CALL EMOTEFACE, "重置/笑颜２/大口/红晕", TARGET
				PRINTFORMW 「やったぁ！ 桑きゅな～っ!!」
				PRINTFORML
				PRINTFORMW 情人節であることと、この送禮が、%CALLNAME:TARGET%の中では全く結びつかなかったようだった。
				IF CFLAG:ハル心情差
					CFLAG:ハル心情差 -= 1
				ENDIF
			ENDIF
		ELSE
			CALL EMOTION_PLUS, "重置/", TARGET
			PRINTFORMW 「え？ これくれるのか？ へえ、なんだろ？」
			CALL EMOTEFACE, "△/紅潮", TARGET
			PRINTFORMW 「うわ。これ%CNAME("一人称")%が前に欲しいっつってたやつじゃん！」
			CALL EMOTEFACE, "笑颜２/大口/红晕", TARGET
			PRINTFORML 「いいのか？ 桑きゅな%CNAME("二人称")%っ！」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ENDIF
	CASE "送一份高价的礼物"
		IF CFLAG:ハル起動経過日数 >= NUM("１年の長さ") && CFLAG:ハル起動経過日数 % NUM("１年の長さ") == 0
			CALL EMOTION_PLUS, "重置/红晕", TARGET
			PRINTFORMW 「あそっか。今日%CNAME("一人称")%の誕生日だったっけ」
			CALL EMOTEFACE, "重置/惊嚇/红晕", TARGET
			PRINTFORMW 「っておいっ！ いいのか？こんな高価なもん‥‥っ」
			CALL EMOTEFACE, "重置/笑颜２/困扰眉/ヮ/红晕", TARGET
			PRINTFORMW 「いや、嬉しいけどさ‥‥　ちょっと惊嚇したじゃんか」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ELSEIF STATE("酔酒")
			CALL EMOTION_PLUS, "酔酒/栗口", TARGET
			PRINTFORMW 「へ？%CNAME("一人称")%に送禮‥‥‥？」　　　ゴソゴソ‥‥‥
			CALL EMOTION_PLUS, "惊嚇", TARGET
			PRINTFORMW 「え？ は？ おいおい、こんな高価な物、受け取れねえよ・・・」
			PRINTFORMW 「いや、嬉しくねえわけじゃねえけど、これはちょっと高価すぎるだろうよ‥‥」
			CALL EMOTION_PLUS, "酔酒", TARGET
			PRINTFORML 「今回は受け取るけど、次からはこういうの、やめとけよ～？ %CNAME("二人称")%」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ELSEIF TEXTS("日期対応イベント") == "兔女郎の日"
			CALL EMOTION_PLUS, "重置/红晕", TARGET
			PRINTFORMW 「送禮？ なんだろ？」　　　　　　ごそごそ‥‥‥‥
			CALL EMOTION_PLUS, "惊嚇", TARGET
			PRINTFORMW 「はぁっ？！ ちょ、これ‥‥ば、兔コスチュームぅ？！」
			CALL EMOTION_PLUS, "重置/红潮恍惚", TARGET
			PRINTFORMW 「しかもすげえ凝ってるやつだし‥‥バカじゃねえの？」
			CALL EMOTEFACE, "重置/憤怒/赤面", TARGET
			PRINTFORMW 「つかこれ、%CNAME("一人称")%が着るとかねえからっ!!」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ELSEIF TEXTS("日期対応イベント") == "女仆の日"
			CALL EMOTION_PLUS, "重置/红晕", TARGET
			PRINTFORMW 「ん？ 送禮？ なんだろ？」　　　　　　ごそごそ‥‥‥‥
			CALL EMOTEFACE, "惊嚇/红晕", TARGET
			PRINTFORMW 「はぁっ？！ ちょ、これ‥‥女仆装じゃんっ？！」
			CALL EMOTEFACE, "重置/心情差/紅潮", TARGET
			PRINTFORMW 「しかもすげえ凝ってるやつだし‥‥バカじゃねえの？」
			CALL EMOTEFACE, "重置/心情差/半開/红晕叹气", TARGET
			PRINTFORMW 「つかこれ、%CNAME("一人称")%が着るとかねえだろっ!!」
			CALL EMOTEFACE, "重置/憤怒/赤面", TARGET
			PRINTFORMW 「無駄な金使うのいい加減やめろよなっ！」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ELSEIF TEXTS("日期対応イベント") == "万圣节"
			CALL EMOTION_PLUS, "重置/红晕", TARGET
			PRINTFORMW 「送禮？ なんだろ？」　　　　　　ごそごそ‥‥‥‥
			CALL EMOTION_PLUS, "惊嚇", TARGET
			PRINTFORMW 「はぁっ？！ ちょ、これ‥‥か、仮装セットぉ？！」
			CALL EMOTION_PLUS, "重置/红潮恍惚", TARGET
			PRINTFORMW 「しかもすげえ凝ってるやつだし‥‥バカじゃねえの？ つかこれ、%CNAME("一人称")%が着るのかぁ‥‥？」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ELSEIF TEXTS("日期対応イベント") == "圣诞节" || TEXTS("日期対応イベント") == "圣诞节翌日"
			IF TALENT:相思相愛
				CALL EMOTION_PLUS, "重置/心情差/红晕", TARGET
				PRINTFORMW 「ちょおい。こんな高価なもん受け取れねえよ%CNAME("二人称")%」
				PRINTFORMW 「いくら圣诞节だからって、さすがにこれは‥‥」
				CALL EMOTEFACE, "重置/心情差/飘忽/红晕/頬手", TARGET
				PRINTFORMW 「えぇ？ いゃ、そーじゃなくてさ‥‥ いや、嬉しくねえわけじゃ‥‥」
				PRINTFORML
				PRINTFORMW ‥‥‥‥‥‥‥‥
				PRINTFORMW ‥‥‥‥
				PRINTFORMW ‥‥
				PRINTFORML
				CALL EMOTION_PLUS, "重置/斜眼４/飘忽/憤怒眉/△/赤面２", TARGET
				PRINTFORMW 「ぅう～‥‥ 桑きゅ、な。%CNAME("二人称")%‥‥」
				PRINTFORML
				CFLAG:ハル心情差 = 0
			ELSEIF TALENT:恋慕
				CALL EMOTION_PLUS, "惊嚇/小口/红晕", TARGET
				PRINTFORMW 「ぇ‥‥ 送禮って、これ？」
				PRINTFORMW 「ちょっと高価すぎねえか、これ‥‥」
				CALL EMOTEFACE, "重置/笑颜２/困扰眉/ヮ/红晕", TARGET
				PRINTFORMW 「いや、まぁ‥‥嬉しいけどさ～‥‥ ま、圣诞节だしな。桑きゅ%CNAME("二人称")%」
				CFLAG:ハル心情差 = 0
			ELSE
				CALL EMOTION_PLUS, "惊嚇", TARGET
				PRINTFORMW 「は？ ‥‥これが今年の圣诞节送禮ぉ？！」
				CALL EMOTEFACE, "目陰効果/〇〇/△", TARGET
				PRINTFORMW 「ちょ、おいおいおいおい」
				CALL EMOTEFACE, "青ざめ/〇〇/△", TARGET
				PRINTFORMW 「いくら圣诞节だからって、ただの借住に買うもんじゃねえだろこれは‥‥」
				CALL EMOTEFACE, "青ざめ/〇〇/△/对话框汗", TARGET
				PRINTFORMW 「いや嬉しいし返さねえけど‥‥いいのかぁ～？ こんな高えの‥‥」
				IF CFLAG:ハル心情差
					CFLAG:ハル心情差 -= 1
				ENDIF
			ENDIF
		ELSEIF TEXTS("日期対応イベント") == "情人節" || TEXTS("日期対応イベント") == "情人節翌日"
			IF TALENT:相思相愛
				CALL EMOTION_PLUS, "重置/通常眉短３/栗口/红晕", TARGET
				PRINTFORMW 「‥‥‥え？ これ‥‥ぁ、もしかして情人節、だからか‥‥？」
				CALL EMOTEFACE, "重置/飘忽/通常眉短３/栗口/红晕", TARGET
				PRINTFORMW 「あ‥‥‥あー‥‥そう‥‥‥」
				CALL EMOTEFACE, "重置/目陰効果/半目/飘忽/△/赤面２", TARGET
				PRINTFORMW 「‥‥うー‥‥‥ その、うー‥‥ こんないいもんじゃねえけど‥‥」
				CALL EMOTEFACE, "重置/目陰効果/飘忽/△/赤面２", TARGET
				PRINTFORMW 「ちょ、巧克力なら、ある、けど‥‥食う‥‥？」
				PRINTFORML
				CALL PRINT_STRW, @"%CALLNAME:MASTER%は%CALLNAME:TARGET%からお返しの本命巧克力をもらった_UH_"
				CFLAG:ハル心情差 = 0
			ELSEIF TALENT:恋慕
				CALL EMOTION_PLUS, "惊嚇", TARGET
				PRINTFORMW 「は？ ちょ、これ。どうしたんだよ%CNAME("二人称")%‥‥‥」
				CALL EMOTEFACE, "惊嚇/红晕", TARGET
				PRINTFORMW 「えぇ？ 情人節？ いやいやいや金かけすぎだよこれは」
				CALL EMOTEFACE, "重置/心情差/红晕", TARGET
				PRINTFORMW 「こゆ本気っぽいのはあれだ。恋人とかにやるもんだろ？ 今回のはさすがに受け取れねえよ」
				CALL EMOTEFACE, "重置/憤怒/红晕", TARGET
				PRINTFORMW 「‥‥は？ ダメだっつってんの。受け取らねえっ」
				PRINTFORML
				PRINTFORMW %CALLNAME:MASTER%は%CALLNAME:TARGET%に奮発した送禮の受け取りを拒否されてしまった
				IF CFLAG:ハル心情差
					CFLAG:ハル心情差 -= 1
				ENDIF
			ELSE
				CALL EMOTION_PLUS, "惊嚇", TARGET
				PRINTFORMW 「は？ どうしたんだよ%CNAME("二人称")%これ‥‥‥」
				CALL EMOTEFACE, "目陰効果/〇〇/△/", TARGET
				PRINTFORMW 「え、情人節だから？！」
				CALL EMOTEFACE, "重置/青ざめ/〇〇/△/对话框汗", TARGET
				PRINTFORMW 「いやいやいやいや。いくらなんでも%CNAME("一人称")%相手にこれは張り切りすぎだろうよ‥‥」
				PRINTFORML
				PRINTFORMW %CALLNAME:MASTER%の高価すぎる情人節送禮に%CALLNAME:TARGET%はドン引きしている。
				IF CFLAG:ハル心情差
					CFLAG:ハル心情差 -= 1
				ENDIF
			ENDIF
		ELSEIF TEXTS("日期対応イベント") == "大晦日" || TEXTS("日期対応イベント") == "新年"
			CALL EMOTION_PLUS, "惊嚇", TARGET
			PRINTFORMW 「おおぅ！ 思ったよりデケえ金額が入っててビビったじゃんか」
			PRINTFORMW 「いいのかよ、こんなデケえ金額お年玉に渡しちまっても‥‥」
			PRINTFORMW 「‥‥‥%CNAME("二人称")%がそう言うなら%CNAME("一人称")%はかまわねえけどさ」
			CFLAG:ハル心情差 = 0
		ELSE
			CALL EMOTION_PLUS, "惊嚇", TARGET
			PRINTFORMW 「は？ おいおい、こんな高価な物、受け取れねえよ・・・」
			PRINTFORMW 「え？ いや確かに欲しいっつったけど、日常で気軽に贈る物じゃねえぞこれ・・・」
			PRINTFORML 「ま、買ってきた物を無下にするわけいかねえけど、次からはよく考えて金使えよ、%CNAME("二人称")%」
			IF CFLAG:ハル心情差
				CFLAG:ハル心情差 -= 1
			ENDIF
		ENDIF
	CASEELSE
	ENDSELECT

CASE "撫摸頭髮"
	CALL EMOTION_PLUS, "笑颜２/通常眉３/笑顔３"
	PRINTFORML 「へへ。きれいな色してるだろ？」
	PRINTFORMW 「%CNAME("二人称")%の古いデバイスのせいでそうなっただけだけど、%CNAME("一人称")%はわりと気に入ってるんだ」
;"坐在旁邊", "從後面抱住", "把手放在大腿上"は恋慕限定指令です
CASE "坐在旁邊"
	CALL EMOTION_PLUS, "重置/红晕", TARGET
	PRINTFORMW 「ん？ %CNAME("二人称")%もここ座りたかったのか？ え？ 違うって？」
	CALL EMOTEFACE, "重置/笑顔３/红晕", TARGET
	PRINTFORML 「・・・・・・・・・・へへっ」
	IF CFLAG:ハル心情差
	CFLAG:ハル心情差 -= 1
	ENDIF
CASE "從後面抱住"
	CALL EMOTION_PLUS, "笑颜２/通常眉２/笑顔３/红晕"
	PRINTFORMW 「わ。急になんだよ、%CNAME("二人称")%。・・・・・・ま、いいけどさ」
	PRINTFORML そう言って%CALLNAME:TARGET%は大人しく%CALLNAME:MASTER%の腕の中で%TEXTR("雑誌/本/教科書")%を読んでいる。
	IF CFLAG:ハル心情差
		CFLAG:ハル心情差 -= 1
	ENDIF
CASE "把手放在大腿上"
	IF FLAG:二人きり
		CALL EMOTION_PLUS, "困扰眉/栗口/红晕", TARGET
		PRINTFORML 「もー、それちょっとエロいぞ」
	ELSE
		CALL EMOTION_PLUS, "飘忽/△/紅潮"
		PRINTFORMW 「いつでもどこでもベタベタしすぎじゃねえ？ ちょっとは控えようぜ」
	ENDIF
;この中でTFLAG:取引拒否 = 1とすると母乳を分けてあげません
CASE "哺乳"

CASE "整理睡姿"
	;梦话
	CALL KOJO_SLEEP_K77
	WAIT
CASE "被拒绝了学习的邀请"
	IF TALENT:叛逆
		CALL EMOTION_PLUS, "目陰効果/憤怒眉/嘟嘴３"
		PRINTFORML 「成績落とさねえなら、それでもいいぞ」
	ELSE
		CALL EMOTION_PLUS, "目陰効果/憤怒眉/嘟嘴３/叹气"
		PRINTFORML 「あそ。成績落とさねえなら、%CNAME("一人称")%はそれでもいいけどっ」
	ENDIF
CASE "勉強前に胖次要求"
	CALL EMOTION_PLUS, "重置/心情差", TARGET
	PRINTFORML 「やだよ。なんでそこまでして%CNAME("二人称")%と勉強しなきゃなんねえわけ？」
	CFLAG:ハル心情差 += 1
	CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
	IF TALENT:討厭男人 < 2
		TALENT:討厭男人 = 2
		CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
	ENDIF
	TFLAG:取引拒否 = 1
CASE "卖个破绽"
	SELECTCASE STR:日常イベント名
	CASE "邀请一起入浴"
		PRINTFORMW 「‥‥‥%CNAME("二人称")%、浴室入るなら、いっしょに入んねえ？」
	CASE "Ｈ的邀请"
		PRINTFORMW
	CASE "邀请学习"
		;胖次を要求した
		IF CHOSE_DEVENT("勉強前に胖次要求")
			CALL EMOTION_PLUS, "重置/心情差", TARGET
			PRINTFORMW 「調子に乗るんじゃねえ。なんで胖次なんか%CNAME("二人称")%やんねえといけねえんだよっ」
			IF TALENT:討厭男人 < 2
				TALENT:討厭男人 = 2
				CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
			ENDIF
			TFLAG:取引拒否 = 1
		ELSE
			IF STATE("酔酒")
				CALL EMOTION_PLUS, "酔酒", TARGET
				PRINTFORMW カリカリ カリカリカリ‥‥‥
				PRINTFORML
				PRINTFORMW 「んん～？ ここどうするんだっけ～？ %CNAME("二人称","甘え")%これ分かるか～？」
			ELSE
				CALL EMOTION_PLUS, "重置/", TARGET
				PRINTFORMW カリカリカリ‥‥‥ カリカリカリ‥‥‥
				PRINTFORML
				PRINTFORMW 「ん？ ‥‥‥‥‥‥ああ、そういうことか。‥‥ふむ」
			ENDIF
		ENDIF
	CASE "推倒"
		PRINTFORMW
	CASE "展示内褲"
		;複数人が並んで你に展示内褲ている場合
		IF FLAG:対複数
			CALL EMOTION_PLUS, "心情差", TARGET
			PRINTFORML 「・・・・・・・どうかと思うぞ、今の状況」
		ELSE
			CALL EMOTION_PLUS, "心情差", TARGET
			PRINTFORML 「・・・・・・なんかおかしな状況だな」
		ENDIF
	CASE "清洁口交"
		PRINTFORMW
	CASE "请求清洁口交"
		PRINTFORMW
	CASE "口淫"
		PRINTFORMW
	CASE "亲脸頬", "接吻"
		CALL EMOTION_PLUS, "憤怒眉/小口３/红晕"
		PRINTFORMW 「‥‥‥‥‥‥なんだよ」
	CASE "膝枕", "抱住", "把胸部压了上去", "摩擦股間"
		CALL EMOTION_PLUS, "重置/红晕", TARGET
		PRINTFORMW 「‥‥‥‥‥‥ふふ」
	CASE "抚摸"
		CALL EMOTION_PLUS, "红晕", TARGET
		PRINTFORMW 「‥‥‥‥えへ」
	CASE "手淫"
	CASE "膝枕"
		CALL EMOTION_PLUS, "憤怒眉/飘忽/一文字/红晕"
		PRINTFORMW 「‥‥‥‥‥う～‥‥」
	CASE "沏茶"
		;CSTR:茶 を指定してある場合には、SAVESTR:茶 で何を用意したかが判定できる
		;例）PRINTFORMW 「よければ%SAVESTR:茶%どうぞ」
		IF STATE("酔酒")
			CALL EMOTION_PLUS, "酔酒/", TARGET
			PRINTFORMW 「%CNAME("二人称","甘え")%～♪ %CSTR:茶%淹れたから、飲め～っ♪」
		ELSE
			IF RAND:3 == 0
				CALL EMOTION_PLUS, "重置/", TARGET
				PRINTFORML 「どお？ %CNAME("二人称")%。%CNAME("一人称")%の淹れた%CSTR:茶%は、なかなかうめえだろ？」
			ELSEIF RAND:2 == 0
				CALL EMOTION_PLUS, "重置/", TARGET
				PRINTFORMW 「%CNAME("二人称")%、%CSTR:茶%熱いから気を付けなよ？」
			ELSE
				CALL EMOTION_PLUS, "重置/", TARGET
				PRINTFORML 「是、%CNAME("二人称")%。%CSTR:茶%淹れたから飲みなよ」
			ENDIF
		ENDIF
	;それ以外
	CASEELSE
		IF STATE("酔酒")
			IF RAND:3 == 0
				CALL EMOTION_PLUS, "酔酒/ヮ", TARGET
				PRINTFORMW 「なんか楽しいな～？ そう思わねえ♪」
			ELSEIF RAND:2 == 0
				CALL EMOTION_PLUS, "酔酒/大口", TARGET
				PRINTFORMW 「%CNAME("二人称","甘え")%～♪ もっと酒飲もうぜ～？」
			ELSE
				CALL EMOTION_PLUS, "酔酒", TARGET
				PRINTFORML 「あはは～♪ るんるんる～♪」
			ENDIF
		ELSEIF CFLAG:ハル心情差
			CALL EMOTION_PLUS, "心情差", TARGET
			PRINTFORMW 「%CNAME("二人称")%。是、%CSTR:茶%。熱いから気をつけろよ？」
			PRINTFORML
			PRINTFORML ‥‥‥‥‥‥%CALLNAME:TARGET%が、塩の入った咖啡を出してきた。心情が悪いせいかもしれない。
		ELSE
			IF RAND:3
				CALL EMOTION_PLUS, "通常眉２/嘟嘴３/本", TARGET
				PRINTFORMW 「なあなあ%CNAME("二人称")%、これの答え、何だと思う？」
				PRINTFORMW そう言い的同时、%CALLNAME:TARGET%はさっきから自己解いていた%TEXTR("詰将棋/ナンプレ/雑誌のクイズ/ジグゾーパズル/クロスワードパズル")%を%CALLNAME:MASTER%に見せてきた。
			ELSE
				CALL EMOTION_PLUS, "通常眉２/嘟嘴３", TARGET
				PRINTFORML 「%CNAME("二人称")%、ヒマだ。%CNAME("一人称")%をかまえ」
			ENDIF
		ENDIF
	ENDSELECT
;これは素質に[開朗]ないし[粗野]を持っている角色のみです
CASE "構って欲しい！"
	IF STATE("酔酒")
		CALL EMOTION_PLUS, "酔酒", TARGET
		PRINTFORMW 「わはははっ！ わーい%CNAME("二人称","甘え")%～っ！」
	ELSE
		CALL EMOTION_PLUS, "闲", TARGET
		PRINTFORMW 「%CNAME("二人称")%、%CNAME("一人称")%をかまえ～っ」
	ENDIF
CASE "廁所"
	;廁所で用を済ませた後の台詞
	IF BASE:尿意 == 0
		;主人も廁所で済ませてきた
		IF BASE:MASTER:尿意 == 0
			IF STATE("酔酒")
				CALL EMOTION_PLUS, "酔酒", TARGET
			ELSE
				CALL EMOTION_PLUS, "", TARGET
			ENDIF
			PRINTFORML 「あれ？ %CNAME("二人称")%も廁所だったのか？」
		ELSE
			IF STATE("酔酒")
				CALL EMOTION_PLUS, "酔酒", TARGET
			ELSE
				CALL EMOTION_PLUS, "", TARGET
			ENDIF
			PRINTFORMW 「すっきり～・・・？」
		ENDIF
	;廁所に行く際の台詞
	ELSE
		IF STATE("酔酒")
			CALL EMOTION_PLUS, "酔酒", TARGET
			PRINTFORMW 「ちょっと廁所～♪」
		ELSE
			CALL EMOTION_PLUS, "嘟嘴２", TARGET
			PRINTFORML 「う～‥‥」
		ENDIF
	ENDIF
CASE "廁所詮索"
	IF STATE("酔酒")
		CALL EMOTION_PLUS, "酔酒", TARGET
		PRINTFORMW 「も～っ！ そゆ事聞くやつっつーのは、常識がねえって言うんだぞ？」
	ELSEIF RAND:3 == 0
		CALL EMOTION_PLUS, "心情差"
		PRINTFORML 「どこ行ってたんだって？ ‥‥ションベンだよっ」
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ELSEIF RAND:2
		CALL EMOTION_PLUS, "心情差"
		PRINTFORML 「どこ行ってたんだって？ ‥‥‥廁所だよ、廁所っ」
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ELSE
		CALL EMOTION_PLUS, "心情差"
		PRINTFORML 「どこ行ってたんだって？ ‥‥‥‥ほんとに知りてえのか？」
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ENDIF
;これは你と角色が両方男性の際に限り起きます
CASE "連れション"
	IF STATE("酔酒")
		CALL EMOTION_PLUS, "酔酒", TARGET
		PRINTFORMW 「あれぇ？ %CNAME("二人称")%も廁所行くのか？」
	ELSE
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORMW 「ん？ %CNAME("二人称")%も廁所か？」
	ENDIF
;これは你と角色が両方男性でない際に限り起きます
CASE "廁所で井戸端会議"
	PRINTFORMW
;你に廁所を覗かれた！
CASE "廁所ハプニング"
	CALL EMOTION_PLUS, "重置/〇〇/小口２", TARGET
	PRINTFORMW 「・・・・は？　・・・・・・えぇ？ %CNAME("一人称")%カギ閉めてなかった？」
;廁所ハプニングから派生するＨイベント
CASE "廁所Ｈ"
	SELECTCASE STR:日常イベント名
	CASE "廁所イベント：見せつけくぱぁ"
		PRINTFORMW
	CASE "廁所イベント：相互自慰"
		PRINTFORMW
	CASE "廁所イベント：口交"
		PRINTFORMW
	CASE "廁所イベント：Ｖ性交"
		PRINTFORMW
	CASE "廁所イベント：Ａ性交"
		PRINTFORMW
	ENDSELECT
CASE "检查阴部"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K77
		WAIT
	ELSEIF COND("合意：检查阴部") == 0 || TALENT:叛逆
		CALL EMOTION_PLUS, "心情差"
		PRINTFORMW 「ちょ、いきなり何するつもりだよっ！？」
		PRINTFORML
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ELSE
		CALL EMOTION_PLUS, "惊嚇", TARGET
		PRINTFORML 「ぅわ。 ・・・やってもいいとは言ったけど、いきなりやられっと、驚くぞ」
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
	ENDIF
CASE "检查菊穴"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K77
		WAIT
	ELSE
		CALL EMOTION_PLUS, "心情差"
		PRINTFORMW 「死ねぇっ！ %CNAME("二人称")%っ!!」
		PRINTFORML
		PRINTFORML 『%CALLNAME:TARGET%』は 『%CALLNAME:MASTER%』に%TEXTR("膝蹴り/踵落とし/上段蹴り/飛び蹴り/ハイキック")%で{RAND:14 + 1}000のダメージを与えたっ!!
		CFLAG:好感度 -= 10
		BASE:MASTER:魂 -= 200
		IF BASE:MASTER:魂 <= 0
			PRINTFORM %CALLNAME:MASTER%最後の力を振り絞って復活した！
			BASE:MASTER:魂 = 1
		ENDIF
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ENDIF
CASE "检查内褲"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K77
		WAIT
	ELSEIF COND("合意：检查内褲") == 0
		IF STATE("酔酒")
			CALL EMOTION_PLUS, "酔酒/", TARGET
			PRINTFORMW 「わわっ！ 急に何なんだよ%CNAME("二人称")%？」
		ELSE
			CALL EMOTION_PLUS, "心情差"
			PRINTFORMW 「死ねバカっ！ %CNAME("二人称")%っ!!」
			PRINTFORML
			CFLAG:ハル心情差 +=1
			CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
			IF TALENT:討厭男人 < 2
				TALENT:討厭男人 = 2
				CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
			ENDIF
		ENDIF
	ELSE
		CALL EMOTION_PLUS, "心情差"
		PRINTFORMW 「は？ なんだよ急に。えぇ？ %CNAME("一人称")%の胖次が見てえの？」
		PRINTFORMW 「やだよ。見せねえ。自分の胖次でも見とけばいいだろ？ 付いてる物是っしょだよ」
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ENDIF
;念のため分岐を作って有ますが多いので取捨選択してください
CASE "撫摸股間"
	;初めて
	IF DEVENT(ARGS) == 0 || TALENT:叛逆
		CALL EMOTION_PLUS, "憤怒"
		PRINTFORMW 「ちょ、いきなり何しやがるっ！！」
		PRINTFORML
		PRINTFORML 『%CALLNAME:TARGET%』は 『%CALLNAME:MASTER%』に%TEXTR("膝蹴り/踵落とし/上段蹴り/飛び蹴り/ハイキック")%で{RAND:14 + 1}000のダメージを与えたっ!!
		CFLAG:好感度 -= 10
		BASE:MASTER:魂 -= 200
		IF BASE:MASTER:魂 <= 0
			PRINTFORMW %CALLNAME:MASTER%は最後の力を振り絞って復活したが、%CALLNAME:TARGET%の好感度は下がってしまった！
			BASE:MASTER:魂 = 1
		ENDIF
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"_暗灰色_【好感度：{CFLAG:好感度}　心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	;阴部を直に弄る場合
	ELSEIF CHECK_CLO("Ｖ露出")
		CALL EMOTION_PLUS, "心情差"
		PRINTFORMW 「ちょ、・・・やるとは思ったけど、今やられるとは思わなかった」
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	;连褲襪越し
	ELSEIF CHECK_CLO("连褲襪露出")
		CALL EMOTION_PLUS, "心情差"
		PRINTFORMW
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	;布鲁马越し
	ELSEIF CHECK_CLO("布鲁马露出")
		CALL EMOTION_PLUS, "心情差"
		PRINTFORMW
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	;泳装越し(比基尼や競泳泳装や死库水など)
	ELSEIF CHECK_CLO("泳装ボトム露出") || TALENT:叛逆
		CALL EMOTION_PLUS, "憤怒"
		PRINTFORMW 「いい加減にしろっ！」
		PRINTFORML
		PRINTFORML 『%CALLNAME:TARGET%』は 『%CALLNAME:MASTER%』に%TEXTR("膝蹴り/踵落とし/上段蹴り/飛び蹴り/ハイキック")%で{RAND:14 + 1}000のダメージを与えたっ!!
		CFLAG:好感度 -= 10
		BASE:MASTER:魂 -= 200
		IF BASE:MASTER:魂 <= 0
			PRINTFORMW %CALLNAME:MASTER%は最後の力を振り絞って復活したが、%CALLNAME:TARGET%の好感度は下がってしまった！
			BASE:MASTER:魂 = 1
		ENDIF
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	;胖次越し
	ELSEIF CHECK_CLO("胖次露出") || TALENT:叛逆
		CALL EMOTION_PLUS, "憤怒"
		PRINTFORMW 「天誅っ!!」
		PRINTFORML
		PRINTFORML 『%CALLNAME:TARGET%』は 『%CALLNAME:MASTER%』に%TEXTR("膝蹴り/踵落とし/上段蹴り/飛び蹴り/ハイキック")%で{RAND:14 + 1}000のダメージを与えたっ!!
		CFLAG:好感度 -= 10
		BASE:MASTER:魂 -= 200
		IF BASE:MASTER:魂 <= 0
			PRINTFORMW %CALLNAME:MASTER%は最後の力を振り絞って復活したが、%CALLNAME:TARGET%の好感度は下がってしまった！
			BASE:MASTER:魂 = 1
		ENDIF
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	;其他休闲褲やなんか布越し
	ELSE
		CALL EMOTION_PLUS, "憤怒"
		PRINTFORMW 「このチカン野郎っ！」
		PRINTFORML
		PRINTFORML 『%CALLNAME:TARGET%』は 『%CALLNAME:MASTER%』に%TEXTR("膝蹴り/踵落とし/上段蹴り/飛び蹴り/ハイキック")%で{RAND:14 + 1}000のダメージを与えたっ!!
		CFLAG:好感度 -= 10
		BASE:MASTER:魂 -= 200
		IF BASE:MASTER:魂 <= 0
			PRINTFORMW %CALLNAME:MASTER%は最後の力を振り絞って復活したが、%CALLNAME:TARGET%の好感度は下がってしまった！
			BASE:MASTER:魂 = 1
		ENDIF
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ENDIF
CASE "检查布鲁马", "股間観察"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K77
		WAIT
	;じっくり観察
	ELSEIF TALENT:叛逆 || CFLAG:股間確認済
		CALL EMOTION_PLUS, "心情差"
		PRINTFORML 「・・・・%CNAME("二人称")%、いい加減にしねえと、怒るぞ？」
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ELSE
		IF  TALENT:叛逆
			CALL EMOTION_PLUS, "心情差"
			PRINTFORML 「おかしなことしてるのは自覚してんだろ？ あんまじろじろ見るなってば‥‥‥」
			CFLAG:ハル心情差 += 1
			CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
			IF TALENT:討厭男人 < 2
				TALENT:討厭男人 = 2
				CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
			ENDIF
		ELSE
			CALL EMOTION_PLUS, "心情差"
			PRINTFORML 「おい%CNAME("二人称")%、どこ見てんだよ。気色悪いな‥‥‥」
			CFLAG:ハル心情差 += 1
			CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
			IF TALENT:討厭男人 < 2
				TALENT:討厭男人 = 2
				CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
			ENDIF
		ENDIF
	ENDIF

CASE "掀起裙子"
	SELECTCASE STR:日常イベント名
	CASE "撩起裙子"
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			CALL EMOTION_PLUS, "重置/", TARGET
			PRINTFORML 「じゃーん！ ってバカかこの野郎っ！ めくるんじゃねえよっ」
			CFLAG:ハル心情差 += 1
			CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
			IF TALENT:討厭男人 < 2
				TALENT:討厭男人 = 2
				CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
			ENDIF
		;胖次チラ直後
		ELSEIF COND("胖次チラ直後")
			CALL EMOTION_PLUS, "重置/", TARGET
			PRINTFORML 「ほらよ。見てえなら見せてやんよっ！」
			CFLAG:ハル心情差 += 1
			CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
			IF TALENT:討厭男人 < 2
				TALENT:討厭男人 = 2
				CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
			ENDIF
		ELSE
			CALL EMOTION_PLUS, "重置/", TARGET
			PRINTFORML 「残念、裙の下は男物だよ‥‥ふんっ」
			CFLAG:ハル心情差 += 1
			CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
			IF TALENT:討厭男人 < 2
				TALENT:討厭男人 = 2
				CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
			ENDIF
		ENDIF
	;掀起裙子
	CASEELSE
		;刚睡醒の胡乱な状態を襲う
		IF CFLAG:刚睡醒
			CALL EMOTION_PLUS, "刚睡醒", TARGET
			PRINTFORMW 「‥‥‥‥‥にゅ？ ん～‥‥‥ ん？　・・・・ん？」
			PRINTFORML どうやら%CALLNAME:TARGET%は困倦ているようで、いつものような反応をしない。
		;睡眠中の悪戯
		ELSEIF CFLAG:睡眠
			;梦话
			CALL KOJO_SLEEP_K77
			WAIT
		;初めて
		ELSEIF DEVENT(STR:日常イベント名) == 0 || TALENT:叛逆
			CALL EMOTION_PLUS, "憤怒"
			PRINTFORMW 「うわバカ何すんだやめろっ！」
			PRINTFORML
			PRINTFORMW 『%CALLNAME:TARGET%』は 『%CALLNAME:MASTER%』に%TEXTR("膝蹴り/踵落とし/上段蹴り/飛び蹴り/ハイキック")%で{RAND:14 + 1}000のダメージを与えたっ!!
			CFLAG:好感度 -= 10
			BASE:MASTER:魂 -= 200
			IF BASE:MASTER:魂 <= 0
				PRINTFORM %CALLNAME:MASTER%最後の力を振り絞って復活した！
				BASE:MASTER:魂 = 1
			ENDIF
			CFLAG:ハル心情差 += 1
			CALL PRINT_STRW, @"暗灰色_【好感度：{CFLAG:好感度}　心情：-{CFLAG:ハル心情差}】"
			IF TALENT:討厭男人 < 2
				TALENT:討厭男人 = 2
				CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
			ENDIF
		;胖次チラ直後
		ELSEIF COND("胖次チラ直後") || TALENT:叛逆
			CALL EMOTION_PLUS, "憤怒"
			PRINTFORMW 「さっき見ただろバカっ！」
			PRINTFORML
			PRINTFORMW 『%CALLNAME:TARGET%』は 『%CALLNAME:MASTER%』に%TEXTR("膝蹴り/踵落とし/上段蹴り/飛び蹴り/ハイキック")%で{RAND:14 + 1}000のダメージを与えたっ!!
			CFLAG:好感度 -= 10
			BASE:MASTER:魂 -= 200
			IF BASE:MASTER:魂 <= 0
				PRINTFORM %CALLNAME:MASTER%最後の力を振り絞って復活した！
				BASE:MASTER:魂 = 1
			ENDIF
			CFLAG:ハル心情差 += 1
			CALL PRINT_STRW, @"暗灰色_【好感度：{CFLAG:好感度}　心情：-{CFLAG:ハル心情差}】"
			IF TALENT:討厭男人 < 2
				TALENT:討厭男人 = 2
				CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
			ENDIF
		ELSE
			IF COND("打招呼前")
				CALL EMOTION_PLUS, "憤怒"
				PRINTFORMW 「%CNAME("一人称")%の顔見た直後にそれかよっ」
				PRINTFORML
				PRINTFORMW 『%CALLNAME:TARGET%』は 『%CALLNAME:MASTER%』に%TEXTR("膝蹴り/踵落とし/上段蹴り/飛び蹴り/ハイキック")%で{RAND:14 + 1}000のダメージを与えたっ!!
				CFLAG:好感度 -= 10
				BASE:MASTER:魂 -= 200
				IF BASE:MASTER:魂 <= 0
					PRINTFORM %CALLNAME:MASTER%最後の力を振り絞って復活した!!
					BASE:MASTER:魂 = 1
				ENDIF
				CFLAG:ハル心情差 += 1
				CALL PRINT_STRW, @"暗灰色_【好感度：{CFLAG:好感度}　心情：-{CFLAG:ハル心情差}】"
				IF TALENT:討厭男人 < 2
					TALENT:討厭男人 = 2
					CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
				ENDIF
			ELSE
				;胖次沒穿
				IF EQUIP:胖次 == 0
					CALL EMOTION_PLUS, "憤怒"
					PRINTFORMW 「バカやめろっ！ 今はダメだっ！」
					PRINTFORML
					PRINTFORMW 『%CALLNAME:TARGET%』は 『%CALLNAME:MASTER%』に%TEXTR("膝蹴り/踵落とし/上段蹴り/飛び蹴り/ハイキック")%で{RAND:14 + 1}000のダメージを与えたっ!!
					CFLAG:好感度 -= 10
					BASE:MASTER:魂 -= 200
					IF BASE:MASTER:魂 <= 0
						PRINTFORML %CALLNAME:MASTER%は最後の力を振り絞って復活したが、%CALLNAME:TARGET%の好感度は下がってしまった！
						BASE:MASTER:魂 = 1
					ENDIF
					PRINTFORML 今はって、%CALLNAME:TARGET%の場合、いつもだろう…と%CALLNAME:MASTER%は心の中で呟いた。
					CFLAG:ハル心情差 += 1
					CALL PRINT_STRW, @"暗灰色_【好感度：{CFLAG:好感度}　心情：-{CFLAG:ハル心情差}】"
					IF TALENT:討厭男人 < 2
						TALENT:討厭男人 = 2
						CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
					ENDIF
				ELSE
					CALL EMOTION_PLUS, "憤怒"
					PRINTFORMW 「だから、め君じゃねえっつってるだろっ!!」
					PRINTFORML
					PRINTFORMW 『%CALLNAME:TARGET%』は 『%CALLNAME:MASTER%』に%TEXTR("膝蹴り/踵落とし/上段蹴り/飛び蹴り/ハイキック")%で{RAND:14 + 1}000のダメージを与えたっ!!
					BASE:MASTER:魂 -= 200
					IF BASE:MASTER:魂 <= 0
						PRINTFORM %CALLNAME:MASTER%最後の力を振り絞って復活した!!
						BASE:MASTER:魂 = 1
					ENDIF
					CFLAG:ハル心情差 += 1
					CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
					IF TALENT:討厭男人 < 2
						TALENT:討厭男人 = 2
						CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
					ENDIF
				ENDIF
			ENDIF
		ENDIF
	ENDSELECT
CASE "胖次ドーピング"
	;初回
	IF DEVENT(ARGS) == 0
		;自分の胖次
		IF TALENT:叛逆
			IF COND("胖次ドーピング")
				CALL EMOTION_PLUS, "心情差/半開", TARGET
				PRINTFORML 「‥‥‥うわぁ～‥‥‥ええぇ～‥‥‥」
				CFLAG:ハル心情差 += 1
				CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
				IF TALENT:討厭男人 < 2
					TALENT:討厭男人 = 2
					CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が%CALLNAME:TARGET%の前で性騷擾をしたので、男が苦手から討厭男人成为了！"
				ENDIF
			ELSE
				CALL EMOTION_PLUS, "憤怒"
				PRINTFORML
				CFLAG:ハル心情差 += 2
				CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
				IF TALENT:討厭男人 < 2
					TALENT:討厭男人 = 2
					CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
				ENDIF
			ENDIF
		ELSE
			IF COND("胖次ドーピング")
				CALL EMOTION_PLUS, "心情差", TARGET
				PRINTFORML 「最低だ‥‥‥ 最低だぞこいつ‥‥‥」
				CFLAG:ハル心情差 += 1
				CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
				IF TALENT:討厭男人 < 2
					TALENT:討厭男人 = 2
					CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
				ENDIF
			ELSE
				CALL EMOTION_PLUS, "憤怒"
				PRINTFORML
				CFLAG:ハル心情差 += 2
				CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
				IF TALENT:討厭男人 < 2
					TALENT:討厭男人 = 2
					CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
				ENDIF
			ENDIF
		ENDIF
	ELSE
		CALL EMOTION_PLUS, "心情差", TARGET
		PRINTFORML
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ENDIF
CASE "裙下撮影"
	SELECTCASE STR:日常イベント名
	CASE "撮影失敗"
		CALL EMOTION_PLUS, "半目/憤怒眉/半開", TARGET
		PRINTFORML
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	CASEELSE
		PRINTFORML
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ENDSELECT
CASE "股間撮影"
	SELECTCASE STR:日常イベント名
	CASE "撮影失敗"
		CALL EMOTION_PLUS, "半目/憤怒眉/半開", TARGET
		PRINTFORML
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	CASE "阴部のチラ見せ撮影"
		CALL EMOTION_PLUS, "憤怒", TARGET
		PRINTFORML
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	CASEELSE
		CALL EMOTION_PLUS, "憤怒", TARGET
		PRINTFORML
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ENDSELECT
CASE "内褲摄影"
	SELECTCASE STR:日常イベント名
	CASE "撮影失敗"
		CALL EMOTION_PLUS, "半目/憤怒眉/半開", TARGET
		PRINTFORML
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	CASE "阴部のチラ見せ撮影"
		CALL EMOTION_PLUS, "憤怒", TARGET
		PRINTFORML
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	CASEELSE
		CALL EMOTION_PLUS, "憤怒", TARGET
		PRINTFORML
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ENDSELECT
CASE "阴部摄影"
	SELECTCASE STR:日常イベント名
	CASE "撮影失敗"
		CALL EMOTION_PLUS, "半目/憤怒眉/半開", TARGET
		PRINTFORML
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	CASE "阴部の見せつけ撮影"
		CALL EMOTION_PLUS, "憤怒", TARGET
		PRINTFORML
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	CASEELSE
		CALL EMOTION_PLUS, "憤怒", TARGET
		PRINTFORML
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ENDSELECT
CASE "性処理を頼んだ際の反応"
	CALL EMOTION_PLUS, "心情差"
	CFLAG:ハル心情差 += 1
	TFLAG:指令中止 = 1
	;干劲がある場合
	IF COND("干劲性処理")
		SELECTCASE STR:PLAY内容
		CASE "口交"

		CASE "乳交"

		CASE "Ｖ性交"

		CASE "Ａ性交"

		CASE "尿道性交"

		CASE "乳頭奸"

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

		CASE "Ｖ性交"

		CASE "Ａ性交"

		CASE "尿道性交"

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

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

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

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

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

		CASE "乳交"

		CASE "Ｖ性交"

		CASE "Ａ性交"

		CASE "尿道性交"

		CASE "乳頭奸"

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

		CASE "Ｖ性交"

		CASE "Ａ性交"

		CASE "尿道性交"

		ENDSELECT
	ENDIF
CASE "拜托処理性欲"
TFLAG:指令中止 = 1
	SELECTCASE NAMES("性処理")
	CASE "口交"

	CASE "乳交"

	CASE "Ｖ性交"

	CASE "Ａ性交"

	CASE "尿道性交"

	CASE "乳頭奸"

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

		ELSE

		ENDIF
	CASE "手淫"

	CASE "Ｖ性交"

	CASE "Ａ性交"

	CASE "尿道性交"

	ENDSELECT
CASE "性処理後飲尿PLAY"
TFLAG:指令中止 = 1
;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 "お昼ご飯のお誘い"
	PRINTFORMW 『%CNAME("二人称")%、天気いいから、昼メシ外でいっしょ食わねえ？』

;実際に二人昼食をとっている時です
CASE "一緒にお昼ご飯"
		PRINTFORMW 「あ～、思った街道、ここ気持ちいい場所だな」
		PRINTFORML 「%CNAME("二人称")%はメシ何にしたんだ？ %CNAME("一人称")% %TEXTR("アン胖次/コロッケ胖次/焼きそば胖次/ジャム胖次/阴蒂ーム胖次")%と%TEXTR("牛乳/缶咖啡/フルーツ俺/咖啡牛乳/いちご牛乳")%」
;部室で二人きりの時に坐在旁邊際のセリフです
CASE "二人きり：坐在旁邊"
;部室で二人きりの時にＨに邀请際のセリフです
CASE "Ｈに邀请"
CASE "二人きり：Ｈの誘いに胖次条件で回应"
CASE "二人きり：Ｈの誘いに回应"
CASE "二人きり：Ｈの誘いを断った"

;检查阴部後の派生イベントセリフです
;覗き込んでいる相手はPARTNER()で参照できます
CASE "阴部見せつけ"
	;相手の学年や性別で態度を変えるのも良いでしょう
	SELECTCASE CONDS("学年", PARTNER() )
	CASE "初等部", "中等部"

	CASE "１年生", "２年生"

	CASE "３年生"

	CASE "教員", "研究生"

	CASEELSE

	ENDSELECT

;他の人の检查阴部後に、股間を覗き込んでいる派生イベントセリフです
;检查阴部されている相手はPARTNER()で参照できます
CASE "大人の阴部に興味津々"
CASE "阴部に興味津々"
CASE "阴茎に興味津々"
CASE "性器の違いに興味津々"

ENDSELECT

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

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

;地の文
PRINTFORML 写真には「%MAIL_BODY%」というメッセージが添えられている…

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

SELECTCASE ARGS
;你を週末约会に誘った
CASE "约会のお誘い"
	CALL EMOTION_PLUS, "重置/", TARGET
	PRINTFORMW 「%CNAME("二人称")%、今度の休みにさ、いっしょ玩耍に行かね？」
CASE "约会のお誘い：結果"
	;约会決定！
	;自発的に约会の做便当给よ！って場合はCALL SET_CEVENT, "约会の便当"としてください。
	IF COND("约会的约定")
		CALL EMOTION_PLUS, "重置/笑颜２/大口/对话框兴奋", TARGET
		PRINTFORMW 「よし、そんじゃどこ行くか決めようぜ」
	;你に保留されてしまった
	ELSE
		CALL EMOTION_PLUS, "重置/困扰眉短２", TARGET
		PRINTFORML 「あ、予定もう入ってんのか？ だったらしょーがねえ、１人で出かけるよ」
	ENDIF
;你から週末约会に誘われた
;自発的に约会の做便当给よ！って場合はCALL SET_CEVENT, "约会の便当"としてください。
CASE "约会に誘われた"
	IF CFLAG:ハル心情差
		CALL EMOTION_PLUS, "心情差", TARGET
		PRINTFORMW 「やだ。行きたくねえ。%CNAME("二人称")%嫌いだから、いっしょ出かけるとか、やだ」
		PRINTFORML
		PRINTFORMW そんな事言わないで一緒に出掛けようという、%CALLNAME:MASTER%の説得により、
		PRINTFORMW %CALLNAME:TARGET%はなんとか约会をＯＫしてくれました。
		PRINTFORML
	ELSEIF TALENT:恋慕
		CALL EMOTION_PLUS, "重置/笑颜２/红晕", TARGET
		PRINTFORML 「约会な、いいぞ。行こっか。%CNAME("二人称")%はどこ行きてえ？」
	ELSEIF EXP:约会経験
		CALL EMOTION_PLUS, "△/通常眉短３", TARGET
		PRINTFORMW 「约会？ ‥‥约会な、いいぞ」
		CALL EMOTEFACE, "重置/心情差", TARGET
		PRINTFORMW 「ただし！エロい事はナシだ！」
		PRINTFORMW 「いいな？ 絶対エロい事はナシだかんな？」
	ELSE
		CALL EMOTION_PLUS, "△/对话框？"
		PRINTFORML 「‥‥は？ 约会？ ただいっしょに出かけて玩遊戲んじゃなくて、约会？」
		PRINTFORML 「かまわねえけど、约会か……」
	ENDIF
;你に便当を作ってきてと頼まれた
CASE "便当を頼まれた"

	;これのコメントアウトを取下と、便当を作ってあげません
	;CALL DEL_CEVENT, "约会の便当"
;你から约会当日にいきなり誘われた
;自発的に约会の做便当给よ！って場合はCALL SET_CEVENT, "约会の便当"としてください。
CASE "邀请去约会"
	;同居していない相手を誘った時
	IF COND("同居中") == 0
		[IF_DEBUG]
			PRINTFORMW KOJO_DATE_K77, %ARGS%(同居していない)；いや‥‥同居解消不可ですしねえ
		[ENDIF]
	ELSE
		CALL EMOTION_PLUS, "斜眉"
		PRINTFORML 「%CNAME("一人称")%是いけど、他のやつは、突然誘ったりすると困るだろうから、気をつけろよ？」
	ENDIF

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

;地の文はpartnerが遅れて現れる展開になっています
;地の文が用意されているので、轻轻地１行程度の反応で良いと思います
CASE "待ち合わせ"
	IF COND("同居中") == 0
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORML 「%CNAME("二人称")%、もう用事は済んだのか？ なら行こうぜ」
	ELSE
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORML 「着替え済んだか、%CNAME("二人称")%。んじゃ行こうか」
	ENDIF
	;地の文を自己書きたい場合にはコメントアウトを外してください
	;TFLAG:地の文スキップ = 1

;地の文が用意されているので、轻轻地１行程度の反応で良いと思います
CASE "约会本番"
	SELECTCASE SAVESTR:约会
	CASE "去买泳衣"
		CALL EMOTION_PLUS, "心情差", TARGET
		PRINTFORMW 「男２人で泳装買いに行くっつーのも、どうなのよっつー感じじゃねえ？」
	CASE "散歩"
		CALL EMOTION_PLUS, "笑颜２/大口/通常眉３"
		PRINTFORMW 「いいよな、散歩。天気いい日にてくてく歩くっつーのは楽しいぞ」
	CASE "尋訪美食"
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORMW 「ん？ いいぞ。でも何がうめえか、しっかり吟味して選ばねえと、すぐ腹いっぱいになりそうだな」
	CASE "逛街"
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORMW 「ちょうど欲しい物があったから、一緒に選ぼうぜ」
	CASE "去水族馆"
		CALL EMOTION_PLUS, "笑颜２/大口/通常眉３"
		PRINTFORMW 「水族館って言えば、やっぱジンベエザメだよな？ これ見なきゃ始まんねえ」
	CASE "去游乐园"
		CALL EMOTION_PLUS, "大口"
		PRINTFORMW 「%CNAME("二人称")%、フリーホールとジェットコースター、どっち先乗りてえ？」
	CASE "去电影院"
		CALL EMOTION_PLUS, "惊嚇", TARGET
		PRINTFORMW 「は？ 調子こいて情侣シートで席とったぁ？ バカじゃねえの？」
	CASE "去图书馆"
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORMW 「たまには紙の書籍もいいもんだな。%CNAME("一人称")%普段は電子書籍ばっかだし、新鮮だよ」
	CASE "赏花"
		CALL EMOTION_PLUS, "笑颜２/斜眉/大口/红晕"
		PRINTFORMW 「すげえ、超キレイに咲いてるじゃん。来てよかったな、%CNAME("二人称")%」
	CASE "去游泳"
		CALL EMOTION_PLUS, "笑颜２/ni↘/红晕", TARGET
		PRINTFORMW 「２人で行って、女子２人組をナンパでもすっか？」
	CASE "爬山"
		CALL EMOTION_PLUS, "笑颜２/斜眉/大口/红晕"
		PRINTFORMW 「ハイキングも悪くねえけど、本格的な登山もやってみたくねえ？」
	CASE "赏红叶"
		CALL EMOTION_PLUS, "笑颜２/斜眉/大口/红晕"
		PRINTFORMW 「うわー、すげえきれいに色づいてるなー。だけど人もすげえいっぱいだな%CNAME("二人称")%」
	CASE "滑雪"
		CALL EMOTION_PLUS, "へ字/红晕"
		PRINTFORMW 「擅長く滑れっかドキドキしねえ？ %CNAME("一人称")%が転んでも笑うんじゃねえぞ？」
	CASE "文化祭"
		CALL EMOTION_PLUS, "笑颜２/通常眉３/大口/红晕"
		PRINTFORMW 「あそっか、学校で文化祭やってんだったな。 いいな、行きてえぞ、さっそく行こうぜっ」
	CASEELSE
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORMW 「道こっちでいいのか？ 合ってる？」
	ENDSELECT

	;地の文を自己書きたい場合にはコメントアウトを外してください
	;TFLAG:地の文スキップ = 1
CASE "约会中の買食物"
	SELECTCASE SAVESTR:约会
	CASE "去电影院"
		;何を買ったかはSTR:選択したもの で分岐可能
		SELECTCASE STR:選択したもの
		CASE "爆米花"
			CALL EMOTION_PLUS, "笑颜２/通常眉３/大口/红晕"
			PRINTFORMW 「映画と言えばやっぱこれだよな。バターと角色メル、ハーフ＆ハーフにしようぜ」
		CASE "吉事果"
			CALL EMOTION_PLUS, "重置/", TARGET
			PRINTFORMW 「%CNAME("二人称")%プレーンにしたのか？ %CNAME("一人称")%ココア」
		CASE "热狗"
			CALL EMOTION_PLUS, "重置/", TARGET
			PRINTFORMW 「小腹がすいてる時にちょうどいい量っつーのがいい感じじゃねえ？」
		ENDSELECT
	ENDSELECT
CASE "映画鑑賞中"
	SELECTCASE STR:映画ジャンル
	CASE "サスペンス"
		CALL EMOTION_PLUS, "飘忽/一文字/托下巴", TARGET
		PRINTFORMW （む‥‥次の死人はきっと、今キレて出てったあいつだろうな‥‥‥）
	CASE "ホラー"
		CALL EMOTION_PLUS, "重置/青ざめ/飘忽/抖抖", TARGET
		PRINTFORMW （こ、怖くなんかねえぞ。これは作りもんなんだしっ！ 怖がったりしてどうすんだっ）
	CASE "ラブロマンス"
		CALL EMOTION_PLUS, "重置/心情差", TARGET
		PRINTFORMW （はぁあ～‥‥ 情侣席でラブロマンス観るとか、%CNAME("二人称")%は何考えてんだよ‥‥）
	CASE "アクション"
		CALL EMOTION_PLUS, "惊嚇", TARGET
		PRINTFORMW 「うわ、すっげえ飛んだっ」
	CASE "SF"
		CALL EMOTION_PLUS, "重置/飘忽/栗口/托下巴", TARGET
		PRINTFORMW （すげーっ！ やっぱ技術って使いようだよなーっ！）
	CASE "ポルノ"
		CALL EMOTION_PLUS, "重置/心情差/飘忽/紅潮２/对话框・・・/托下巴", TARGET
		PRINTFORMW （か、覚悟してたよりエロいなこれ‥‥ ぅお、太ももがっ）
	CASE "特撮"
		CALL EMOTION_PLUS, "重置/飘忽/栗口/红晕", TARGET
		PRINTFORMW 「ぅおっ、いけっ、そこだっ」
	CASE "サイコスリラー"
		CALL EMOTION_PLUS, "重置/青ざめ/飘忽/へ字/托下巴", TARGET
		PRINTFORMW （やっぱこの世で一番怖えのは、人类だよな‥‥ うんうん）
	CASE "ドキュメンタリー"
		CALL EMOTION_PLUS, "重置/飘忽/一文字", TARGET
		PRINTFORMW （ふむ‥‥‥ なかなか深い事言いやがるな、この主人公‥‥）
	CASE "サイコホラーサスペンスSFアクションポルノ"
		CALL EMOTION_PLUS, "重置/斜眼４/飘忽/憤怒眉/△/托下巴", TARGET
		PRINTFORMW (むぅ‥‥‥ ここまでカオスな内容だと、逆にアリかもしんねえな‥‥)
	ENDSELECT
CASE "手をつなぐ"
	TFLAG:地の文スキップ = 1
	IF TALENT:恋慕
		PRINTFORMW %CALLNAME:MASTER%が%CALLNAME:TARGET%の手を取ると、%CALLNAME:TARGET%は驚いて一瞬固まった後、
		PRINTFORMW 真っ赤になってそっぽ向いてしばらく視線を泳がせていたけど、繋いだ手を摆脱ことは結局しなかった。
		PRINTFORML
	ELSE
		CALL EMOTION_PLUS, "重置/半目/憤怒眉/呀哒２", TARGET
		PRINTFORMW 「なっ‥‥！ %CNAME("二人称")%バカじゃねえの？」
		PRINTFORMW %CALLNAME:MASTER%が%CALLNAME:TARGET%と手を繋ごうとすると、
		PRINTFORMW %CALLNAME:TARGET%は惊嚇した後、明らかに厌恶地振り支付、身体を少し離してしまった。
		PRINTFORML
		PRINTFORMW いい情緒だっただけに、二人は少し気まずくなった。
		PRINTFORML
		CFLAG:情緒補正 -= 120
	ENDIF
CASE "手をつながない"
	CALL EMOTION_PLUS, "重置/笑颜２/大口/红晕", TARGET
	PRINTFORMW 「%CNAME("二人称")%、今日はすげえ楽しいな？」
	PRINTFORMW %CALLNAME:TARGET%は無邪気に约会を楽しんでいるようだ。
	PRINTFORMW %CALLNAME:MASTER%は、手をつなごうとしなくて正解だったかもしれない。
;泳装を買いに行った時です
CASE "泳装選び開始"
	;Micro比基尼とかもＯＫ
	IF COND("Ｈ的泳装選択可能")
		CALL EMOTION_PLUS, "重置/ni↘", TARGET
		PRINTFORMW 「・・・すげえ、見ろ%CNAME("二人称")%。この泳装着てガッツリ泳ぐやつ、見てみたくねえ？」
	ELSEIF RAND:2
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORMW 「知ってた？ 男物でも最近は露出の少ねえ紧身短褲領帯プがブーメランより流行ってるんだってさ」
		PRINTFORMW %CALLNAME:MASTER%はさり気なくエロい泳装は選ぶなと、%CALLNAME:TARGET%に釘を刺されたようだ。
	ELSE
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORMW 「うわ～～、女物が多いせいか、なんか売り場がカラフルだよな～・・・」
	ENDIF
;泳装を買いに行って、結果的に選んだ泳装に対するセリフです
;もしも去年も泳装を選んでいたなら、CSTR:今年の泳装 に記録されているので比較する事が出来る
CASE "泳装決定"
	SELECTCASE SWIM(STR:選んだ泳装, "種類")
	CASE "Micro比基尼"
		CALL EMOTION_PLUS, "憤怒", TARGET
		PRINTFORMW 「いやいや、おかしいだろ、%CNAME("一人称")%にこの泳装は！！」
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	CASE "比基尼"
		CALL EMOTION_PLUS, "心情差", TARGET
		PRINTFORMW 「・・・普通に男物選ぶ気は・・・ねえのか、ねえんだな‥‥‥」
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	CASE "競泳泳装"
		CALL EMOTION_PLUS, "心情差", TARGET
		PRINTFORMW 「・・・普通に男物選ぶ気は・・・ねえのか、ねえんだな」
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	CASE "高開衩連衣裙"
		CALL EMOTION_PLUS, "心情差/叹气", TARGET
		PRINTFORMW 「・・・普通に男物選ぶ気は・・・ねえのか、ねえんだな」
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	CASE "連体泳装"
		CALL EMOTION_PLUS, "心情差", TARGET
		PRINTFORMW 「・・・普通に男物選ぶ気は・・・ねえのか、ねえんだな」
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	;其他はだいたいエロ泳装です
	CASEELSE
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORMW 「・・・どうよ、これ。ほんとに似合ってんの？」
	ENDSELECT

;泳池などで泳装姿に着替え、待ち合わせ場所に集合した時です
CASE "泳装に着替えた"
	;どの泳装に着替えたか？
	SELECTCASE SWIM(CSTR:今年の泳装, "種類")
	CASE "比基尼"
		CALL EMOTION_PLUS, "心情差", TARGET
		PRINTFORMW 「リクエスト街道、着てみたけど、今日はこの恰好なわけか、%CNAME("一人称")%」
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	CASE "Micro比基尼"
		CALL EMOTION_PLUS, "飘忽/半目/困扰眉/半開４叹气", TARGET
		PRINTFORMW 「うわーい‥‥、似合うか、%CNAME("二人称")%・・・ な、ナンパとかされたらどおしよう・・・・？」
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	CASE "連体泳装"
		CALL EMOTION_PLUS, "飘忽/半目/困扰眉/半開４叹气", TARGET
		PRINTFORMW 「はぁ～… これしかねえから着てみたけど、今日はこの恰好なわけか、%CNAME("一人称")%」
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	CASE "競泳泳装"
		CALL EMOTION_PLUS, "憤怒", TARGET
		PRINTFORMW 「これならブーメラン胖次の方がまだマシだよ・・・」
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	;其他はだいたいエロ泳装です
	CASEELSE
		CALL EMOTION_PLUS, "重置/", TARGET
		PRINTFORMW 「ははは。似合ってっか、これ・・・」
	ENDSELECT

;草丛口交です。地の文が用意されているので、轻轻地１行程度の反応でも良いと思います
CASE "到暗处去……"
	IF TALENT:恋慕
		CALL EMOTION_PLUS, "重置/蹙眉/△/红晕"
		PRINTFORMW 「ちょ、ちょっと、もう… え～？ ここで？ ったく、しょうがねえな～…」
	ELSE
		CALL EMOTION_PLUS, "心情差", TARGET
		PRINTFORMW 「%CNAME("二人称")%、隙あらばそういう事しようとすんの、やめねえ？」
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"_暗灰色【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ENDIF
	;地の文を自己書きたい場合にはコメントアウトを外してください
	;TFLAG:地の文スキップ = 1

;映画館などで横並びに座った状態での手交です。地の文が用意されているので、轻轻地１行程度の反応でも良いと思います
CASE "请求偷偷手交"
	CFLAG:ハル心情差 += 1
	CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
CASE "接吻"
	IF TALENT:恋慕
		CALL EMOTION_PLUS, "小口３/紅潮２"
	ELSE
		CALL EMOTION_PLUS, "憤怒眉/△"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ENDIF
CASE "摸屁股"
	IF TALENT:恋慕
		CALL EMOTION_PLUS, "〇〇/△/红晕"
		PRINTFORMW 「ひゃっ!! ちょ、もうっ。何すんだよ%CNAME("二人称")%っ!! 惊嚇して変な声出ちったじゃねえか」」
	ELSE
		CALL EMOTION_PLUS, "心情差", TARGET
		PRINTFORMW バキッ!!　　　　　「あ、悪い。不埒なやつかと思ったら%CNAME("二人称")%かよ…」
		CFLAG:ハル心情差 += 1
		CALL PRINT_STRW, @"暗灰色_【心情：-{CFLAG:ハル心情差}】"
		IF TALENT:討厭男人 < 2
			TALENT:討厭男人 = 2
			CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%が性騷擾したので、%CALLNAME:TARGET%は男が苦手から討厭男人成为了!!"
		ENDIF
	ENDIF
;你が草丛口交や接吻や性騷擾をしない紳士な場合はここに来ます
CASE "下次去哪里呢？询问", "专心看电影"

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

;文化祭イベント
;ここでは"约会相手ではなく出し物をしている人"が喋ります。
;本来の约会相手はPARTNER()に角色番号が入ってます。呼びかける場合にはCNAME("partner")を使ってください
CASE "乐队演奏", "演劇", "占卜館", "恐怖屋敷", "烦悩相談室", "PaFuPaFu屋", "女仆咖啡厅", "執事咖啡厅", "西式料理店"
	PRINTFORMW
;帰り際のセリフです。不动声色地エッチに邀请のもいいでしょう
;STR:Ｈする場所 で場所を情人旅館以外にする事も出来ます。（例 STR:Ｈする場所 = 部室
CASE "帰り際"
	IF TALENT:恋慕
		CALL EMOTION_PLUS, "重置/笑颜２/大口/紅潮"
		PRINTFORMW 「あーもうこんな時間かぁ‥‥ 楽しいと時間ってすぎるの早えな、%CNAME("二人称")%」
		PRINTFORMW 「今日はすげえ楽しかった。また誘ってくれるか？」
	ELSE
		CALL EMOTION_PLUS, "重置/大口/紅潮"
		PRINTFORMW 「今日は楽しかったぞ、%CNAME("二人称")%」
		PRINTFORMW 「また機会があれば、玩耍に行こうぜ」
	ENDIF
CASE "约会終了"
	;エッチをする場合
	IF TFLAG:床イン
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			CALL EMOTION_PLUS, "心情差", TARGET
			PRINTFORMW
			CFLAG:ハル心情差 += 1
		ENDIF
	ELSE
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
ENDSELECT

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

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

SELECTCASE RAND:2
CASE 4
	PRINTFORMW 『』
CASE 3
	PRINTFORMW 『』
CASE 2
	PRINTFORMW 『』
CASE 1
	PRINTFORMW 『気を付けよう、%CALLNAME:TARGET%の心情は選択肢の選び方によって、悪くなったりもする』
CASEELSE
	PRINTFORMW 『%CALLNAME:TARGET%は選択肢によって、好感度が下がったりもするから気をつけよう』
ENDSELECT

path: ERB/EVENT_K/77 ハル/EVENT_K77_DAILY.ERB