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

MEMO_LINECOUNT = LINECOUNT

SELECTCASE ARGS
CASE "取引開始"
	;自分を相手にＨしてる最中にお願いされた
	IF COND("Ｈ最中の取引")
		;しかも挿入中！
		IF INSERT("挿入相手") == MASTER
			;直前行動：肛門騎乗位
			IF SELECTCOM == 75
				CALL PRINT_STRW, @"貴方は米娅に肛門騎乗位させたまま取引を持ち掛けた"
				PRINTL
				CALL PRINT_STRW, @"「…あらぁ？…あらあらぁ？ おやおやぁ？♪」"
				CALL PRINT_STRW, @"「%CNAME("二人称")%ったら…本当にサキュバスにとって都合の良い殿方ですねぇ…_HH_」"
				PRINTL
				CALL PRINT_STRW, @"米娅は貴方の頬に両手を温柔的添えた"
				PRINTL
				CALL PRINT_STRW, @"「今まさにサキュバスに精を搾られているのに…」"
				CALL PRINT_STRW, @"「更に契約を結んで魂を%TEXTR("差し出したい/捧げたい")%と…？」"
				CALL PRINT_STRW, @"「…んふっ……んふふふ…_HH_」"
				PRINTL
				CALL PRINT_STRW, @"米娅は興奮した様子で舌なめずりし、真っ赤な目を細めて貴方を見下ろした"
				CALL PRINT_STRW, @"%CNAME("直腸_地文")%はきつく収縮し、%CNAME("阴茎_地文")%をより一層締め上げてくる"
				PRINTL
				CALL PRINT_STRW, @"「もちろんですよ…もちろん%TEXTR("大歓迎/良い/おーけー")%ですよ%CNAME("二人称")%…」"
				CALL PRINT_STRW, @"「こんな素敵なご提案…米娅が断るわけ無いじゃないですか…」"
				CALL PRINT_STRW, @"「どんな願いも…どんな欲望も叶えてあげますよ…」"
				PRINTL
				CALL PRINT_STRW, @"獲物を捕らえた獣の如き米娅の様子に…貴方の背筋に悪寒が走る"
				CALL PRINT_STRW, @"%TEXTR("この状況に/本能が")%身の危険を感じたのか、貴方の%CNAME("阴茎_地文")%は一層膨張し…"
				CALL PRINT_STRW, @"%TEXTR("我慢汁/カウ布汁")%を情けなく米娅の%CNAME("直腸_地文")%に垂れ流した"
				PRINTL
				CALL PRINT_STRW, @"「あれ…？ %CNAME("阴茎")%おっきくなったんですけど？」"
				CALL PRINT_STRW, @"「んふふ……そんなに米娅に魂を食べられたいんだ？ んっふふふふ……_HH_」"
				PRINTL
				CALL PRINT_STRW, @"「…それで%CNAME("二人称")%……」"
				PRINTL
				CALL PRINT_STRW, @"「お願いはな～に？_HH__HH_」"
			ELSEIF PREVEX("Ａ中出し")
				CALL PRINT_STRW, @"貴方は米娅の%CNAME("肛門_地文")%に%CNAME("中出し_地文2")%直後、繋がったまま取引を持ち掛けた"
				PRINTL
				SELECTCASE RAND:3
					CASE 0
						CALL PRINT_STRW, @"「えっ……？ へっ！？ この領帯ミングで取引っ！？」"
						CALL PRINT_STRW, @"「…ぷふっ、あはは！ %CNAME("二人称")%ったら変なの～♪」"
						CALL PRINT_STRW, @"「じゃあ今さっき出した%CNAME("精液")%が熱い内にお願いを言って下さ～い♪」"
					CASE 1
						CALL PRINT_STRW, @"「…嗯～、还想多享受一会余韵呢～…真拿你没办法」"
						CALL PRINT_STRW, @"「まずは残った%CNAME("精液")%を出し尽くしてくださいっ…！ んんっ！！_HH_」"
						CALL PRINT_STRW, @"米娅は阴茎を根元まで咥え込み、尻を貴方の腰に密着させ、ぐりぐりとこねくり回した"
						PRINTL
						CALL PRINT_STR, @"（…呼呀！）"
						PRINTL
						CALL PRINT_STRW, @"「%TEXTR("あ/ん/や")%っ！_HH_…んふふ、尿道に残ってたのがようやく出ましたね_HH_」"
						CALL PRINT_STRW, @"「%TEXTR("呼呜～～～/哈啊～～～/嗯mmm～～～")%……所以说、到底有什么请求呢？♪」"
					CASE 2
						CALL PRINT_STRW, @"「はぁ、はぁっ…んふふ、いいですよ♪ どんな事を叶えて欲しいんですか～？」"
						CALL PRINT_STRW, @"貴方が米娅に願い事を伝えようと口を開いた瞬間…"
						PRINTL
						CALL PRINT_STRW, @"「えいっ♪ ぐりぐり～_HH_」"
						CALL PRINT_STRW, @"米娅は阴茎を根元まで咥え込み、尻を貴方の腰に密着させ、ぐりぐりとこねくり回した"
						CALL PRINT_STRW, @"射精直後で敏感な%CNAME("阴茎_地文")%への重い刺激に、轻轻地絶頂して思わず変な声が出てしまう"
						PRINTL
						CALL PRINT_STR, @"（…%TEXTR("ぶぴゅ/びゅ/ぶっぴゅん")%っ！）"
						PRINTL
						CALL PRINT_STRW, @"「%TEXTR("あ/ん/や")%っ！_HH_ あはは♪ 今なんて言おうとしましたかぁ？」"
						CALL PRINT_STRW, @"貴方が改めて希望を伝えようとすると、%CNAME("阴茎_地文")%がいきなり腸壁で締め付けられる"
						CALL PRINT_STRW, @"尿道内に残留した%CNAME("精液_地文")%が引き搾られ、再び貴方はおかしな声が出てしまう"
						PRINTL
						CALL PRINT_STR, @"（…呼呀！）"
						PRINTL
						CALL PRINT_STRW, @"「%TEXTR("あはは/きゃはは/いひひ")%！♪ %CNAME("二人称")%さっきから何言ってるんですかぁ？_HH_」"
						CALL PRINT_STRW, @"「酱と願い事言ってくださいよ～_HH_ 【%TEXTR("おほ/うぉ/うわ")%っ】とか【%TEXTR("んぐ/んぉ/んひぃ")%っ】とは言われても分からないんですけどぉ_HH_」"
						CALL PRINT_STRW, @"貴方は%CNAME("阴茎_地文")%が落ち着くまで、暫く米娅に弄ばれた"
				ENDSELECT
			ELSE
				SELECTCASE RAND:4
					CASE 0
						CALL PRINT_STRW, @"「%TEXTR("噫/呀啊/呜哇")%っ！_HH_ 等等、这、这个时候猛攻好狡猾！ %TEXTR("呀啊啊啊/哈啊/嗯啊")%_HH_」"
						CALL PRINT_STRW, @"「%TEXTR("啊/嗯/哈")%っ_HH_ 这、这种时候、的要求、%TEXTR("没法拒绝/一定得答应")%呢_HH_」"
					CASE 1
						CALL PRINT_STRW, @"「%TEXTR("啊哦/嗯啊/嗯")%っ_HH_ 所、所以说啦、别一边插在里面一边求人啊！_HH_」"
					CASE 2
						CALL PRINT_STRW, @"「%TEXTR("呼呜/嗯啊/弗")%っ…恩！ 什么、嗯、一定要现在吗？ 嗯啊啊啊！_HH_」"
						CALL PRINT_STRW, @"「啊、知、我知道了啦！ 稍微慢一点啊！ %TEXTR("哇啊啊啊/齁噢噢噢噢/呀啊啊啊啊")%_HH_」"
					CASE 3
						CALL PRINT_STRW, @"「%TEXTR("啊恩/嗯/Nia")%っ_HH_ 噫、这样放进去就行？ 真是的、%CNAME("二人称")%至于这么兴奋吗_HH_」"
				ENDSELECT
			ENDIF
		;直前行動：肛門愛撫
		ELSEIF PREVCOM == 2
			CALL PRINT_STRW, @"米娅の%TEXTR("肛門を愛撫/肛門に指を抜き差し")%し的同时、貴方は取引を持ち掛けた"
			PRINTL
			CALL PRINT_STR, @"（ずぷっ、ずぽ、ぐりぐりぃ…）"
			PRINTL
			CALL PRINT_STRW, @"「%TEXTR("んぉ/うぁ/んぁ/あぁ")%_HH_ %TEXTR("あん/んぁ/やん")%っ、%TEXTR("んんん/んんぁ")%…！_HH_」"
			CALL PRINT_STRW, @"「と、取引したいならまず指抜いて下さいっ…_HH_」"
		;直前行動：接吻
		ELSEIF PREVCOM == 6
			CALL PRINT_STRW, @"米娅の唇を奪い的同时、貴方は取引を持ち掛けた"
			PRINTL
			CALL PRINT_STRW, @"「…%TEXTR("ちゅ/はむ/んむ/ちゅる")%_HH_ ぷぁ…わ、わかりまし…んんっ！？_HH_」"
			CALL PRINT_STRW, @"「%TEXTR("ちゅ/はむ/んむ/ちゅる")%っ、%TEXTR("ちゅぱ/んちゅ/れろ")%っ…_HH_ ちょ、まって…んむっ！？_HH_」"
			CALL PRINT_STRW, @"「んんっ、んん～～っ…！_HH_ ぷはぁ！ んもぉ！ %CNAME("二人称")%ったら米娅の事好きすぎ！_／／／_」"
		;直前行動：舐肛
		ELSEIF PREVCOM == 9
			CALL PRINT_STRW, @"米娅の%TEXTR("肛門/肛門")%%TEXTR("を舐め/に舌を差し込み")%的同时、貴方は取引を持ち掛けた"
			PRINTL
			CALL PRINT_STRW, @"「%TEXTR("んっはぁ/あっはぁ/はぁん")%！_HH_ わ、分かりましたっ…！ 分かりましたからっ、舐めながら喋らないでっ！_HH_」"
		;直前行動：Aくぱぁ
		ELSEIF PREVCOM == 14
			CALL PRINT_STRW, @"米娅の%CNAME("肛門_地文")%を観察し的同时、貴方は取引を持ち掛けた"
			PRINTL
			CALL PRINT_STRW, @"「…ど、どういう感情で%TEXTR("お願いしてる/取引持ち掛けてる")%んですか…？」"
		;直前行動：甜言蜜语
		ELSEIF PREVCOM == 283 && TEQUIP:甜言蜜语
			CALL PRINT_STRW, @"米娅に甜言蜜语をかけた直後、貴方は取引を持ち掛けた"
			PRINTL
			CALL PRINT_STRW, @"「んむぅぅ……_／／／_ 割引は有ませんからね…_／／／_」"
		ELSEIF PREVEX("口内射精")
			CALL PRINT_STRW, @"散々米娅の口内に射精した直後、貴方は取引を持ち掛けた"
			PRINTL
			SELECTCASE RAND:2
				CASE 0
					CALL PRINT_STRW, @"「ん～？ いあああ、おいいい、えうあぁ？」"
					CALL PRINT_STRW, @"「…んん……んご君っ…_HH_」"
					CALL PRINT_STRW, @"「ふぅ～～失礼しました、今から取引ですか？_HH_」"
				CASE 1
					CALL PRINT_STRW, @"「良いですよ～！ 取引しましょ～！_HH_」"
					CALL PRINT_STRW, @"「けどその前に～…あむっ♪」"
					PRINTL
					CALL PRINT_STRW, @"米娅は貴方の亀頭を口に含み…"
					PRINTL
					CALL PRINT_STRW, @"「…じゅるっ！ じゅるるっ、じゅぞぞぞっ！_HH_」"
					PRINTL
					CALL PRINT_STRW, @"尿道に残留した%CNAME("精液_地文")%を吸い上げた"
					PRINTL
					CALL PRINT_STRW, @"「んん～♪ こ君っ…_HH_……んふふ、結構残ってましたね♪」"
					CALL PRINT_STRW, @"「さて改めて、お望みの取引は何ですか？_HH_」"
			ENDSELECT
		ELSE
			CALL PRINT_STRW, @"「哇～哦！ 现在就開始交易吗？」"
			CALL PRINT_STRW, @"「姥爷你还是这么有趣♪ 所以特地挑这种时候是想要什么呀？」"
		ENDIF
	ELSE
		IF TALENT:恋慕
			SELECTCASE RAND:2
				CASE 0
					CALL PRINT_STRW, @"「哦♪ 想让我干什么呢？」"
				CASE 1
					CALL PRINT_STRW, @"「哼哼♪ 那么您想要什么样的服务呢？」"
			ENDSELECT
		ELSE
			SELECTCASE RAND:2
				CASE 0
					CALL PRINT_STRW, @"「%TEXTR("はぁ～い/はぁい")%♪ どんな取引しますか～？_HH_」"
				CASE 1
					CALL PRINT_STRW, @"「%TEXTR("んふふ/いひひ")%…淫魔と何を契約しましょう…？_HH_」"
			ENDSELECT
		ENDIF
	ENDIF
CASE "愛の告白"
	IF COND("調教中")
		;告白成功
		IF TALENT:相思相愛
			;挿入中
			IF INSERT("挿入相手") == MASTER
				CALL PRINT_STRW, @"「へっ…！？ あっ、えっ、えぇええっ…！？_／／／_」"
				PRINTL
				CALL PRINT_STRW, @"%CNAME("肛門_地文")%に%CNAME("阴茎_地文")%を入れたままの告白"
				CALL PRINT_STRW, @"そのあまりの不意打ちに米娅は混乱している"
				PRINTL
				CALL PRINT_STRW, @"「えっ、い、今なんてっ…！？_／／／_」"
				PRINTL
				CALL PRINT_STRW, @"激烈地収縮する%CNAME("直腸_地文")%から%CNAME("阴茎_地文")%を通じて、米娅の動揺が伝わってくる"
				CALL PRINT_STRW, @"そんな彼女の質問に対して…"
				PRINTL
				CALL PRINT_STR, @"（どちゅんっ！！）"
				PRINTL
				CALL PRINT_STRW, @"「%TEXTR("んぉぉ/おぉぉ/おほぉ")%っ…！？_HH_」"
				PRINTL
				CALL PRINT_STRW, @"これが答えだと言わんばかりに、根元まで%CNAME("阴茎_地文")%をいきなり挿入した"
				PRINTL
				CALL PRINT_STRW, @"「んぐっ……！？_HH_ ぉっ…！？_HH_」"
				PRINTL
				CALL PRINT_STRW, @"更なる不意打ちに目を開いている米娅に、耳元で温柔的告白を囁く"
				PRINTL
				CALL PRINT_STRW, @"「っ…！？！？_HH__／／／_」"
				PRINTL
				CALL PRINT_STRW, @"腹に響く熱い阴茎に…脳に響く甜言蜜语…"
				CALL PRINT_STRW, @"身心同時に想い人から愛を求められ…"
				CALL PRINT_STRW, @"米娅の心から喜びが溢れる"
				PRINTL
				CALL PRINT_STRW, @"「…っは、是っ…_／／／_」"
				CALL PRINT_STRW, @"「…米娅もっ…米娅もっ……%CNAME("二人称")%の事が大好きでしたっ…_／／／_」"
				CALL PRINT_STRW, @"「…で、でも、本当なのですかっ…？」"
				PRINTL
				CALL PRINT_STRW, @"「…米娅はサキュバスですよ…？ 他の殿方と肌を重ねるのは…きっとやめられないです…」"
				CALL PRINT_STRW, @"「…本当に…本当に…米娅と恋人になりたいんですか…？」"
				PRINTL
				CALL PRINT_STR, @"（ドチュンッ！！）"
				PRINTL
				CALL PRINT_STRW, @"「%TEXTR("んぁあああ/んぃいいい/んぉおおお/んぐぉおお/くぅあああ")%っ！？！？_HH_」"
				PRINTL
				CALL PRINT_STRW, @"何度も答えてやると言わんばかりに、結腸に向かって%CNAME("阴茎_地文")%を奥まで貫く"
				PRINTL
				CALL PRINT_STR, @"（ぐちゅぐちゅ…グリグリッ…）"
				PRINTL
				CALL PRINT_STRW, @"「%TEXTR("んっはぁ/あっはぁ/はぁん")%！？_HH_ %TEXTR("あ/ん/や")%っ…、%TEXTR("おほぉ/んほぉ/あはぁ/んはぁ")%！？_HH_」"
				PRINTL
				CALL PRINT_STRW, @"喜びで痙攣する%CNAME("直腸_地文")%を%CNAME("阴茎_地文")%でかき混ぜ的同时、"
				CALL PRINT_STRW, @"米娅がずっと米娅のままでも…ずっと愛すると囁いた"
				PRINTL
				CALL PRINT_STRW, @"「んんぁっ！？_HH_ あっ、あぁぁっ…！_HH_」"
				CALL PRINT_STRW, @"「う、嬉しいですっ！ 米娅、そんな事言われたの初めてっ！」"
				CALL PRINT_STRW, @"「米娅もっ…米娅も%CNAME("二人称")%のっ…恋人になりたいですっ！」"
				CALL PRINT_STRW, @"「米娅をっ…%CNAME("二人称")%の恋人にして下さいっ！」"
				PRINTL
				CALL PRINT_STRW, @"告白に逆告白を重ねられ、%CNAME("阴茎_地文")%是っそう隆起し、心は喜びに満たされる"
				PRINTL
				CALL PRINT_STR, @"（ぱんっ！ ぱんっ！ ぱんっ！）"
				PRINTL
				CALL PRINT_STRW, @"「%TEXTR("んっはぁ/あっはぁ/はぁん")%！？_HH_ %TEXTR("あ/ん/や")%っ…、%TEXTR("おほぉ/んほぉ/あはぁ/んはぁ")%！_HH_」"
				PRINTL
				CALL PRINT_STRW, @"気付けば貴方は腰を激烈地振り、米娅は%CNAME("直腸_地文")%を激烈地締める"
				CALL PRINT_STRW, @"互いが互いを絶対に逃がすまいと、互いが互いを激烈地求めあう"
				PRINTL
				CALL PRINT_STR, @"（胖次ッ！ 胖次ッ！ 胖次ッ！）"
				PRINTL
				CALL PRINT_STRW, @"「%TEXTR("あん/んぁ/やん")%っ！_HH_ %TEXTR("んっはぁ/あっはぁ/はぁん")%っ！_HH_ %TEXTR("くっはぁ/かっはぁ/んっはぁ/おっふぅ")%！_HH_」"
				CALL PRINT_STRW, @"「す、好きぃいいっ！_HH_ %CNAME("二人称")%大好きぃいいいっ！！_HH_」"
				PRINTL
				CALL PRINT_STRW, @"そして背徳感と快楽が赴くまま、貴方と米娅は深い絶頂を迎えた"
				PRINTL
				IF TALENT:MASTER:射精量強化 <= 3
					CALL PRINT_STR, @"（%TEXTR("ぶびゅるる/びゅるるる/ぶびゅるるん/びゅるるん")%っ…！！）"
				ELSEIF TALENT:MASTER:射精量強化 >= 4 && TALENT:MASTER:射精量強化 <= 6
					CALL PRINT_STR, @"（%TEXTR("ビュルルル/ブビュルルル/ブビュルルーー")%ッ…！！）"
				ELSE
					CALL PRINT_STR, @"（%TEXTR("ドビュルルル/ドブビュルルル/ドブビュルルーー")%ッ…！！）"
				ENDIF
				PRINTL
				CALL PRINT_STRW, @"「%TEXTR("んぉぉーー～～/おぉぉーー～～/おほぉーー～～")%！？！？_HH__／／／_ イックゥウウウッ…！！_HH__／／／_」"
				PRINTL
				CALL PRINT_STRW, @"……"
				CALL PRINT_STRW, @"………"
				PRINTL
				CALL PRINT_STRW, @"「%TEXTR("んっぐぅ/おおぉぉ/はぁ、はぁ/かっはぁ")%っ、%TEXTR("あはぁ/んふぅ/んはぁ/はふぅ")%…_HH__／／／_ はぁ…はぁ…っ_HH__／／／_」"
				PRINTL
				CALL PRINT_STRW, @"米娅の%CNAME("直腸_地文")%に注いだ中で最も濃厚的%CNAME("精液_地文")%を放った貴方"
				CALL PRINT_STRW, @"後を引く余韻と結ばれた田交換に浸り的同时、二人は合図無く自然と顔を合わせた"
				PRINTL
				CALL PRINT_STRW, @"「んっはぁ…_HH_ %CNAME("二人称")%の%CNAME("精液")%…今まで一番重くて…一番濃かったですっ…_HH_」"
				CALL PRINT_STRW, @"「あっ……恋人になって最初の共同作業が%CNAME("肛門性交")%になっちゃいましたね…」"
				PRINTL
				CALL PRINT_STRW, @"「んふふ、なんだか米娅達らしいですね♪」"
				PRINTL
				CALL PRINT_STRW, @"貴方と米娅は胸を踊らす"
				CALL PRINT_STRW, @"これから始圆圈新しい関係に…"
				PRINTL
				CALL PRINT_STRW, @"「%CNAME("二人称")%……」"
				CALL PRINT_STRW, @"「不束者ですが…よろしくお願いします…_HH__／／／_」"
			;それ以外
			ELSE
				CALL PRINT_STRW, @"「えっ…？ や、やだ、この領帯ミングでっ…！？_／／／_」"
				CALL PRINT_STRW, @"「あっ、ちょっ…ちょっと待って下さい全然心の準備がっ！_／／／_」"
				PRINTL
				CALL PRINT_STRW, @"告白が完全に不意打ちだった米娅はその場で混乱している"
				PRINTL
				CALL PRINT_STRW, @"「てっ、ていうかっ…告白ってもっとこう！ 情緒のある場所と時間でするもんなんじゃ！_／／／_」"
				CALL PRINT_STRW, @"「い、いや今も別でそういう情緒ですけどっ！_／／／_」"
				PRINTL
				CALL PRINT_STRW, @"貴方は狼狽中の米娅をなだめる様に抱きしめ、耳元で囁いて告白した"
				PRINTL
				CALL PRINT_STRW, @"「っ…！！？？_／／／_ ……はっ……はぅぅ………_／／／_」"
				CALL PRINT_STRW, @"「………」"
				CALL PRINT_STRW, @"「……%CNAME("二人称")%はズルい殿方ですっ…_／／／_」"
				PRINTL
				CALL PRINT_STRW, @"米娅は羞恥で真っ赤な顔面を隠すように、貴方の胸元で抱きしめ返してきた"
				PRINTL
				CALL PRINT_STRW, @"「…不束者ですが…よろしくお願いいたします…_／／／_」"
			ENDIF
		;失敗
		ELSE
			;挿入中
			IF INSERT("挿入相手") == MASTER
				CALL PRINT_STRW, @"「あはは、%CNAME("阴茎")%を%CNAME("肛門")%に入れたまま告白するなんて%CNAME("二人称")%も中々の玩耍人ですね～？♪」"
				CALL PRINT_STRW, @"「ざんね～ん★ 米娅には他にもご奉仕している殿方がいまーす♪」"
				CALL PRINT_STRW, @"「%CNAME("二人称")%だけ特別扱いは出来ませーん★」"
				PRINTL
				PRINTFORM %TEXTR("轻轻地あしらわれた/アッサリ断られた")%腹いせに
				SELECTCASE RAND:2
					CASE 0
						PRINTFORMW 貴方は米娅の%CNAME("直腸_地文")%をグリグリと%TEXTR("かき混ぜた/撹拌した")%
						PRINTL
						CALL PRINT_STR, @"（ぐちゅぐちゅ…グリグリッ…）"
						PRINTL
						CALL PRINT_STRW, @"「%TEXTR("おっふぅ/んほぉお/くぅうん")%！？_HH_ %TEXTR("んんん～～/んくぅう～～/くぅう～～")%…っ！_HH_」"
						CALL PRINT_STRW, @"「き、気持ち良くしても答えは変わりませんからっ！」"
					CASE 1
						PRINTFORMW 貴方は米娅の%CNAME("直腸_地文")%を激しめに突き上げた
						PRINTL
						CALL PRINT_STR, @"（胖次ッ！ 胖次ッ！ 胖次ッ！）"
						PRINTL
						CALL PRINT_STRW, @"「%TEXTR("んっはぁ/あっはぁ/はぁん")%！？_HH_ %TEXTR("あ/ん/や")%っ…、%TEXTR("おほぉ/んほぉ/あはぁ/んはぁ")%！_HH_」"
						CALL PRINT_STRW, @"「そ、そんなに突いてもっ…！ 付き合いませんからっ！_HH_」"
						CALL PRINT_STRW, @"「あはっ！♪ 突き合って是ますけどねっ！_HH_」"
				ENDSELECT
			;それ以外
			ELSE
				CALL PRINT_STRW, @"「おやおや？ 米娅と性交して惚れちゃいましたか～？」"
				CALL PRINT_STRW, @"「残念ですが今の%CNAME("二人称")%と同じように、米娅と肌を重ねるのを待っている殿方が沢山いるのですよ」"
				CALL PRINT_STRW, @"「気持ちはとても嬉しいですがお断りさせて頂きますね」"
				PRINTL
				CALL PRINT_STRW, @"「…あはは、テンション下がっちゃいましたか？」"
				CALL PRINT_STRW, @"「しょ～がないなぁ、じゃあいつもより少しだけ特別扱いしてあげますよ…_HH_」"
			ENDIF
		ENDIF
	ELSE
		;告白成功
		IF TALENT:相思相愛
			CALL PRINT_STRW, @"「啊、那个…非常感谢…！」"
			CALL PRINT_STRW, @"「米娅、米娅也很喜欢%CNAME("二人称")%！」"
			CALL PRINT_STRW, @"「%CNAME("二人称")%ーー～～っ！」"
			CALL PRINT_STRW, @"米娅は満脸笑容地浮かべ、貴方に飛びついてきた"
			PRINTL
			CALL PRINT_STRW, @"「米娅、好開心！ 幸福Desu！」"
			CALL PRINT_STRW, @"「那个、我是个粗心的家伙、之后请多多関照！」"
		;失敗
		ELSE
			IF CEVENT("告白失敗_米娅_1") == 0
				CALL PRINT_STRW, @"「感谢你的告白、真的」"
				CALL PRINT_STRW, @"「けどごめんなさい…米娅はご奉仕してる殿方が沢山いるんです…」"
				CALL PRINT_STRW, @"「所以不能被%CNAME("二人称")%独占」"
				CALL PRINT_STRW, @"「但是你的心意我收到了哟♪」"
				CALL SET_CEVENT, "告白失敗_米娅_1"
			ELSEIF CEVENT("告白失敗_米娅_2") == 0
				CALL PRINT_STRW, @"「わぁ、有がとうございます！」"
				CALL PRINT_STRW, @"「けど%CNAME("二人称")%は米娅には勿体無いくらい素敵な方です」"
				CALL PRINT_STRW, @"「お付き合いさせて頂くのは申し訳ないです…」"
				CALL PRINT_STRW, @"「けどお気持ちはとても嬉しいですよ、改めて有がとうございます♪」"
				CALL SET_CEVENT, "告白失敗_米娅_2"
			ELSEIF CEVENT("告白失敗_米娅_3") == 0
				CALL PRINT_STRW, @"「えっ…？ あ、有がとうございます！」"
				CALL PRINT_STRW, @"「%CNAME("二人称")%は本当に情熱的なお方ですね！」"
				CALL PRINT_STRW, @"「けどゴメンなさい！ 米娅にはその情熱についていけないかもです…」"
				CALL PRINT_STRW, @"「だから気持ちだけ受け取りますね★」"
				PRINTL
				CALL PRINT_STRW, @"「（ちょっと…この前せっかく傷つかないように断ったのに…）」"
				CALL PRINT_STRW, @"「（まだ告白してくるの？？ ちょっとしつこいなぁ）」"
				CALL SET_CEVENT, "告白失敗_米娅_3"
				PRINTL
				CALL PRINT_STRW, @"好感度が25下がりました"
				CFLAG:好感度 -= 25
			ELSEIF CEVENT("告白失敗_米娅_4") == 0
				CALL PRINT_STRW, @"「え…、あ、有がとうございます…」"
				CALL PRINT_STRW, @"「あ、あの～…%CNAME("二人称")%…」"
				PRINTL
				CALL PRINT_STRW, @"「米娅の事を想ってくれるのは本当に嬉しいんですけど～…」"
				CALL PRINT_STRW, @"「お付き合いするのは…ちょっと難しいといいますか…」"
				PRINTL
				CALL PRINT_STRW, @"「ほら、サキュバスは一人の殿方だけと付き合うのは大変なんですよ～…」"
				CALL PRINT_STRW, @"「だからゴメンなさい！★」"
				PRINTL
				CALL PRINT_STRW, @"「（うわ…また告白してきた…これで4回目だよね？）」"
				CALL PRINT_STRW, @"「（さすがにしつこいんだけど…っていうかいい加減にウザイ…）」"
				CALL SET_CEVENT, "告白失敗_米娅_4"
				PRINTL
				CALL PRINT_STRW, @"好感度が50下がりました"
				CFLAG:好感度 -= 50
			ELSEIF CEVENT("告白失敗_米娅_5") == 0
				CALL PRINT_STRW, @"「えっ？…え、え～と%CNAME("二人称")%ぁ…」"
				CALL PRINT_STRW, @"「そろそろ…察してほしいなぁ～…と言いますか～」"
				CALL PRINT_STRW, @"「あははっ…ゴメンなさい！」"
				PRINTL
				CALL PRINT_STRW, @"「（いやいや、これで5回目なんだけど！？）」"
				CALL PRINT_STRW, @"「（しつこすぎ！ 信じられない！ キモイ！）」"
				CALL SET_CEVENT, "告白失敗_米娅_5"
				PRINTL
				CALL PRINT_STRW, @"好感度が75下がりました"
				CFLAG:好感度 -= 75
			ELSEIF CEVENT("告白失敗_米娅_6") == 0
				CALL PRINT_STRW, @"「ごめんなさい%CNAME("二人称")%、お付き合いするのは難しいです」"
				PRINTL
				CALL PRINT_STRW, @"「…いや、もう言っちゃいますね…？」"
				CALL PRINT_STRW, @"「お付き合いが【難しい】っていうのは【無理】という意味ですよ」"
				CALL PRINT_STRW, @"「これが米娅の気持ちと答えです、ごめんなさい」"
				PRINTL
				CALL PRINT_STRW, @"「（んもーー！！ そんな雰囲気变成了からまさかと思ったけどやっぱり！！）」"
				CALL PRINT_STRW, @"「（この人ってこんなキモイ人だったの！？）」"
				CALL SET_CEVENT, "告白失敗_米娅_6"
				PRINTL
				CALL PRINT_STRW, @"好感度下降了100"
				CFLAG:好感度 -= 100
			ELSEIF CEVENT("告白失敗_米娅_7") == 0
				CALL PRINT_STRW, @"「うわぁ…またですか…また懲りずに告白ですか%CNAME("二人称")%…」"
				CALL PRINT_STRW, @"「何度も何度も申し上げますがお付き合いするのは不行」"
				CALL PRINT_STRW, @"「ワンチャンとかダメ元とか考えないで下さい」"
				CALL PRINT_STRW, @"「ハッキリ言って迷惑ですよ」"
				PRINTL
				CALL PRINT_STRW, @"「（はぁ～…マジでウザイ…キモイ…マジでなんなのこの人…）」"
				CALL PRINT_STRW, @"「（無限の精を持ってるのに勿体無い…性格がマジ無理…）」"
				CALL PRINT_STRW, @"「（よし…これからただのサプリとして扱おう…）」"
				CALL PRINT_STRW, @"「（無料で栄養とれるって考えたらまだ得でしょ…）」"
				CALL SET_CEVENT, "告白失敗_米娅_7"
				PRINTL
				CALL PRINT_STRW, @"好感度が150下がりました"
				CFLAG:好感度 -= 150
			ELSEIF CEVENT("告白失敗_米娅_8") == 0
				CALL PRINT_STRW, @"「はぁ～…マジでウザイ…キモイ…マジでなんなのこの人…」"
				CALL PRINT_STRW, @"「無限の精を持ってるのに勿体無い…性格がマジ無理…」"
				CALL PRINT_STRW, @"「これからディルドとして扱おう…」"
				CALL PRINT_STRW, @"「生の精液が搾れる超高性能ディルドって思ったらまだまだ得でしょ」"
				PRINTL
				CALL PRINT_STRW, @"「…えっ？ 考えが口から漏れてるですって？」"
				CALL PRINT_STRW, @"「………マジ？……米娅全部言っちゃってました？」"
				CALL PRINT_STRW, @"「……」"
				CALL PRINT_STRW, @"「というわけでそれが答えでーす！★」"
				CALL SET_CEVENT, "告白失敗_米娅_8"
				PRINTL
				CALL PRINT_STRW, @"好感度が200下がりました"
				CFLAG:好感度 -= 200
			ELSEIF CEVENT("告白失敗_米娅_9") == 0
				CALL PRINT_STRW, @"「是是有がとうございますステキな告白ですねー」"
				CALL PRINT_STRW, @"「ごめんなさい米娅は無理でーす」"
				CALL PRINT_STRW, @"「他の素敵な女性を探してくださーい」"
				CALL PRINT_STRW, @"「あとキモイからもう告って来ないでくださーい」"
				CALL SET_CEVENT, "告白失敗_米娅_9"
				PRINTL
				CALL PRINT_STRW, @"好感度下降了250"
				CFLAG:好感度 -= 250
			ELSEIF CEVENT("告白失敗_米娅_10") == 0
				CALL PRINT_STRW, @"「はぁ～～……%CNAME("二人称")%……」"
				CALL PRINT_STRW, @"「…いい加減にしてください……」"
				PRINTL
				CALL PRINT_STRW, @"「これで10回目ですよ！？ 10回目！！」"
				PRINTL
				CALL PRINT_STRW, @"「どんだけ諦めが悪いんですか%CNAME("二人称")%は！？」"
				CALL PRINT_STRW, @"「ハッキリ言います！ しつこいです！」"
				PRINTL
				CALL PRINT_STRW, @"「お付き合いはできません！」"
				CALL PRINT_STRW, @"「で・き・ま・せ・ん！！」"
				CALL SET_CEVENT, "告白失敗_米娅_10"
				PRINTL
				CALL PRINT_STRW, @"好感度が300下がりました"
				CFLAG:好感度 -= 300
			ELSEIF CEVENT("告白失敗_米娅_11") == 0
				CALL PRINT_STRW, @"「ねぇ%CNAME("二人称")%もういい加減に諦めて下さいよ～」"
				CALL PRINT_STRW, @"「いいじゃないですか炮友のままで～」"
				PRINTL
				CALL PRINT_STRW, @"「別に恋人にならなくても米娅とは好きなだけえっち出来るんですよ～？」"
				CALL PRINT_STRW, @"「口交も手交も肛門ファックもヤラせてあげてるじゃないですか～」"
				PRINTL
				CALL PRINT_STRW, @"「しかも全部タダですよタダ～？」"
				CALL PRINT_STRW, @"「米娅は精を搾れて%CNAME("二人称")%はスッキリしてWin-Winの関係じゃないですか～」"
				PRINTL
				CALL PRINT_STRW, @"「お互いに何も不満ないじゃないですか～」"
				CALL PRINT_STRW, @"「だからもうその告白攻撃やめませ～ん？」"
				PRINTL
				CALL PRINT_STRW, @"「…えっ？…恋人として君を抱きたい？」"
				PRINTL
				CALL PRINT_STRW, @"「はぁ～…ウザッ……」"
				CALL PRINT_STRW, @"「マジでめんどくさっ……」"
				CALL SET_CEVENT, "告白失敗_米娅_11"
				PRINTL
				CALL PRINT_STRW, @"好感度が350下がりました"
				CFLAG:好感度 -= 350
			ELSEIF  CEVENT("告白失敗_米娅_12") == 0
				CALL PRINT_STRW, @"「んもぉーー～～！！ うざーーい！！」"
				CALL PRINT_STRW, @"「ウザイ！ しつこい！ キモイ！」"
				PRINTL
				CALL PRINT_STRW, @"「なんなんですか%CNAME("二人称")%は！？ いつまで告ってくるんですか！？」"
				PRINTL
				CALL PRINT_STRW, @"「告白して断られるのが快感になってるんですか！？ そういうフェチですか！？」"
				PRINTL
				CALL PRINT_STRW, @"「もし次に告白してきたら干乾びるまで搾りますねっ！！」"
				CALL SET_CEVENT, "告白失敗_米娅_12"
				PRINTL
				CALL PRINT_STRW, @"好感度が400下がりました"
				CFLAG:好感度 -= 400
			ELSEIF  CEVENT("告白失敗_米娅_13") == 0
				CALL PRINT_STRW, @"「是、けって～い♪ 今晩の%CNAME("二人称")%の運命は決まりました～♪」"
				PRINTL
				CALL PRINT_STRW, @"「全部何もかも徹底的に强行搾りまーす♪」"
				CALL PRINT_STRW, @"「%CNAME("阴茎")%がもげても、%CNAME("睾丸")%が潰れても知りませーん♪」"
				PRINTL
				CALL PRINT_STRW, @"「告白ストーカー糞キモ野郎の%CNAME("二人称")%にはピッタリのお仕置きでーす_HH_」"
				PRINTL
				CALL PRINT_STRW, @"米娅は指をポキポキ鳴らし的同时、笑着ない笑顔で貴方を睨みつけている"
				CALL SET_CEVENT, "告白失敗_米娅_13"
				PRINTL
				CALL PRINT_STRW, @"好感度が450下がりました"
				CFLAG:好感度 -= 450
			ELSEIF  CEVENT("告白失敗_米娅_14") == 0
				CALL PRINT_STRW, @"「ふん、ふふ～ん♪ ふっふふ～ん♪」"
				PRINTL
				CALL PRINT_STR, @"（ジィー…カチャッカチャッ…）"
				PRINTL
				CALL PRINT_STRW, @"貴方に告白された直後、米娅は貴方の休闲褲に手をかけ、おもむろに睾丸を取り出した"
				PRINTL
				CALL PRINT_STRW, @"「ごめんなさい%CNAME("二人称")%、さっき何て仰ったか聞いてませんでした～」"
				CALL PRINT_STRW, @"「もう一回仰って頂いてよろしいですか～？」"
				PRINTL
				CALL PRINT_STRW, @"貴方は困惑したままもう一度告白の言葉を放った"
				CALL PRINT_STRW, @"すると米娅は貴方の両睾丸を手に持ち…"
				PRINTL
				CALL PRINT_STR, @"（キュッ…）"
				PRINTL
				CALL PRINT_STRW, @"「い…」"
				PRINTL
				CALL PRINT_STR, @"（ギュッ…）"
				PRINTL
				CALL PRINT_STRW, @"「や…」"
				PRINTL
				CALL PRINT_STR, @"（ギュゥウウウッ！）"
				PRINTL
				CALL PRINT_STRW, @"「でーす_HH__HH_」"
				PRINTL
				CALL PRINT_STRW, @"米娅は断りの言葉に合わせて、貴方の睾丸を強烈に握り締めた"
				CALL PRINT_STRW, @"貴方は何故そんなことをしているのかと問うと…"
				PRINTL
				CALL PRINT_STRW, @"「ん～～？ だって%CNAME("二人称")%が人类の言葉を理解出来ないワン酱だからですよ～？」"
				CALL PRINT_STRW, @"「だからこうやって～」"
				PRINTL
				CALL PRINT_STR, @"（ギュゥウウウッ！）"
				PRINTL
				CALL PRINT_STRW, @"「米娅が嫌がってるという事を身体で教えてあげてるんですよ～？」"
				CALL PRINT_STRW, @"再び強く握り締めた直後…"
				PRINTL
				CALL PRINT_STR, @"（コリュンッ！ コリコリッ…コリュンッ！）"
				PRINTL
				CALL PRINT_STRW, @"「こうやってしっかり苦痛を与えて…」"
				CALL PRINT_STRW, @"両睾丸を擦り合わせられ…"
				PRINTL
				CALL PRINT_STR, @"（ギューーーーッ！！）"
				PRINTL
				CALL PRINT_STRW, @"「身体に刷り込んでるんですよ～？」"
				CALL PRINT_STRW, @"千切れそうになるくらい思いっきり引っ張られる…"
				PRINTL
				CALL PRINT_STRW, @"「こうしたら流石に%CNAME("二人称")%でも覚えるかな～っと思って♪」"
				CALL PRINT_STRW, @"「だってワン酱だって覚えられるんですよ～？」"
				CALL PRINT_STRW, @"「まぁ%CNAME("二人称")%の知能が犬以下なら困っちゃいますけどね～_HH_」"
				PRINTL
				CALL PRINT_STR, @"（ぱっ…）"
				PRINTL
				CALL PRINT_STRW, @"拷問のような睾丸責めから解放され、貴方は思わず膝から崩れ落ちた"
				PRINTL
				CALL PRINT_STR, @"（吡啾…）"
				PRINTL
				CALL PRINT_STRW, @"「んふふ……」"
				CALL PRINT_STRW, @"直後、米娅は貴方の頬に悄悄的温柔的両手を添えた"
				PRINTL
				CALL PRINT_STRW, @"「%CNAME("二人称")%……」"
				CALL PRINT_STRW, @"ふと目を上げると、血で染まったルビーのような深紅の両目が貴方を見下していた"
				CALL PRINT_STRW, @"非力で小小的手に添えられてるだけにも関わらず、貴方は万力に掴まれたが如く顔を動かせなかった"
				PRINTL
				;特定表情の颜绘を表示
				CALL EMOTION_PLUS, "空洞/黒目/斜眼４/斜眉/ヮ"
				CALL PRINT_STRW, @"「いい加減にして下さいね…_HH_」"
				PRINTL
				CALL PRINT_STRW, @"有無を言わせぬ米娅の迫力に、貴方は大人しく命に従った"
				PRINTL
				;特定表情の颜绘を表示
				CALL EMOTION_PLUS, "空洞/笑颜/斜眉/楕円"
				CALL PRINT_STRW, @"「是、よろしい♪」"
				PRINTL
				CALL PRINT_STRW, @"手を離した後、いつも街道の米娅に戻ったように見えるが…"
				CALL PRINT_STRW, @"この一件で米娅に相当嫌われたようだ"
				CALL SET_CEVENT, "告白失敗_米娅_14"
				PRINTL
				CALL PRINT_STRW, @"好感度降低了500"
				CFLAG:好感度 -= 500
			ELSE
				SELECTCASE RAND:2
					CASE 0
						SELECTCASE RAND:4
							CASE 0
								CALL PRINT_STRW, @"「%TEXTR("な～んか犬の鳴き声がしますね～/ワン酱が吠えてるって思う事にしよ～っと")%♪」"
							CASE 1
								CALL PRINT_STRW, @"「ん？ 今何か%TEXTR("喋りましたか？/言いましたか？")%」"
								CALL PRINT_STRW, @"「クソキモ告白変態ストーカー野郎桑？」"
							CASE 2
								CALL PRINT_STRW, @"「是、米娅も好きでした！ 付き合いましょう！_HH_」"
								CALL PRINT_STRW, @"「……」"
								CALL PRINT_STRW, @"「あっ５秒経ちましたけどこの関係続けるのは無理そうですね～」"
								CALL PRINT_STRW, @"「別れましょ！ サヨナラ～♪」"
							CASE 3
								CALL PRINT_STRW, @"「さてさて…【ストーカー被害、%TEXTR("訴訟/警察/弁護士")%】で検索と…」"
						ENDSELECT
					CASE 1
						CALL PRINT_STRW, @"米娅は誰かに電話をかけた"
						PRINTL
						CALL PRINT_STRW, @"「あっ、もしもし？ 米娅です！ お久しぶりです！」"
						CALL PRINT_STRW, @"「この前の%TEXTR("约会はとっても楽しかったですね/夜はとっても素敵でしたね/西式料理店とっても美味しかったですね/情人旅館は盛り上がりましたね")%～_HH_」"
						CALL PRINT_STRW, @"「すみません突然電話して！ あの…相談が有まして…」"
						PRINTL
						CALL PRINT_STRW, @"「実はストーカー被害を受けてるんです………是、%TEXTR("今まさに/現在進行形で")%……」"
						CALL PRINT_STRW, @"「お願いです！ ソイツを懲らしめて！ 助けてください！」"
						SELECTCASE RAND:7
							CASE 0
								CALL PRINT_STRW, @"「ボディビルダーの貴方様の筋肉でぶっとばして欲しいんです！」"
								CALL PRINT_STRW, @"「……」"
								CALL PRINT_STRW, @"「……はぁ？ 【ついでにソイツを%TEXTR("掘っちまって/食っちまって")%もいいか】ですって？」"
								CALL PRINT_STRW, @"「え？ まさかホモだったんですか？ えっ！？ 米娅は練習台だった！？」"
								;特定表情の颜绘を表示
								CALL EMOTION_PLUS, "目陰/斜眉/对话框・・・"
								CALL PRINT_STRW, @"「……%TEXTR("ま～じまんじ/ガチで")%？」"
							CASE 1
								CALL PRINT_STRW, @"「弁護士の貴方様から訴訟して欲しいんです！」"
								CALL PRINT_STRW, @"「…え？ 示談した方がいい？ なぜですか？」"
								CALL PRINT_STRW, @"「………」"
								CALL PRINT_STRW, @"「…えっ！？ 相場的にそんな貰えるんですか！？」"
								;特定表情の颜绘を表示
								CALL EMOTION_PLUS, "目陰/斜眉/对话框・・・"
								CALL PRINT_STRW, @"「あの、あとで詳しく聞いてもよろしいでしょうか？」"
							CASE 2
								CALL PRINT_STRW, @"「男もイケちゃうバイの貴方様にヤッちゃって欲しいんです！」"
								CALL PRINT_STRW, @"「逆に喜んだらヤバイですけど！」"
							CASE 3
								CALL PRINT_STRW, @"「大企業社長である貴方様に色々擅長い事やっちゃって欲しいんです！」"
								PRINTL
								CALL PRINT_STRW, @"「え？ 早速弁護士を手配した？ あ、有がとうございます！」"
								CALL PRINT_STRW, @"「…え？ ボディ守備も手配した…？ 避難用ホテルも取った…？」"
								CALL PRINT_STRW, @"「是！？ しかも全部海外！？ え！？ 航空券も取った！？」"
								PRINTL
								CALL PRINT_STRW, @"「待って待って！ 超待ってください！ 話が進みすぎですっ！」"
							CASE 4
								CALL PRINT_STRW, @"「格闘家の貴方様からボコボコにして欲しいんです！」"
								CALL PRINT_STRW, @"「%TEXTR("昇〇拳/バンディットリ〇ルバー/〇獄殺")%決めて欲しいんです！」"
							CASE 5
								CALL PRINT_STRW, @"「警察の貴方様に捕まえて欲しいんです！」"
								CALL PRINT_STRW, @"「え？ 明日から張込む？ 有がとうございます！」"
							CASE 6
								CALL PRINT_STRW, @"「ヤクザの貴方様に始末をお願いしたいんです！」"
								CALL PRINT_STRW, @"「え？ 【やってもいいがお嬢酱も覚悟しとけ】ですって？」"
								CALL PRINT_STRW, @"「……」"
								CALL PRINT_STRW, @"「ゴメンなさ～い！★ 冗談でーす！♪ あはは、ビッ阴蒂しましたぁ？」"
								CALL PRINT_STRW, @"「やだな～、お声を聞きたかっただけですよ～_HH_」"
								CALL PRINT_STRW, @"「また今度一杯えっちしましょね～_HH_」"
								CALL PRINT_STRW, @"「愛してますよ！_HH_ では失礼しまーす！_HH_」"
								PRINTL
								CALL PRINT_STRW, @"「…………」"
								PRINTL
								CALL PRINT_STRW, @"「…やっべぇ……やっべぇわぁ………怖かったわぁ……」"
						ENDSELECT
				ENDSELECT
				PRINTL
				CALL PRINT_STRW, @"好感度が50下がりました"
				CFLAG:好感度 -= 50
			ENDIF
		ENDIF
	ENDIF
;胖次のお願いした時に相手が没穿内褲だった
CASE "没穿内褲"
	;胖次交易で没穿内褲済
	IF COND("合意：胖次交易")
		IF ABL:受虐属性 >= 5 && ABL:露出癖 >= 5
			CALL PRINT_STRW, @"「え？ 米娅は%CNAME("二人称")%の%TEXTR("命令/お願い")%で今没穿内褲ですよ？」"
			CALL PRINT_STRW, @"「んもぉ～%CNAME("二人称")%ったら忘れちゃいましたかぁ？♪」"
			PRINTL
			CALL PRINT_STRW, @"貴方は確かめさせる為、裙をめくって尻を見せろと命令した"
			PRINTL
			CALL PRINT_STRW, @"「えぇ～？ 酱と%TEXTR("没穿内褲です/履いてません")%よ、ほらぁ_HH_」"
			PRINTL
			CALL PRINT_STR, @"（はらり…）"
			PRINTL
			CALL PRINT_STRW, @"米娅は貴方に言われるがまま、%TEXTR("若々しい/柔らかい/すべすべの")%桃尻を露わにした"
			PRINTL
			CALL PRINT_STRW, @"「ね？ 酱と没穿内褲でしょ～？ %TEXTR("従順な/酱と命令を守ってる")%米娅を褒めて下さいよ～_HH_」"
			PRINTL
			IF FLAG:二人きり
				CALL PRINT_STRW, @"それでも満足しない貴方は、自己尻肉を開いて肛門を見せろと命令した"
				PRINTL
				CALL PRINT_STRW, @"「えぇ！？_／／／_ い、今ここでですか…？_／／／_」"
				;肛塞有
				IF TALENT:常時Ａ肛塞 >= 1
					CALL PRINT_STRW, @"貴方は米娅の肛塞を無遠慮に引き抜いた"
					PRINTL
					CALL PRINT_STR, @"（ぬぽんっ…！）"
					PRINTL
					CALL PRINT_STRW, @"「%TEXTR("うひゃあ/きゃあ/んひゃあ/わひゃあ")%っ…！？_HH_」"
					PRINTL
				;肛塞無
				ELSE
					PRINTL
				ENDIF
				CALL PRINT_STRW, @"そして貴方は米娅の尻の眼前にしゃがみこみ、早くしろと命じた"
				PRINTL
				CALL PRINT_STRW, @"「…えっ！？ あぅ…_／／／_ は、是ぃ…_／／／_」"
				PRINTL
				CALL PRINT_STR, @"（噗哩…）"
				PRINTL
				CALL PRINT_STRW, @"「…っー～_／／／__／／／_」"
				PRINTL
				CALL PRINT_STRW, @"暴露了出来%CNAME("肛門_地文")%から、生暖かく濃厚的甜香りが漂う"
				CALL PRINT_STRW, @"潤滑液のようにぬらりと光る腸液が肛門回りにべったりと付いている"
				PRINTL
				CALL PRINT_STRW, @"「…あ、あのっ…_／／／_ ど、どうでしょうか…_／／／_」"
				PRINTL
				SELECTCASE RAND:2
					CASE 0
						CALL PRINT_STRW, @"この変態がと言い放ち、お仕置きとばかりに%CNAME("肛門_地文")%を貪った"
						PRINTL
						CALL PRINT_STR, @"（%TEXTR("にゅるん/にゅぷぅ")%っ…！ じゅぽ、じゅぞぞぞっ…！）"
						PRINTL
					CASE 1
						CALL PRINT_STRW, @"この変態がと言い放ち、お仕置きとばかりに%CNAME("肛門_地文")%をかき回した"
						PRINTL
						CALL PRINT_STR, @"（%TEXTR("ずぷぅ/にゅぷぅ/ぬぷぅ")%っ…！ じゅぷっ！ ぐちゅぐちゅっ…！）"
						PRINTL
				ENDSELECT
				CALL PRINT_STRW, @"「%TEXTR("あはぁん/んほぉお/くぅうん/くっはぁ/かっはぁ/んっはぁ")%っ！？_HH_ は、是！ 米娅興奮してましたぁ！_HH_」"
				CALL PRINT_STRW, @"「没穿内褲で興奮ちゃうっ、%TEXTR("えっちな女の子/へんたい")%でごめんなさいぃっ…！_HH__／／／_」"
			ELSE
				CALL PRINT_STRW, @"貴方は調子に乗るなと言い放ち、米娅の尻をピシャリと叩いた"
				PRINTL
				CALL PRINT_STR, @"（%TEXTR("スパァン/パチィン/バシン")%ッ！）"
				PRINTL
				CALL PRINT_STRW, @"「%TEXTR("あはぁん/んほぉお/くぅうん/くっはぁ/かっはぁ/んっはぁ")%！？_HH_ あっ、%TEXTR("あふん/おふ/んん")%っ…_HH_」"
				CALL PRINT_STRW, @"「…%TEXTR("す、すみませんでした/ご、ごめんなさい/あ、有がとうございます/ご、ご褒美ですぅ")%っ…_HH_」"
			ENDIF
		ELSEIF ABL:受虐属性 >= 3 && ABL:露出癖 >= 3
			CALL PRINT_STRW, @"「是？ 米娅は%CNAME("二人称")%の命令で今没穿内褲なんですけど…？」"
			CALL PRINT_STRW, @"「もしかして忘れてました？ じゃあもう今日から胖次履きますからね？」"
			PRINTL
			CALL PRINT_STRW, @"「まったく！ 最初からこんな命令なんてしなければいいのに！」"
			PRINTL
			IF FLAG:二人きり
				CALL PRINT_STRW, @"米娅は貴方に悪態をつくが、どこかワザとらしさを感じた貴方は…"
				PRINTL
				CALL PRINT_STR, @"（ガバッ！）"
				PRINTL
				CALL PRINT_STRW, @"「%TEXTR("わぁ/きゃあ/わわ/うひゃあ/ひゃあ")%っ！？ な、なになni↘！？」"
				PRINTL
				;肛塞有
				IF TALENT:常時Ａ肛塞 >= 1
					CALL PRINT_STRW, @"貴方は米娅が逃げられないように从后面将腰を掴み、就这様肛塞を引き抜いた"
					PRINTL
					CALL PRINT_STR, @"（ぬぽんっ…！）"
					PRINTL
					CALL PRINT_STRW, @"「%TEXTR("んんん/んくぅ/んんぁ")%っ…！？_HH_」"
					PRINTL
					CALL PRINT_STRW, @"直後、健康的なサーモン粉紅の%TEXTR("直腸/腸壁")%が露わとなった"
					CALL PRINT_STRW, @"隅々まで腸液が行き渡り、ヌラりと潤滑液のような光沢と甜香りを放っている"
					PRINTL
					CALL PRINT_STRW, @"「あふっ…！_HH_ ちょ、%CNAME("二人称")%っ…い、今見ないでっ…！_／／／_」"
					PRINTL
					CALL PRINT_STRW, @"没穿内褲で興奮する%TEXTR("変態/変態女/露出狂/受虐狂女")%めと言い放ち、"
					SELECTCASE RAND:4
						CASE 0
							CALL PRINT_STRW, @"就这様%TEXTR("ぽっかり/ぱっくり")%空いた米娅の%CNAME("肛門_地文")%にしゃぶりついた"
							PRINTL
							CALL PRINT_STR, @"（%TEXTR("じゅるる/じゅぞぞ/じゅずるる")%っ…！）"
							PRINTL
						CASE 1
							CALL PRINT_STRW, @"就这様%TEXTR("ぽっかり/ぱっくり")%空いた米娅の%CNAME("肛門_地文")%に息を吹き込んだ"
							PRINTL
							CALL PRINT_STR, @"（フゥゥーーー…）"
							PRINTL
						CASE 2
							CALL PRINT_STRW, @"就这様%TEXTR("ぽっかり/ぱっくり")%空いた米娅の%CNAME("肛門_地文")%をひと舐めした"
							PRINTL
							CALL PRINT_STR, @"（%TEXTR("ぬ酱/えろん/ぺろり")%っ…）"
							PRINTL
						CASE 3
							CALL PRINT_STRW, @"就这様%TEXTR("ぽっかり/ぱっくり")%空いた米娅の%CNAME("肛門_地文")%に舌を突っ込んだ"
							PRINTL
							CALL PRINT_STR, @"（%TEXTR("にゅるん/にゅぷぅ")%っ…）"
							PRINTL
					ENDSELECT
					SELECTCASE RAND:2
						CASE 0
							CALL PRINT_STRW, @"「%TEXTR("うひゃあ/きゃあ/んひゃあ/わひゃあ")%！？_HH_ ううぅっ…！_／／／_ %TEXTR("変態/へんたい")%なのは%CNAME("二人称")%ですぅーー！！_／／／_」"
						CASE 1
							CALL PRINT_STRW, @"「%TEXTR("うひゃあ/きゃあ/んひゃあ/わひゃあ")%！？_HH_ ううぅっ…！_／／／_ %CNAME("二人称")%の%TEXTR("鬼畜っ/きちくーー")%！！_／／／_」"
					ENDSELECT
				;肛塞無
				ELSE
					SELECTCASE RAND:2
						CASE 0
							CALL PRINT_STRW, @"貴方は米娅が逃げられないように抱きしめ、就这様彼女の%CNAME("肛門_地文")%を触った"
							PRINTL
							CALL PRINT_STR, @"（%TEXTR("にちゃ/ぬちゃ/にちゅ/ぬちゅ")%っ…）"
							PRINTL
							CALL PRINT_STRW, @"「…っ！！_／／／_」"
							PRINTL
							SELECTCASE RAND:3
								CASE 0
									CALL PRINT_STRW, @"米娅の%CNAME("肛門_地文")%は既に腸液で湿的ていた"
									CALL PRINT_STRW, @"そこに貴方は追撃とばかりに、指を突っ込んで肛門を開いた"
									PRINTL
									CALL PRINT_STR, @"（%TEXTR("くぱぁ/くっぱぁ")%っ…！）"
									PRINTL
									CALL PRINT_STRW, @"「%TEXTR("んぉおお/おぉぉ/んぁああ/おほぉ")%！？_HH_」"
									PRINTL
									CALL PRINT_STR, @"（%TEXTR("ぼとり/ぼと")%っ…）"
									PRINTL
									CALL PRINT_STRW, @"「…っー～！！_／／／__／／／_」"
									CALL PRINT_STRW, @"没穿内褲の興奮で%CNAME("直腸_地文")%に固まった果凍状腸液が、肛門から糸を引きながら床に落ちた"
								CASE 1
									CALL PRINT_STRW, @"米娅の%CNAME("肛門_地文")%は既に腸液で湿的ていた"
									CALL PRINT_STRW, @"そこに貴方は追撃とばかりに、中心に沿って肛門を引っかいた"
									PRINTL
									CALL PRINT_STR, @"（咔哩咔哩咔哩…）"
									PRINTL
									CALL PRINT_STRW, @"「%TEXTR("うひゃあ/きゃあ/んひゃあ/わひゃあ")%っ…！？_HH_」"
									PRINTL
									CALL PRINT_STR, @"（%TEXTR("ぶしゅっ/ぶぴっ/ブシュッ/ブピッ")%…！）"
									PRINTL
									CALL PRINT_STRW, @"「…っー～！！_／／／__／／／_」"
									CALL PRINT_STRW, @"没穿内褲の興奮で%CNAME("直腸_地文")%に溜まった腸液が、勢い良く肛門から噴出した"
								CASE 2
									CALL PRINT_STRW, @"米娅の%CNAME("肛門_地文")%は既に腸液で湿的ていた"
									CALL PRINT_STRW, @"そこに貴方は追撃とばかりに、指を突っ込んで肛門を開いた"
									PRINTL
									CALL PRINT_STR, @"（%TEXTR("くぱぁ/くっぱぁ")%っ…！）"
									PRINTL
									CALL PRINT_STRW, @"「%TEXTR("んぉおお/おぉぉ/んぁああ/おほぉ")%！？_HH_」"
									PRINTL
									CALL PRINT_STR, @"（%TEXTR("ぶぼぉっ/ブボォッ")%…！ %TEXTR("ぶびっ/ブビッ")%…！）"
									PRINTL
									CALL PRINT_STRW, @"「…っー～！！_／／／__／／／_」"
									CALL PRINT_STRW, @"没穿内褲の興奮で%CNAME("直腸_地文")%に溜まった濃厚的ガスが、勢い良く肛門から被释放进"
							ENDSELECT
							PRINTL
							SELECTCASE RAND:2
								CASE 0
									CALL PRINT_STRW, @"「%TEXTR("う/あ")%、うぅ…！_／／／_ %TEXTR("胖次履いてないの/没穿内褲は")%関係有ませんからっ…！_／／／_」"
								CASE 1
									CALL PRINT_STRW, @"「%TEXTR("う/あ")%、うぅ…！_／／／_ %CNAME("二人称")%のばかぁっ…！_／／／_」"
							ENDSELECT
						CASE 1
							CALL PRINT_STRW, @"貴方は米娅が逃げられないように从后面将腰を掴み、就这様彼女の尻肉をかき分けた"
							PRINTL
							CALL PRINT_STR, @"（%TEXTR("にちゃ/ぬちゃ/にちゅ/ぬちゅ")%っ…）"
							PRINTL
							CALL PRINT_STRW, @"「…っ！！_／／／_」"
							PRINTL
							CALL PRINT_STRW, @"没穿内褲で興奮していたのか、米娅の%CNAME("肛門_地文")%は既に腸液で湿的ていた"
							CALL PRINT_STRW, @"貴方はこれはどういう事だと坏心眼に米娅へ問いかける"
							PRINTL
							CALL PRINT_STRW, @"「う、うるさいです！_／／／_ そんなの事によりいきなり何してるんですか%CNAME("二人称")%っ…！」"
							CALL PRINT_STRW, @"「いくら米娅でも行き過ぎた性騷擾は許しませっ…」"
							SELECTCASE RAND:4
								CASE 0
									PRINTL
									CALL PRINT_STR, @"（%TEXTR("にゅるん/にゅぷぅ")%っ…）"
									PRINTL
									CALL PRINT_STRW, @"「%TEXTR("うひゃあ/きゃあ/んひゃあ/わひゃあ")%っ！？」"
									PRINTL
									CALL PRINT_STRW, @"貴方は米娅の%CNAME("肛門_地文")%に舌を差し込んだ"
									CALL PRINT_STRW, @"そして米娅をからかうように、就这様%CNAME("直腸_地文")%を舐め回した"
								CASE 1
									PRINTL
									CALL PRINT_STR, @"（%TEXTR("ずぷぅ/にゅぷぅ/ぬぷぅ")%っ…）"
									PRINTL
									CALL PRINT_STRW, @"「%TEXTR("うひゃあ/きゃあ/んひゃあ/わひゃあ")%っ！？」"
									PRINTL
									CALL PRINT_STRW, @"貴方は米娅の%CNAME("肛門_地文")%に指を差し込んだ"
									CALL PRINT_STRW, @"そして米娅をからかうように、就这様%CNAME("直腸_地文")%をかき回した"
								CASE 2
									PRINTL
									CALL PRINT_STR, @"（%TEXTR("じゅるる/じゅぞぞ/じゅずるる")%っ…！）"
									PRINTL
									CALL PRINT_STRW, @"「%TEXTR("うひゃあ/きゃあ/んひゃあ/わひゃあ")%っ！？」"
									PRINTL
									CALL PRINT_STRW, @"貴方は米娅の%CNAME("肛門_地文")%から漏れ出た腸液を吸い上げた"
									CALL PRINT_STRW, @"就这様口を密着させ、%CNAME("直腸_地文")%に溜まった腸液を吸い込んだ"
								CASE 3
									PRINTL
									CALL PRINT_STR, @"（%TEXTR("くぱぁ/くっぱぁ")%っ…！）"
									PRINTL
									CALL PRINT_STRW, @"「%TEXTR("うひゃあ/きゃあ/んひゃあ/わひゃあ")%っ！？」"
									PRINTL
									CALL PRINT_STRW, @"貴方は両指を差し込み、就这様米娅の%CNAME("肛門_地文")%を開いた"
									PRINTL
									CALL PRINT_STR, @"（%TEXTR("ぽたた/ぼたた")%っ…）"
									PRINTL
									CALL PRINT_STRW, @"「…っー～！！_／／／__／／／_」"
									CALL PRINT_STRW, @"%CNAME("直腸_地文")%に溜まった大量の腸液が%CNAME("肛門_地文")%から漏れ出てくる"
									CALL PRINT_STRW, @"ぽっかり開いた米娅の%CNAME("肛門_地文")%に、貴方はからかうように息を吹き込んだ"
							ENDSELECT
							CALL PRINT_STRW, @"「%TEXTR("あはぁん/んほぉお/くぅうん/くっはぁ/かっはぁ/んっはぁ")%っ！_HH_ %TEXTR("んぅ/んん/んくぅ")%っ…！_HH_ 是そうですっ…そうですよっ…！_／／／_」"
							CALL PRINT_STRW, @"「米娅は没穿内褲で興奮してましたっ…！_／／／_ これで満足ですかっ…！？_／／／_」"
					ENDSELECT
				ENDIF
			ELSE
				CALL PRINT_STRW, @"米娅は貴方に悪態をつくが、米娅の顔が紅潮している事を貴方は見逃さなかった"
			ENDIF
		ELSE
			CALL PRINT_STRW, @"「…%TEXTR("あ/いや")%、あの……」"
			CALL PRINT_STRW, @"「%CNAME("二人称")%の%TEXTR("命令/お願い")%で%TEXTR("没穿内褲な/胖次履いてない")%んですけど…」"
			SELECTCASE RAND:2
				CASE 0
					CALL PRINT_STRW, @"「自分がしといた没穿内褲命令くらい覚えて欲しいんですけど…」"
				CASE 1
					CALL PRINT_STRW, @"「まさか米娅に%TEXTR("命令/お願い")%した事忘れてましたか…？」"
			ENDSELECT
		ENDIF
	;米娅が最初から没穿内褲
	ELSE
		IF ABL:受虐属性 >= 5 && ABL:露出癖 >= 5
			CALL PRINT_STRW, @"「えぇ～？ %CNAME("二人称")%米娅の胖次が欲しいのぉ～？」"
			CALL PRINT_STRW, @"「んふふ、残念ですが今日は不行…_／／／_」"
			PRINTL
			CALL PRINT_STRW, @"米娅は红着脸後ろを向き、内股をモジモジさせている…"
			CALL PRINT_STRW, @"そんな米娅に貴方はあえて、勢いよく裙をめくった"
			PRINTL
			CALL PRINT_STRW, @"「%TEXTR("わぁ/きゃあ/わわ/うひゃあ/ひゃあ")%っ！_／／／_」"
			PRINTL
			CALL PRINT_STRW, @"貴方の眼前に、胖次を着用していない桃尻が広がった"
			PRINTL
			CALL PRINT_STRW, @"「や～ん、バレちゃった♪」"
			PRINTL
			CALL PRINT_STRW, @"貴方は何故胖次を履いてないかと問いただした"
			PRINTL
			CALL PRINT_STRW, @"「えぇ～、だって没穿内褲で外出るとドキドキするんですもん…_／／／_」"
			CALL PRINT_STRW, @"「いつバレるか分からないスリルが堪んなくて…_／／／_」"
			PRINTL
			SELECTCASE RAND:2
				CASE 0
					CALL PRINT_STRW, @"「あはっ、胖次交易の契約違反してごめんなさ～い♪」"
				CASE 1
					CALL PRINT_STRW, @"「あっ…もしかしてこれって胖次交易の契約違反になります～？」"
					CALL PRINT_STRW, @"「ごめんなさ～い♪」"
			ENDSELECT
			PRINTL
			IF FLAG:二人きり
				CALL PRINT_STR, @"（%TEXTR("ずぷぅ/にゅぷぅ/ぬぷぅ")%っ！）"
				PRINTL
				CALL PRINT_STRW, @"「%TEXTR("んぉおお/おぉぉ/んぁああ/おほぉ")%っ…！？_HH_」"
				;肛塞有
				IF TALENT:常時Ａ肛塞 >= 1
					CALL PRINT_STRW, @"貴方はお仕置きと称し、米娅の肛塞を激烈地挿抜させた"
				;肛塞無
				ELSE
					CALL PRINT_STRW, @"貴方はお仕置きと称し、米娅の%CNAME("肛門_地文")%に指を突っ込み、"
					CALL PRINT_STRW, @"就这様%CNAME("直腸_地文")%をかき混ぜた"
				ENDIF
				PRINTL
				CALL PRINT_STR, @"（じゅぷっ！ ぐちゅぐちゅっ…！ %TEXTR("ぶぼ/ぶび")%っ…！）"
				PRINTL
				CALL PRINT_STRW, @"「%TEXTR("あはぁん/んほぉお/くぅうん/くっはぁ/かっはぁ/んっはぁ")%！？_HH_ %TEXTR("ひゃあ/やぁん/きゃあ")%っ…！ ご、ごめんなさーい！_HH__／／／_」"
				CALL SIMULATE_TRAIN_COM, 2, 1
			ELSE
				CALL PRINT_STRW, @"貴方はお仕置きと称し、米娅の尻を就这様撫でまわした"
				PRINTL
				CALL PRINT_STRW, @"「%TEXTR("あはぁん/んほぉお/くぅうん/くっはぁ/かっはぁ/んっはぁ")%！_HH_ %TEXTR("ひゃあ/やぁん/きゃあ")%っ、%CNAME("二人称")%ごめんなさ～い…_HH__／／／_」"
			ENDIF
		ELSEIF ABL:受虐属性 >= 3 && ABL:露出癖 >= 3
			CALL PRINT_STRW, @"「え、え～っと…今日は無理なんですよね～…」"
			CALL PRINT_STRW, @"「ほ、ほらその願いはまた明日にしましょ……きゃあっ！？_／／／_」"
			PRINTL
			CALL PRINT_STRW, @"貴方は問答無用で掀起裙子と、米娅は胖次を履いていなかった"
			PRINTL
			CALL PRINT_STRW, @"「あっ…ち、違いますっ…！ これは違うんです%CNAME("二人称")%っ！_／／／_」"
			CALL PRINT_STRW, @"「これは没穿内褲健康法を試してるのであって！」"
			CALL PRINT_STRW, @"「決して没穿内褲で外出のがドキドキするんじゃないですからねっ！_／／／_」"
		ELSE
			CALL PRINT_STRW, @"「い、いや～…その…今日は駄目というか…無理というか…」"
			CALL PRINT_STRW, @"「ご、ごめんなさい%CNAME("二人称")%今日はそのお願いは没有で……きゃあっ！？_／／／_」"
			PRINTL
			CALL PRINT_STRW, @"貴方は問答無用で掀起裙子と、米娅は胖次を履いていなかった"
			PRINTL
			CALL PRINT_STRW, @"「ぁ…あははっ…_／／／_ じ、実は今日履いてなくてですね…_／／／_」"
			CALL PRINT_STRW, @"「え？ なぜ履いてないかですって？」"
			PRINTL
			CALL PRINT_STRW, @"「…実は割とマジで履き忘れちゃいました……」"
			CALL PRINT_STRW, @"「…あの、朝時間が無くて…つい焦って着替えてこの有様です…あははっ…」"
			PRINTL
			CALL PRINT_STRW, @"「と、という訳で手を離してぇ～！_／／／_」"
		ENDIF
	ENDIF
;胖次を要前の会話。
;ただし、悪魔の場合には魂を払っているので確実に渡すことになる
;ここで本来胖次を给かどうかなどを加味して分岐を設ける事も出来る。特に書かなくてもよい
;TFLAG:取引承諾 = 0とすると胖次拒否に行くようになり、TFLAG:取引承諾 = 1とすると判定無視で胖次を渡せるようになる
;TFLAG:取引価格 に数字を入れる事で好きな額を要求できるようになる。基準相場は$500です
;TFLAG:値上げ交渉 に数字を入れておくと、断られた際もその値上乗せで胖次を渡す展開に出来る
;TFLAG:取引拒否 = 1 とすると本来取引できるかに関わらず、取引しなくなる
CASE "胖次交易"
	;ＯＫ！
	IF TFLAG:取引承諾
		;日期と時間参照随机
		IF COND("合意：胖次交易") && RANDC(4) == 0
			PRINTFORMW
			TFLAG:取引価格 = 1000
		ELSE
			PRINTFORMW
		ENDIF
	;断られる
	ELSE
		;これを指定しておくと、実行値が足りない際にこの額上乗せで応じてくれるようになる
		TFLAG:値上げ交渉 = 500
	ENDIF
CASE "胖次"
	;初回
	IF DEVENT(ARGS) == 0
		;特定表情の颜绘を表示
		CALL EMOTION_PLUS, "重置/〇〇/憤怒眉/呀哒/赤面/对话框！？"
		CALL PRINT_STRW, @"「那什么…我大概、能理解有这种特殊爱好的金主…」"
		CALL PRINT_STRW, @"「这样的灵魂交易真的合理吗！？」"
		CALL PRINT_STRW, @"「不对！好像真的可以！？用米娅的胖次换灵魂什么的、对淫魔来说貌似是个暴利的行当呀！？」"
		CALL PRINT_STRW, @"「でもいいんですか%CNAME("二人称")%は！？ 本当にいいの！？ 魂差し出すんですよ！？」"
	;二回目以降
	ELSE
		;A妊娠イベント完遂済
		IF TALENT:Ａ妊娠体質 == 1
			CALL PRINT_STRW, @"…"
			CALL PRINT_STRW, @"……"
			PRINTL
			;特定表情の颜绘を表示
			SELECTCASE RAND:3
				CASE 0
					CALL EMOTION_PLUS, "重置/斜眼２/ヮ２/赤面/对话框爱心"
				CASE 1
					CALL EMOTION_PLUS, "重置/斜眼２/ワ/赤面/对话框爱心"
				CASE 2
					CALL EMOTION_PLUS, "重置/斜眼２/笑顔２/赤面/对话框爱心"
			ENDSELECT
			IF FLAG:二人きり
				;易出汗
				IF COND("易出汗")
					SELECTCASE RAND:2
						CASE 0
							CALL PRINT_STR, @"（スゥウウーーッ……ハァ～ー…）"
							PRINTL
							CALL PRINT_STRW, @"「ひゃあああ！！_／／／_ ちょっ、今はダメッ！_／／／_」"
							PRINTL
							CALL PRINT_STRW, @"貴方は米娅の尻に顔を埋め、汗で湿った胖次と桃尻を堪能していた"
							PRINTL
							CALL PRINT_STRW, @"「い、今は汗がっ…！_／／／_ とにかく止めてっ！ 出口て下さいっ！_／／／_」"
							PRINTL
							CALL PRINT_STRW, @"羞恥で悶える米娅の様子と鼻腔を貫くフェロモンの香りに、貴方是つも以上に興奮した"
							PRINTL
							CALL PRINT_STR, @"（スゥーッ！ スゥウウーーッ！！）"
							PRINTL
							CALL PRINT_STRW, @"「わぁああ！？！？_／／／__／／／_ %CNAME("二人称")%のバカバカッ！！_／／／_」"
							CALL PRINT_STRW, @"「分かりました胖次が欲しいんですよね！？」"
							CALL PRINT_STRW, @"「今すぐ脱ぎますから出口て下さいっ！！_／／／__／／／_」"
						CASE 1
							CALL PRINT_STRW, @"「ううぅぅ～～……_／／／_ %CNAME("二人称")%の変態……_／／／_」"
							PRINTL
							CALL PRINT_STRW, @"貴方は汗で湿った米娅の尻と胖次を撫でていた"
							PRINTL
							CALL PRINT_STRW, @"「なんでよりによって汗かいてる時に胖次欲しがるんですかっ！_／／／_」"
							CALL PRINT_STRW, @"「しかも自己脱がせたいって恥ずかしさも倍なんですけどっ！_／／／_」"
							PRINTL
							CALL PRINT_STRW, @"羞恥で悶える米娅を堪能し的同时、貴方は胖次に手をかけ、慢慢地降ろした"
							PRINTL
							CALL PRINT_STR, @"（スルッ……）"
							PRINTL
							CALL PRINT_STRW, @"「…んっ！_HH_ は、早く脱がせて下さいっ…_／／／_」"
							PRINTL
							CALL PRINT_STRW, @"運動直後で高い体温……"
							CALL PRINT_STRW, @"ぬらりとテカる健康的な太腿……"
							CALL PRINT_STRW, @"股からムワッと香る体臭に……"
							CALL PRINT_STRW, @"たっぷりの汗で湿った胖次……"
							PRINTL
							CALL PRINT_STRW, @"目に飛び込む情景と手から伝わる熱さに、貴方是つも以上に興奮した"
							PRINTL
							CALL PRINT_STRW, @"「あ、あの%CNAME("二人称")%っ……？ 太腿まで降ろした所でガン見しないで欲しいんですけど……_／／／__／／／_」"
							PRINTL
							CALL PRINT_STRW, @"貴方は%TEXTR("この素敵な气味を暫く嗅ぎたかった/エロ過ぎてつい固まってしまった")%と呟いた"
							PRINTL
							CALL PRINT_STRW, @"「す、坦率に喜べないんですけどっ！！_／／／__／／／_」"
					ENDSELECT
				ELSE
					SELECTCASE RAND:2
						CASE 0
							CALL PRINT_STR, @"（スゥウウーーッ……ハァ～ー…）"
							PRINTL
							CALL PRINT_STRW, @"「ちょ、ちょっと%CNAME("二人称")%ったらぁ～_／／／_」"
							PRINTL
							CALL PRINT_STRW, @"貴方は米娅の尻に顔を埋め、胖次越しにその桃肌を堪能していた"
							PRINTL
							CALL PRINT_STRW, @"「んもぉ～、遠慮無さすぎですよ～_／／／_」"
							PRINTL
							CALL PRINT_STR, @"（スゥーッ！ スゥウウーーッ！）"
							PRINTL
							CALL PRINT_STRW, @"「やぁーーん！_／／／_ んもぉもぉもぉっ！_／／／_」"
							CALL PRINT_STRW, @"「胖次あげますからそれで我慢して下さい！_／／／_」"
						CASE 1
							CALL PRINT_STRW, @"「まったく…自己脱がせたいって相変わらずですね…_／／／_」"
							PRINTL
							CALL PRINT_STRW, @"貴方は米娅の尻を撫でながら胖次に手をかけ、慢慢地降ろしていった"
							PRINTL
							CALL PRINT_STR, @"（スルッ……）"
							PRINTL
							CALL PRINT_STRW, @"「…んっ_HH_…や、やだ…手がやらしいんですけどっ_HH_」"
							PRINTL
							CALL PRINT_STRW, @"尻から太腿、膝から足元にかけ…"
							CALL PRINT_STRW, @"下半身全体を舐めるように撫で的同时、しつこく執拗に胖次を脱がせた"
							PRINTL
							CALL PRINT_STR, @"（…スル）"
							PRINTL
							CALL PRINT_STRW, @"「……%TEXTR("ス、スイッチ入りかけました/ちょ、ちょっと興奮しちゃいました")%_／／／_」"
					ENDSELECT
				ENDIF
			ELSE
				;易出汗
				IF COND("易出汗")
					SELECTCASE RAND:2
						CASE 0
							CALL PRINT_STRW, @"「んもぉ…今浑身是汗なのにぃ…_／／／_」"
							CALL PRINT_STRW, @"「し、仕方がないなぁ…_／／／_ ちょっと待ってて下さいね…_／／／_」"
						CASE 1
							CALL PRINT_STRW, @"「もう…そろそろ来ると思ってましたよ…_／／／_」"
							CALL PRINT_STRW, @"「ちょっと廁所で脱いできます…まったく、%CNAME("二人称")%の変態…_／／／_」"
					ENDSELECT
				ELSE
					SELECTCASE RAND:2
						CASE 0
							CALL PRINT_STRW, @"「はぁ～やれやれ、そろそろ言われると思ってましたよ…_／／／_」"
							CALL PRINT_STRW, @"「じゃあ脱いでくるんでちょっと待ってて下さいね…_／／／_」"
						CASE 1
							CALL PRINT_STRW, @"「まったく…%CNAME("二人称")%ったら米娅の胖次好きすぎっ！_／／／_」"
							CALL PRINT_STRW, @"「んもぉ、胖次代もバカにならないですよ…_／／／_」"
					ENDSELECT
				ENDIF
				PRINTL
				CALL PRINT_STRW, @"…"
				CALL PRINT_STRW, @"……"
				CALL PRINT_STRW, @"他人がいると米娅は廁所で脱いでから渡してくる…"
				CALL PRINT_STRW, @"2人きりの時だと違う反応を見れそうだ…"
				PRINTL
			ENDIF
		;A妊娠イベント完遂前
		ELSE
			;特定表情の颜绘を表示
			SELECTCASE RAND:2
				CASE 0
					CALL EMOTION_PLUS, "重置/斜眼２/半開/对话框・・・/叹气"
				CASE 1
					CALL EMOTION_PLUS, "重置/眯眯眼/半開/对话框・・・/叹气"
			ENDSELECT
			;易出汗
			IF COND("易出汗")
				SELECTCASE RAND:2
					CASE 0
						CALL PRINT_STRW, @"「…えっ、いや、米娅浑身是汗なんですけど……」"
					CASE 1
						CALL PRINT_STRW, @"「あの…%CNAME("二人称")%…見ての街道米娅は浑身是汗なんですけど…」"
				ENDSELECT
				CALL PRINT_STRW, @"「え？ %TEXTR("それがいい/むしろそれがいい/だからこそ欲しい")%ですって？」"
				SELECTCASE RAND:2
					CASE 0
						CALL PRINT_STRW, @"「…」"
						CALL PRINT_STRW, @"「……」"
						CALL PRINT_STRW, @"「………%TEXTR("きもっ/キモッ")%…………」"
					CASE 1
						CALL PRINT_STRW, @"「…い、いや、いやいや流石に冗談ですよね…？」"
						CALL PRINT_STRW, @"「え、ガチのマジですって？」"
						CALL PRINT_STRW, @"「うん、%CNAME("二人称")%ってやっぱり%TEXTR("変態/へんたい/変態")%ですね」"
				ENDSELECT
			ELSE
				SELECTCASE RAND:5
					CASE 0
						CALL PRINT_STRW, @"「既然灵魂都到手了、那就按要求的…」"
						CALL PRINT_STRW, @"「まぁ…胖次貰って満足ならば…それでいいですけど……」"
					CASE 1
						CALL PRINT_STRW, @"「あのぉ…%CNAME("二人称")%…」"
						CALL PRINT_STRW, @"「別にその胖次でナニしてもいいですが…」"
						CALL PRINT_STRW, @"「せめて米娅の居ない所でシテ頂きたいです…」"
					CASE 2
						CALL PRINT_STRW, @"「是是胖次がご所望なんですね…どうぞ～」"
						CALL PRINT_STRW, @"「はぁー～……殿方のそういう趣味は否定しませんが…」"
						CALL PRINT_STRW, @"「こればかりは理解出来ないんですよね～…」"
					CASE 3
						CALL PRINT_STRW, @"「是どうぞ……お望みの米娅の胖次ですよ…」"
						CALL PRINT_STRW, @"「いやホント…殿方って女の子の胖次の何が良いんですか…？」"
						CALL PRINT_STRW, @"「こんなのただの大量生産品の安い布切れでしょ…？」"
						CALL PRINT_STRW, @"「魂を差し出して得るものじゃないですよ…」"
					CASE 4
						CALL PRINT_STRW, @"「可愛い女の子本人が目の前にいるというのに…」"
						CALL PRINT_STRW, @"「なぜ胖次を選ぶのでしょうか…」"
						CALL PRINT_STRW, @"「殿方って…ある意味で女より複雑怪奇ですよ…」"
				ENDSELECT
			ENDIF
			;胖次を脱いで渡してくる汎用地の文
			CALL DAILY_MESSAGE, "脱下胖次交了出去"
		ENDIF
	ENDIF

;淫魔設定はそもそも確実に渡すことになるから、以下口上は游戏上反映させることは無い
;けど書いてしまったので、とりあえず残しておく
CASE "胖次拒否"
	SELECTCASE RAND:2
		CASE 0
			CALL PRINT_STRW, @"「咦、不是…您在说什么…拜托正常一点…」"
			CALL PRINT_STRW, @"「啊？不是都交往了吗？」"
			CALL PRINT_STRW, @"「等一下、这和你要胖次有什么関系…」"
			CALL PRINT_STRW, @"…平时相当粘人的米娅、慢慢拉開了距离"
		CASE 1
			CALL PRINT_STRW, @"「恶心★」"
			CALL PRINT_STRW, @"…带着嫌弃眼神的米娅、用营业笑容如是说到"
	ENDSELECT
;TFLAG:値上げ交渉 に数字を入れておくと、断られた際もその値上乗せで服を脱掉展開に出来る
;TFLAG:取引拒否 = 1 とすると本来取引できるかに関わらず、取引しなくなる
CASE "全裸交易"
	;ＯＫ！
	IF TFLAG:取引承諾

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

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

	ELSE

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

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

	ELSE

	ENDIF

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

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

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

	;拝み倒して失敗した場合
	ELSEIF TFLAG:取引価格 == 0
		;轻轻地地の文が表示されます。口上有无どちらでも大丈夫そうです。
	;其他、你が薬代を不支付場合
	ELSE
		;恋慕状態で、それなりに妊娠の恐惧がある場合
		IF ( COND("受精確認") || COND("胎内の精液量") ) && TALENT:恋慕
			;お金がないか、不支付を選んだ場合です。
			;それなら避妊できなくて妊娠しちゃっても仕方ないね…(爱心)って感じのやつです。
			;地の文が表示されるので何も書かないほうが良いかもしれません。
		;不支付、を選んだ場合
		ELSEIF MONEY >= TFLAG:取引価格
			;口上无でも自然な感じです
		;お金が足りなかった場合
		ELSE
			;不支付を選んだ場合も、お金が足りないときはここへ来ます。
		ENDIF
	ENDIF
CASE "同居拒否"
	CALL PRINT_STRW, @"「哼～嗯、%CNAME("二人称")%无限的精力是很诱人…」"
	CALL PRINT_STRW, @"「同居するような仲ではないですよね…？」"
	CALL PRINT_STRW, @"「%CNAME("二人称")%と米娅はあくまで炮友です！」"
	CALL PRINT_STRW, @"「不过嘛、叫我来家里H完全OK的说」"
CASE "同居希望"
	CALL PRINT_STRW, @"「哇～♪ 邀请米娅同居嘛？ 可以呀～」"
	CALL PRINT_STRW, @"「不过%CNAME("二人称")%…和魅魔住在一块的后果、真的理解嘛？」"
	CALL PRINT_STRW, @"「%CNAME("阴茎")%软趴趴…%CNAME("睾丸")%榨干干…」"
	CALL PRINT_STRW, @"「哎呀、米娅什么都没说_HH_」"
CASE "同居頻度的相談"
	CALL PRINT_STRW, @"「要好好控制频率哟～」"
CASE "便当拒否"

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

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

		ELSE
			CALL PRINT_STRW, @"「便当？ 可以的说～」"
			CALL PRINT_STRW, @"「哼哼♪ 米娅对料理相当有自信哦～」"
			CALL PRINT_STRW, @"「不知不觉就让你的胃沦陷♪」"
		ENDIF
	ENDIF

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

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

			ELSE

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

			ELSE

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

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

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

CASE "禁断的知識"
	SELECTCASE TALENT:MASTER:禁断的知識
		CASE 0
			CALL PRINT_STRW, @"「ほぉ！ 禁断的知識に手を出したいと！」"
			CALL PRINT_STRW, @"「んふふ…人の身には過ぎた力かと思いますが%CNAME("二人称")%は無限の魂を持つ稀有な存在…」"
			CALL PRINT_STRW, @"「人外の力に興味を持つのは無理ないかもしれませんねぇ…」"
			CALL PRINT_STRW, @"「那么？ 具体想了解哪方面的知识？」"
			CALL PRINT_STRW, @"…"
			CALL PRINT_STRW, @"……"
			CALL PRINT_STRW, @"「原来如此～想学【淫紋の刻印】啊？」"
			CALL PRINT_STRW, @"「んふふ、%CNAME("二人称")%がこの力で何をするのか興味が有ます♪」"
			CALL PRINT_STRW, @"「ではでは～魂をお願い致しますね_HH_」"
			CALL PRINT_STRW, @"…"
			CALL PRINT_STRW, @"……"
			CALL PRINT_STRW, @"「嗯恩恩、收到了…」"
			CALL PRINT_STRW, @"「那么就按您期待的、给予【淫紋の刻印】的力量…」"
			PRINTL
			CALL PRINT_STRW, @"突然间、米娅变了一幅样子"
			PRINTL
			CALL PRINT_STRW, @"…双眼发出同红宝石一般鲜红的光泽、身躯也被浓郁地黑暗所包裹"
			CALL PRINT_STRW, @"…米娅は单薄的笑みを浮かべ的同时、貴方に慢慢地近づいてきた"
			CALL PRINT_STRW, @"…即便那姿态充斥着邪恶与不详、但也散发着%TEXTR("勾人/惹眼/引人注目")%的%TEXTR("魅力/优雅/艳丽")%"
			PRINTL
			CALL PRINT_STRW, @"「……啾_HH_」"
			PRINTL
			CALL PRINT_STRW, @"米娅は目の前で両膝をつき、貴方の手の甲に接吻をした"
			CALL PRINT_STRW, @"紧接着、察觉到有什么东西顺着手臂闯进身体、切实地体会到了新力量的涌入"
			CALL PRINT_STRW, @"回过神时米娅已经恢复了往常的样子、刚才那股浓密的黑暗也消散了"
			PRINTL
			CALL PRINT_STRW, @"「……是、これで術式は終わりです」"
			CALL PRINT_STRW, @"「これで【淫紋の刻印】の力は%CNAME("二人称")%のものですよ♪」"
			CALL PRINT_STRW, @"「相手に身体に一生残る紋様を刻むものなので、使う相手は慎重に選んで下さいね_HH_」"
		CASE 1
			CALL PRINT_STRW, @"「あら、更なる禁断的知識に手を出したいと？ んふふ、勿論大丈夫ですよ～」"
			CALL PRINT_STRW, @"「それで？ 次はどんな力が欲しいのです？」"
			CALL PRINT_STRW, @"…"
			CALL PRINT_STRW, @"……"
			CALL PRINT_STRW, @"「わ～お！！ 【具現】の力が欲しいと！ なるほどなるほど～_HH_」"
			CALL PRINT_STRW, @"「へぇ～%CNAME("二人称")%にはそういうご趣味があるんですね～_HH_」"
			CALL PRINT_STRW, @"「米娅に魂を差し出せばその趣味が叶いますよ～_HH_」"
			CALL PRINT_STRW, @"…"
			CALL PRINT_STRW, @"……"
			CALL PRINT_STRW, @"「是、確かに魂を頂きました！ あっ、そうそう、休闲褲は脱いでくださいね～」"
			CALL PRINT_STRW, @"「嗯？为什么？ 米娅流离開%CNAME("阴茎")%是行不通的哦_HH_」"
			PRINTL
			CALL PRINT_STRW, @"貴方は言われるがまま阴茎を露出させていると、いつの間にか米娅の様子が豹変していた"
			PRINTL
			CALL PRINT_STRW, @"…与上次一样、双眼闪烁着鲜红的光泽、身躯被浓郁的黑暗包裹"
			CALL PRINT_STRW, @"…米娅は貴方の股間の前で両膝をつき、舌なめずりしながら流し目で見上げてくる"
			CALL PRINT_STRW, @"…その姿に悪寒が走るが、同時に濃密な%TEXTR("妖艶さ/濃艶さ")%を放ち、貴方を激烈地勃起させた"
			PRINTL
			CALL PRINT_STRW, @"「…ここから力を注ぎ込むので…暫く耐えて下さいね…」"
			CALL PRINT_STRW, @"「…顺便一提、射精是绝对禁止的…一定要拼命忍住哟…」"
			CALL PRINT_STRW, @"「…那么、失礼了……哈呜、啾鲁_HH_」"
			PRINTL
			CALL PRINT_STRW, @"米娅は貴方の亀頭に接吻し、就这様濃厚的口交が始まった"
			CALL PRINT_STRW, @"紧接着、伴随着肉棒上不断传来的快感、好像有一股力量慢慢进入身体"
			PRINTL
			CALL PRINT_STRW, @"「嗯呜、ReroRero…_HH_ 啾鲁鲁、哈啊、啾…_HH_」"
			PRINTL
			CALL PRINT_STRW, @"だが口交は中々終わらず、阴茎から逆流する熱と睾丸から上ってくる射精感に、貴方は咬紧牙関耐え続けた"
			PRINTL
			CALL PRINT_STRW, @"…"
			CALL PRINT_STRW, @"……"
			PRINTL
			CALL PRINT_STRW, @"「啾鲁鲁、嗯mmm…_HH_ 哈呜…_HH_ 吸溜、啾鲁鲁露露…_HH_」"
			PRINTL
			CALL PRINT_STRW, @"尽管已经持续了10分钟、但米娅依旧没有停下那浓密的口活"
			CALL PRINT_STRW, @"絶え間なく続く体に逆流する熱と上り詰める射精感に、貴方は身を捩らせ悶絶していた"
			PRINTL
			CALL PRINT_STRW, @"「弗弗♪ 嗯、啾鲁鲁露露～～～…_HH_」"
			PRINTL
			CALL PRINT_STRW, @"大概仪式也迎来了尾声、米亚加快速度尽情地吮吸肉棒"
			CALL PRINT_STRW, @"逆流的强烈热量和快感使你明白自己没法继续遵守严禁射精的约定"
			CALL PRINT_STRW, @"随后在快要射出来的前一秒…"
			PRINTL
			CALL PRINT_STRW, @"「…啵！_HH_」"
			PRINTL
			CALL PRINT_STRW, @"米娅的嘴唇离開了肉棒前端"
			PRINTL
			CALL PRINT_STRW, @"「辛苦了、那么这就算完成啦♪」"
			PRINTL
			CALL PRINT_STRW, @"僅かな吐息でも吹きかかれば大暴発する射精寸前状態……"
			CALL PRINT_STRW, @"度重なる寸止めの過負荷に、貴方は就这様脱力した……"
			PRINTL
			CALL PRINT_STRW, @"…"
			CALL PRINT_STRW, @"……"
			PRINTL
			CALL PRINT_STRW, @"「あはは、絶対に出ちゃうと思いましたよ～_HH_」"
			CALL PRINT_STRW, @"「これやり直しかなぁって思ってたんですけどね～、よく我慢できました★」"
			PRINTL
			CALL PRINT_STRW, @"貴方は米娅の膝枕で休み的同时、阴茎から逆流していた熱と快感の余韻が冷めるのを待っていた"
			PRINTL
			CALL PRINT_STRW, @"「そして中々収まりませんね～_HH_ あはは、まぁゆっくり休みましょ♪」"
			PRINTL
			CALL PRINT_STRW, @"但身体仍旧兴奋不已、柔板现在还保持着勃起状态不断痉挛"
			PRINTL
			;腕粗以上
			IF SIZE("阴茎", PLAYER) >= 4
				CALL PRINT_STRW, @"「哦呀～…%CNAME("阴茎")%还是一如既往地厉害呢…」"
				CALL PRINT_STRW, @"「%CNAME("阴茎")%の形をしたインテリアを見てる気分ですよ」"
			;馬根
			ELSEIF SIZE("阴茎", PLAYER) == 3
				CALL PRINT_STRW, @"「咿呀、但是…_HH_ 真是个厉害的%CNAME("阴茎")%呢…_HH_」"
				CALL PRINT_STRW, @"「嘿嘿、吸溜……啊、失礼了！ 不知不觉口水就…_HH_」"
			;巨根
			ELSEIF SIZE("阴茎", PLAYER) == 2
				CALL PRINT_STRW, @"「真是不错的%CNAME("阴茎")%…_HH_」"
				CALL PRINT_STRW, @"「刚才嘴巴一直被塞得满满的呢_HH_」"
			;並根
			ELSEIF SIZE("阴茎", PLAYER) == 1
				CALL PRINT_STRW, @"「噫、突然就跳起来了！ 啊咧、%CNAME("二人称")%真的没问题吗～？」"
				CALL PRINT_STRW, @"「来、深呼吸、一点一点适应这股力量～_HH_」"
			;短小
			ELSEIF SIZE("阴茎", PLAYER) == 0
				CALL PRINT_STRW, @"「真的好可爱啊这个%CNAME("阴茎")%…_HH_」"
				CALL PRINT_STRW, @"「びーん！ 元気一杯！ って感じなのが堪らないですよ…_HH_」"
			ENDIF
			PRINTL
			CALL PRINT_STRW, @"「说明一哈、等到热量平息下来后、就能按如愿以偿地【具現】了哟」"
			CALL PRINT_STRW, @"「まったく、どんなPLAYを考えてるんですか～？_HH_ このヘンタ～イ_HH_」"
			CALL PRINT_STRW, @"「…あっ、ちなみに米娅はそっちの趣味は無いのですよ！ 他の女の子でお楽しみ下さいね～♪」"
		CASE 2
			CALL PRINT_STRW, @"「还想要更多禁断的知識？ %CNAME("二人称")%这是要放弃做人了吗～啊哈哈♪」"
			CALL PRINT_STRW, @"「既に【淫紋の刻印】と【具現】の力を持ってますもんね～まぁここから1つ2つ増えても大して変わらないですね★」"
			PRINTL
			CALL PRINT_STRW, @"…"
			CALL PRINT_STRW, @"……"
			PRINTL
			CALL PRINT_STRW, @"「ほうほう【認識阻害】ですか！ そこに目をつけるとは流石ですね！」"
			CALL PRINT_STRW, @"「この力があればPLAYの幅が大幅に広がりますからね～_HH_」"
			CALL PRINT_STRW, @"「では、いつものように魂の譲渡をお願いしまーす♪」"
			PRINTL
			CALL PRINT_STRW, @"…"
			CALL PRINT_STRW, @"……"
			PRINTL
			CALL PRINT_STRW, @"「是、確かに魂を頂きました！ 相変わらず上質な魂ですねぇ…」"
			CALL PRINT_STRW, @"「ではこの椅子に座って下さ～い」"
			CALL PRINT_STRW, @"「あっ、今回は前回と違ってアッサリと終わりますよ～♪」"
			PRINTL
			CALL PRINT_STRW, @"貴方は促されるまま椅子に座ると、前回と同じように米娅の雰囲気は豹変した"
			CALL PRINT_STRW, @"両目を赤く光らせ、全身を闇で纏い的同时、向かい合う姿勢で貴方の膝上に跨った"
			CALL PRINT_STRW, @"米娅は貴方の頬に両手を添え、舌なめずりしながら真っ赤な目で見下ろしてきた"
			CALL PRINT_STRW, @"不気味さと妖艶さに本能が刺激されたのか、貴方は思わず股間を激烈地勃起させた"
			PRINTL
			CALL PRINT_STRW, @"「…あははっ、お股に%CNAME("阴茎")%が当たってるんですけど～？」"
			CALL PRINT_STRW, @"「…米娅が怖いんですか？ それともえっちで堪らないんですか？」"
			CALL PRINT_STRW, @"「…どっちにしろ……とっても可愛いですよ…%CNAME("二人称")%…_HH_」"
			CALL PRINT_STRW, @"「…んふふ………ちゅっ_HH_」"
			PRINTL
			CALL PRINT_STRW, @"然后被米娅温柔地亲吻了额頭"
			CALL PRINT_STRW, @"直後、貴方は頭が阴蒂アになり、非常に冴え渡った感覚を得た"
			CALL PRINT_STRW, @"感受着新得到的力量、不知何时米娅那种奇妙的姿态也消失了"
			PRINTL
			CALL PRINT_STRW, @"…"
			CALL PRINT_STRW, @"……"
			PRINTL
			CALL PRINT_STRW, @"「啾、啾～啾啾_HH_ 呐…_HH_」"
			PRINTL
			CALL PRINT_STRW, @"術式が終わったにも関わらず、米娅は貴方の膝上で跨ったまま降りようとしない"
			CALL PRINT_STRW, @"それどころか先ほどより、貴方の頬や口に接吻を浴びせて続けている"
			CALL PRINT_STRW, @"貴方はそれに関して指摘すると…"
			PRINTL
			CALL PRINT_STRW, @"「嗯？ 还没有结束哦～♪ 呼呼～、嗯～啾啾_HH_」"
			PRINTL
			CALL PRINT_STRW, @"米娅はそう言ってるが、今までの術にあった逆流してくる熱を貴方は感じなかった"
			CALL PRINT_STRW, @"又一次提出疑问后…"
			PRINTL
			CALL PRINT_STRW, @"「はーい、嘘で～す♪ とっくに終わってま～す♪ ちゅっ、ちゅっ、ちゅぅ～…_HH_」"
			PRINTL
			CALL PRINT_STRW, @"貴方は困惑しながらこの状況を尋ねると…"
			PRINTL
			CALL PRINT_STRW, @"「だって米娅が跨った時に勃っちゃった%CNAME("二人称")%が可愛いかったんですも～ん♪」"
			CALL PRINT_STRW, @"「元気一杯の腕白少年な%CNAME("二人称")%を愛でたいんですぅー_HH_ んちゅ～～っ_HH_」"
			PRINTL
			CALL PRINT_STRW, @"貴方は暫く米娅の接吻攻撃に任憑擺佈ことにした"
			PRINTL
			CALL PRINT_STRW, @"…"
			CALL PRINT_STRW, @"……"
			PRINTL
			CALL PRINT_STRW, @"「いや～、一杯接吻しちゃいましたね♪ あー心が満たされたぁ…_HH_」"
			PRINTL
			CALL PRINT_STRW, @"「さてと、これをもって%CNAME("二人称")%は【認識阻害】が出来るよう成为了よ」"
			CALL PRINT_STRW, @"「これで色々なPLAYが出来ますね～それこそお外でシタり…_HH_ えっちなビデオを撮ったり…_HH_ とか！」"
			CALL PRINT_STRW, @"「新しいPLAYの幅はまさに%CNAME("二人称")%のアイデア次第です♪」"
			CALL PRINT_STRW, @"「……ところで%CNAME("阴茎")%がまだ元気ですよ？ 早速その力で玩耍ません？ んふふっ_HH_」"
	ENDSELECT
CASE "淫紋拒否"
	CALL PRINT_STRW, @"「呜～、请允许我拒绝…因为淫纹刻印会伴随一生的东西…」"
	CALL PRINT_STRW, @"「これを許せるのは流石に大切な人だけですよ」"
;"淫紋贴纸直前"or"淫紋贴纸"の片方を書けば十分だと思います
CASE "淫紋贴纸直前"
	;初回
	IF DEVENT(ARGS) == 0

	ELSE

	ENDIF
CASE "淫紋贴纸"
	;台詞を書いたら下のRETURN 0を消してください
	;RETURN 0
	;初回
	IF DEVENT(ARGS) == 0
		CALL PRINT_STRW, @"「贴纸的话没问题哦～、我也是第一次尝试这种贴纸呢！」"
		CALL PRINT_STRW, @"「诶嘿嘿♪ 仮初の淫紋でもどうなっちゃうか楽しみですね_HH_」"
	ELSE
		CALL PRINT_STRW, @"「还想用贴纸吗？当然可以啊！」"
		CALL PRINT_STRW, @"「那段时间的体验很棒哟_HH_」"
	ENDIF
;"淫紋直前"or"淫紋"の片方を書けば十分だと思います
CASE "淫紋直前"
	SELECTCASE MARK:淫紋
	CASE 2

	CASE 3

	CASE 4

	ENDSELECT
CASE "淫紋"
	;台詞を書いたら下のRETURN 0を消してください
	;RETURN 0
	SELECTCASE MARK:淫紋
	CASE 2
		CALL PRINT_STRW, @"「い、いつか来るとは思ってましたが…ついにその願いが来ちゃいましたか…」"
		CALL PRINT_STRW, @"「%CNAME("二人称")%的独占欲很强呢…」"
		CALL PRINT_STRW, @"「んふふ♪ いいですよ…米娅も興味があったので…_HH_」"
		CALL PRINT_STRW, @"…"
		CALL PRINT_STRW, @"……"
		CALL PRINT_STRW, @"大致弄好后、米娅仔细地观察着自己下腹部的淫纹"
		PRINTL
		CALL PRINT_STRW, @"「啊…没想到这一天真的来了…」"
		CALL PRINT_STRW, @"「就是这种感觉…啊、身体好热//」"
		CALL PRINT_STRW, @"「…っ（淫紋が完成しちゃうと、米娅どうなっちゃうんだろう_HH_）」"
	CASE 3
		CALL PRINT_STRW, @"「要进行下一步了？ 呼呼♪来惹来惹」"
		CALL PRINT_STRW, @"「この前の淫紋がちょうど馴染んだ所です_HH_」"
		CALL PRINT_STRW, @"「はぁ～ん…_HH_ 米娅どうなっちゃうんでしょう…_HH_」"
		CALL PRINT_STRW, @"…"
		CALL PRINT_STRW, @"……"
		CALL PRINT_STRW, @"在进一步描绘后、米娅凝视着形状变得更加下流的淫纹"
		PRINTL
		CALL PRINT_STRW, @"「呜哇…光、光是看着就感觉好色情…」"
		CALL PRINT_STRW, @"「哈、哈啊…话、话说回来、身体好像比之前还要热_HH_」"
		CALL PRINT_STRW, @"「…_HH_（这、好像有点不妙…_HH_）」"
	CASE 4
		CALL PRINT_STRW, @"「嗯、终于到最后一步了吗_HH_」"
		CALL PRINT_STRW, @"「哈哈、明明刚才还挺兴奋的…突、突然有点害怕了…哈哈…」"
		CALL PRINT_STRW, @"「……呃～噫！ 米娅才不会半途而废！ 已经～没什么好犹豫的了！」"
		CALL PRINT_STRW, @"…"
		CALL PRINT_STRW, @"……"
		CALL PRINT_STRW, @"最后的描绘完成后、米娅轻抚着已经刻有完整淫纹的小腹"
		PRINTL
		CALL PRINT_STRW, @"「……_HH_……哈啊、哈啊！_HH_」"
		CALL PRINT_STRW, @"「不妙、真的有点不妙…_HH_」"
		CALL PRINT_STRW, @"「（想要精液！ 这个、男人…、想更多地侍奉他…_HH_）」"
		CALL PRINT_STRW, @"「阿拉♪ %CNAME("二人称")%…！！」"
		PRINTL
		CALL PRINT_STRW, @"米娅は突然、有無を言わさず貴方を推倒"
		CALL PRINT_STRW, @"摆出骑乘位的姿态、红宝石般的深红眼睛俯视着你"
		CALL PRINT_STRW, @"舌なめずりする米娅の姿はかつてない程妖艶で有、かつてない搾精が始圆圈事を物語っていた"
		PRINTL
		CALL PRINT_STRW, @"「はぁっ、はぁっ…！_／／／_ 米娅をこうしたのは%CNAME("二人称")%ですよっ…_／／／_」"
		CALL PRINT_STRW, @"「責任は取って貰いますからねっ…！_HH__HH_」"
	ENDSELECT
CASE "拜托処理性欲"
	CALL PRINT_STRW, @"「当然可以啦！ 一直在等你这么说呢♪」"
	CALL PRINT_STRW, @"「哼哼、那么您想要那种性处理呀？」"
	CALL PRINT_STRW, @"「要是能考虑一下米娅的性癖、人家会很開心的说_HH_」"
CASE "性処理の一時中断"
	CALL PRINT_STRW, @"「啊咧？ 怎么了？ 身体不舒服吗…？」"
	CALL PRINT_STRW, @"「……还是人家榨过頭了？」"
	CALL PRINT_STRW, @"「再開したくなったらいつでもお声がけくださいね」"
CASE "性処理拒否"
	CALL PRINT_STRW, @"「呜～哇！胆子真大呢！」"
	CALL PRINT_STRW, @"「とても魅力的ですが米娅は他にご奉仕してる殿方が沢山いるのですよ～」"
	CALL PRINT_STRW, @"「残念、特殊对待是不行的～说♪」"
;悪魔、淫魔、妖狐専用
CASE "给我看尾巴"

CASE "给我看尾巴拒否"

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

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

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

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

	CASE "普通"

	CASE "巨根"

	CASE "馬根"

	;腕並以上
	CASEELSE

	ENDSELECT

CASE "巨根化して拒否"

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

	CASE "巨根"

	CASE "馬根"

	;腕並、規格外
	CASEELSE

	ENDSELECT

CASE "短小化して拒否"

;恋慕のみ　避妊の護符を取下
CASE "避妊解除可"

CASE "避妊解除拒否"

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

;以下は悪魔専用
CASE "魂が足りない"
	IF COND("Ｈ最中の取引")
		;Ａ挿入中！
		IF INSERT("Ａ挿入相手") == MASTER
			SELECTCASE RAND:3
				CASE 0
					CALL PRINT_STRW, @"「哈啊…哈啊…%TEXTR("啊咧/呼呼/嘻嘻")%、真遗憾、灵魂已经不够了呀～」"
				CASE 1
					CALL PRINT_STRW, @"「哈啊…哈…不行啊、%CNAME("二人称")%的灵魂不够呢…」"
				CASE 2
					CALL PRINT_STRW, @"「はぁ…はぁ…%TEXTR("あはは/んふふ/いひひ")%、その願いを叶える魂が今の%CNAME("二人称")%には有ませんね～」"
			ENDSELECT
			SELECTCASE RAND:4
				CASE 0
					CALL PRINT_STRW, @"「是被%CNAME("肛門")%吸走太多了吗…_HH_」"
				CASE 1
					CALL PRINT_STRW, @"「因为%CNAME("肛門性交")%吸走太多灵魂了呢…_HH_」"
				CASE 2
					CALL PRINT_STRW, @"「無計画に%CNAME("中出し")%し過ぎちゃいましたねぇ…_HH_」"
				CASE 3
					CALL PRINT_STRW, @"「米娅的%CNAME("肛門")%有这么舒服吗、一不小心就射过頭了？ %TEXTR("啊咧咧/呼呼/嘻嘻")%♪」"
			ENDSELECT
			SELECTCASE RAND:4
				CASE 0
					CALL PRINT_STRW, @"「那就%TEXTR("下次/明天")%在拜托您～吧♪」"
				CASE 1
					CALL PRINT_STRW, @"「所以啊…不能半途而废哦、把剩下的灵魂都射出来♪」"
				CASE 2
					PRINTL
					CALL PRINT_STR, @"（…咕溜咕溜）"
					PRINTL
					CALL PRINT_STRW, @"「…%TEXTR("啊/嗯/呀")%mmm！_HH_ %TEXTR("啊/嗯/呀")%、%TEXTR("啊恩/嗯啊/呀嗯")%mmm！_HH_ 这～样子、吊儿郎当也要有%TEXTR("个限度/点自知之明")%啊！」"
				CASE 3
					PRINTL
					CALL PRINT_STR, @"（…咕啾咕啾！！）"
					PRINTL
					CALL PRINT_STRW, @"「%TEXTR("啊哦/嗯恩恩/齁噢噢噢噢/哇啊/哈啊/哼嗯")%mmm…！_HH_ 就、就算%TEXTR("突然袭击/很舒服")%、这种事情也不可以！」"
			ENDSELECT
		;挿入してない
		ELSE
			SELECTCASE RAND:2
				CASE 0
					CALL PRINT_STRW, @"「%TEXTR("啊啦/哦～吖")%？ 看来今天%CNAME("二人称")%的魂量貌似不够呢…」"
				CASE 1
					CALL PRINT_STRW, @"「%TEXTR("あら/う～ん")%？ 見た限り魂が不足してますねぇ…」"
			ENDSELECT
			SELECTCASE RAND:3
				CASE 0
					CALL PRINT_STRW, @"「真是遗憾啊%CNAME("二人称")%、不过H还要继续哦_HH_」"
				CASE 1
					CALL PRINT_STRW, @"「嘛嘛、不要太遗憾了啦！ 接下来让人家好好安慰你一下_HH_」"
				CASE 2
					CALL PRINT_STRW, @"「真遗憾呢～、总之、接下来就靠%CNAME("肛門性交")%把坏心情都射出来吧～_HH_」"
			ENDSELECT
		ENDIF
	;通常状態
	ELSE
		CALL PRINT_STRW, @"「%CNAME("二人称")%现在的灵魂不足以实现愿望」"
		CALL PRINT_STRW, @"「残念ですがこれは淫魔との契約…」"
		CALL PRINT_STRW, @"「いくら仲が良くなっても割引も忖度も有ませんよ？」"
	ENDIF
CASE "想要钱"
	CALL PRINT_STRW, @"「要钱啊。那么、请在这个借贷合同上签字吧」"
	CALL PRINT_STRW, @"「貸主是米娅、借主是%CNAME("二人称")%、还款方式是%CNAME("二人称")%本人灵魂的部分转让、还款期限是今天之内」"
	CALL PRINT_STRW, @"………"
	CALL PRINT_STRW, @"「確かに魂を頂きました！ では、ご希望金額をすぐに振り込んでおきますね～」"
	CALL PRINT_STRW, @"在钱这方面、米娅相当可靠…"
CASE "甜言蜜语"
	;自分を相手にＨしてる最中にお願いされた
	IF COND("Ｈ最中の取引")
		;Ａ挿入中！
		IF INSERT("Ａ挿入相手") == MASTER
			SELECTCASE RAND:3
				CASE 0
					CALL PRINT_STRW, @"「…嗯_HH_ 哈啊、嗯、%CNAME("肛門")%被这么插入的时候、不管说什么都会開心的吧_HH_」"
				CASE 1
					CALL PRINT_STRW, @"「%CNAME("肛門")%被%CNAME("阴茎")%插入的时候、教%CNAME("二人称")%诉说甜言蜜语这种愿望什么的_HH_」"
					CALL PRINT_STRW, @"「那、那就让我来教教你…啊、先不要扭的这么激烈啊！」"
				CASE 2
					CALL PRINT_STRW, @"「%CNAME("肛門")%被%CNAME("阴茎")%插着就能学会甜言蜜语…哪有这种H的课程啦…_／／／_」"
					CALL PRINT_STRW, @"「%TEXTR("啊咧咧/呼呼/嘻嘻")%、那%CNAME("肛門")%先放松一点～、能好好地集中精神吗？_HH_」"
			ENDSELECT
		;挿入してない
		ELSE
			SELECTCASE RAND:2
				CASE 0
					CALL PRINT_STRW, @"「那么、要開始学习啦♪ 直接进入实践教学环节吧～」"
				CASE 1
					CALL PRINT_STRW, @"「啊啦啦、在实践教学的基础上…一点一点地…把甜～言蜜语都教给你…_HH_」"
			ENDSELECT
		ENDIF
	;通常状態
	ELSE
		SELECTCASE RAND:2
			CASE 0
				CALL PRINT_STRW, @"「ほほぉ、そういう願いって中々難しいんですよね～」"
				CALL PRINT_STRW, @"「自己当たって砕けての精神で学んだ方が良いと思いますが…まぁ良いでしょう！」"
				CALL PRINT_STRW, @"「让米娅把女孩子的小心思都告诉你♪ 来吧、学习TIME到啦！」"
			CASE 1
				CALL PRINT_STRW, @"「这愿望、怪有意思的…某种程度上害挺难实现的」"
				CALL PRINT_STRW, @"「会帮你的啦、不过这可不是单靠魔法就能掌握的技巧哦」"
				CALL PRINT_STRW, @"「来吧！ 好好了解一下女孩子们的小心思！ 学完给我好好实践一下！」"
		ENDSELECT
	ENDIF
CASE "謎之魅力"
	;自分を相手にＨしてる最中にお願いされた
	IF COND("Ｈ最中の取引")
		;Ａ挿入中！
		IF INSERT("Ａ挿入相手") == MASTER
			SELECTCASE RAND:3
				CASE 0
					CALL PRINT_STRW, @"「呃！？ 明、明明%CNAME("阴茎")%还插在女孩子的尻穴里、突然说想变得更迷人什么的！？」"
				CASE 1
					CALL PRINT_STRW, @"「等、等一下！？ 这是应该在%CNAME("肛門性交")%过程中提出的愿望吗！？」"
				CASE 2
					CALL PRINT_STRW, @"「…い、いや、それは今頼む願いじゃないような……」"
			ENDSELECT
			PRINTL
			CALL PRINT_STR, @"（呲咻！！）"
			PRINTL
			CALL PRINT_STRW, @"「%TEXTR("啊哦/嗯恩恩/齁噢噢噢噢/哇啊/哈啊/哼嗯")%！！_HH_ 对、对不起！ 答、答应你了啦！」"
			CALL PRINT_STRW, @"「那、那么、失礼了…啾_HH_」"
			CALL PRINT_STRW, @"米娅が貴方の%TEXTR("頬/手の甲")%に接吻した直後、何かが変わったような気がした"
			PRINTL
			CALL PRINT_STRW, @"「啾、果然好难集中精神…_HH_」"
		;挿入してない
		ELSE
			SELECTCASE RAND:2
				CASE 0
					CALL PRINT_STRW, @"「啊啦啊啦、是想让米娅爱上你嘛？ %TEXTR("啊咧咧/哦吼吼/嘻嘻")%♪」"
				CASE 1
					CALL PRINT_STRW, @"「哎呀、让其他人更喜欢自己的魔法是有的、但是挑快高潮的时候拜托施术者本人什么的…」"
					CALL PRINT_STRW, @"「是有什么奇怪的癖好吗？ 算惹算惹…」"
			ENDSELECT
			CALL PRINT_STRW, @"「那么失礼了…啾_HH_」"
			CALL PRINT_STRW, @"米娅が貴方の%TEXTR("頬/額/手の甲")%に接吻した直後、何かが変わったような気がした"
			PRINTL
			CALL PRINT_STRW, @"「那么、%CNAME("二人称")%有没有感觉到什么变化呢、快点用H来实践一下吧_HH_」"
		ENDIF
	;通常状態
	ELSE
		SELECTCASE RAND:2
			CASE 0
				CALL PRINT_STRW, @"「不错的愿望啊！」"
				CALL PRINT_STRW, @"「比起让人觉得【真棒啊！】的魅力、还是【一直都这么棒呢！】那种魅力更瘦欢迎一点吧…」"
				CALL PRINT_STRW, @"「被人喜爱的欲望、找淫魔实现不是正好嘛♪」"
			CASE 1
				CALL PRINT_STRW, @"「哦呀、是这种愿望啊」"
				CALL PRINT_STRW, @"「想讨人喜欢也不算什么坏事…也是讴歌人生的诀窍之一的说♪」"
		ENDSELECT
		CALL PRINT_STRW, @"「那么失礼了…啾_HH_」"
		CALL PRINT_STRW, @"米娅が貴方の%TEXTR("頬/額/手の甲")%に接吻した直後、何かが変わったような気がした"
		PRINTL
		CALL PRINT_STRW, @"「虽说现在可能感觉不出来、不过周围的人对%CNAME("二人称")%的感观肯定会有变化啦_HH_」"
	ENDIF

CASE "性豪"
	;性豪が7以下
	IF TALENT:MASTER:性豪 <= 7
		CALL PRINT_STRW, @"「%TEXTR("哈啊/哇啊")%♪ %CNAME("二人称")%、%TEXTR("最棒了/真出色/最喜欢了")%～！_HH_」"
			SELECTCASE RAND:3
				CASE 0
					CALL PRINT_STRW, @"「对%TEXTR("淫魔/魅魔")%来说、这是最棒的愿望之一哦～♪」"
				CASE 1
					CALL PRINT_STRW, @"「这不是很清楚怎么让%TEXTR("淫魔/魅魔")%開心嘛～♪」"
				CASE 2
					CALL PRINT_STRW, @"「挺了解%TEXTR("淫魔/魅魔")%的嘛～♪」"
			ENDSELECT
			SELECTCASE RAND:3
				CASE 0
					CALL PRINT_STRW, @"「当然可以实现啦、绝对可以实现的啦～_HH_」"
				CASE 1
					CALL PRINT_STRW, @"「快点開始仪式吧！ 脱掉脱掉～♪ 把%CNAME("睾丸")%露出来～_HH_」"
				CASE 2
					CALL PRINT_STRW, @"「米娅也干劲满满的说～、弗弗♪」"
			ENDSELECT
		PRINTL
		CALL PRINT_STR, @"…"
		PRINTL
		CALL PRINT_STR, @"……"
		PRINTL
		CALL PRINT_STRW, @"貴方は促されるまま、米娅の眼前に睾丸を露出させた"
		PRINTL
		;性豪が2以下
		IF TALENT:MASTER:性豪 <= 2
			SELECTCASE RAND:2
				CASE 0
					CALL PRINT_STRW, @"「哼嗯、%CNAME("睾丸")%也不大嘛…」"
					CALL PRINT_STRW, @"「那就慢慢成长起来吧♪」"
				CASE 1
					CALL PRINT_STRW, @"「%CNAME("二人称")%现在还没法让人信赖的小%CNAME("睾丸")%、借米娅之手变得优秀起来吧♪」"
			ENDSELECT
			PRINTL
			CALL PRINT_STRW, @"「那就開始啦、可能会有点痒、请稍微忍耐一下～」"
			PRINTL
			SELECTCASE RAND:2
				CASE 0
					CALL PRINT_STRW, @"「…PeroPero_HH_」"
					CALL PRINT_STRW, @"米娅は貴方の睾丸を舐め上げた"
				CASE 1
					CALL PRINT_STRW, @"「…咕啾咕啾～_HH_」"
					CALL PRINT_STRW, @"米娅は貴方の睾丸を爪を立ててくすぐった"
			ENDSELECT
			CALL PRINT_STRW, @"直後、貴方の睾丸に熱がこもり、より精力的变成了実感を得た"
			PRINTL
			CALL PRINT_STRW, @"「哈啊、结束咯。辛苦啦！」"
			SELECTCASE RAND:2
				CASE 0
					CALL PRINT_STRW, @"「%CNAME("睾丸")%还小的时候只能这样做了啦～」"
					CALL PRINT_STRW, @"「…顺便一提、随着小家伙的成长、米娅会用上更多的色情技巧哟…库弗弗♪」"
				CASE 1
					CALL PRINT_STRW, @"「啊啦、%CNAME("睾丸")%稍微变大了一点呢～嘿嘿♪」"
					CALL PRINT_STRW, @"「啊对了对了、如果一直用仪式增大、最后变成【连内裤都穿不下去的超巨大%CNAME("睾丸")%！】哦」"
					CALL PRINT_STRW, @"「…没什么大不了的啦、放心吧★」"
			ENDSELECT
		;性豪が3以上4以下
		;元々随机分だったが、随机分する意味がなかったため、3と4のイコールに分岐させた
		ELSEIF TALENT:MASTER:性豪 == 3
			CALL PRINT_STRW, @"「%TEXTR("变得/已经")%相当%TEXTR("雄壮/健壮/大")%了呢_HH_」"
			CALL PRINT_STRW, @"「不过还有更%TEXTR("雄壮/健壮/大")%的余地哟～♪」"
			PRINTL
			CALL PRINT_STRW, @"「那就開始吧、要比一開始的过程稍长一点、请稍微多忍耐一下吧～」"
			PRINTL
			CALL PRINT_STRW, @"「…哈呜_HH_ …嗯啾、PeroPero_HH_」"
			CALL PRINT_STRW, @"米娅は貴方の睾丸に、何度も繰り返し甘噛みした"
			CALL PRINT_STRW, @"直後、貴方の睾丸に熱がこもり、術の前後で明らかな精力の違いを実感した"
			PRINTL
			CALL PRINT_STRW, @"「结束了哟。辛苦啦♪」"
			CALL PRINT_STRW, @"「库库、大小弹性重量都更棒了呢…」"
			CALL PRINT_STRW, @"「有点期待今天晚上的SEX了呢_HH_」"
		ELSEIF TALENT:MASTER:性豪 == 4
			CALL PRINT_STRW, @"「%CNAME("睾丸")%和之前比起来更%TEXTR("雄壮/健壮/大")%了呢_HH_」"
			CALL PRINT_STRW, @"「加把劲更%TEXTR("雄壮/健壮/大")%一点、更有男子气概一些吧_HH_」"
			PRINTL
			CALL PRINT_STRW, @"「那就開始吧、要比一開始的过程稍长一点、请稍微多忍耐一下吧～」"
			PRINTL
			CALL PRINT_STRW, @"「揉啊揉～_HH_ %CNAME("二人称")%不会疼嘛？ 那就保持着力度继续吧～♪」"
			CALL PRINT_STRW, @"米娅は温柔的丁重に、貴方の睾丸を揉み上げた"
			CALL PRINT_STRW, @"直後、貴方の睾丸に熱がこもり、術の前後で明らかな精力の違いを実感した"
			PRINTL
			CALL PRINT_STRW, @"「结束了哟。辛苦啦♪」"
			CALL PRINT_STRW, @"「库库、大小弹性重量都更棒了呢…」"
			CALL PRINT_STRW, @"「有点期待今天晚上的SEX了呢_HH_」"
		;性豪が5以上7以下
		ELSEIF TALENT:MASTER:性豪 >= 5 && TALENT:MASTER:性豪 <= 7
			SELECTCASE RAND:2
				CASE 0
					CALL PRINT_STRW, @"「嗅嗅…_HH_ %CNAME("睾丸")%好大、好烫啊…_HH_」"
					CALL PRINT_STRW, @"「还想变得更%TEXTR("雄壮/健壮/硕大")%点吗…%CNAME("二人称")%真贪心♪」"
				CASE 1
					CALL PRINT_STRW, @"「明明都有超人般精力了…还想着继续成长呢…」"
					CALL PRINT_STRW, @"「%CNAME("二人称")%是想让米娅被白浊塞满嘛～？ 库呼呼_HH_」"
			ENDSELECT
			PRINTL
			CALL PRINT_STRW, @"「那么就開始吧…接下来的仪式要慢慢地进行哦～」"
			CALL PRINT_STRW, @"「啊、事先说明一下、请好好忍住不要%CNAME("射精")%_HH_」"
			PRINTL
			SELECTCASE RAND:2
				CASE 0
					CALL PRINT_STRW, @"「…啾_HH_ …哈姆、哈姆、啾_HH_」"
					CALL PRINT_STRW, @"米娅は貴方の睾丸を咥え込み、口内であらゆる角度から執拗に何度も甘噛みした"
				CASE 1
					CALL PRINT_STRW, @"「揉揉_HH_ 要稍微用力一点了哟～_HH_」"
					CALL PRINT_STRW, @"米娅は貴方の睾丸を痛気持ちい程度に揉み上げた"
			ENDSELECT
			CALL PRINT_STRW, @"直後、貴方の睾丸に熱がこもり、かなり很强精力を得た事を実感した"
			PRINTL
			SELECTCASE RAND:2
				CASE 0
					CALL PRINT_STRW, @"「逐渐成长为超棒的%CNAME("睾丸")%了呢～♪」"
					CALL PRINT_STRW, @"「到最后会变成怎么样呢？_HH_」"
				CASE 1
					CALL PRINT_STRW, @"「现在的话可以射出超多的精液吧_HH_」"
					CALL PRINT_STRW, @"「之后好好试一下吧～♪」"
			ENDSELECT
		ENDIF
	;性豪が8
	ELSEIF TALENT:MASTER:性豪 == 8
		CALL PRINT_STRW, @"「啊啊…这一刻终于到来了吗…」"
		CALL PRINT_STRW, @"「现在%CNAME("二人称")%得精力已经到了超人的境界、这次是最后的强化惹」"
		CALL PRINT_STRW, @"「库库、%CNAME("二人称")%是第一个坚持到这一步的人哦…」"
		CALL PRINT_STRW, @"「那么请和往常一样、把%CNAME("睾丸")%露出来～噫♪」"
		PRINTL
		CALL PRINT_STR, @"…"
		PRINTL
		CALL PRINT_STR, @"……"
		PRINTL
		CALL PRINT_STRW, @"「…哼哼、仔细一下、真是相当健壮的%CNAME("睾丸")%呢…」"
		CALL PRINT_STRW, @"「都这么大了还追求更多的精力…%CNAME("二人称")%真是个贪婪的蓝人…」"
		CALL PRINT_STRW, @"「那就開始了哟～、迄今为止最浓厚最淫乱…黏糊糊的慢速仪式…_HH_」"
		PRINTL
		CALL PRINT_STRW, @"「请做好觉悟吧…失礼了…哈姆_HH_ 啾鲁_HH_」"
		CALL PRINT_STRW, @"说完米娅张嘴含住睾丸、開始了浓厚的施法"
		PRINTL
		CALL PRINT_STRW, @"「呜啾鲁、哈姆、嗯mmmm_HH_ 啾鲁鲁鲁_HH_」"
		CALL PRINT_STRW, @"米娅含住睾丸、用温热的舌頭无情地舔着每一个角落"
		CALL PRINT_STRW, @"同时、能感觉到睾丸里不断有一股热量带着什么东西逆流而上"
		PRINTL
		CALL PRINT_STRW, @"「哈姆哈姆、哇嗯_HH_ 口啾口啾…_HH_」"
		CALL PRINT_STRW, @"再加上睾丸勉强能忍受的轻咬"
		CALL PRINT_STRW, @"两颗精巢上下摩擦着相互碰撞、产生一股极大的快感"
		PRINTL
		CALL PRINT_STRW, @"「咕啾、啾…MuaMua…_HH_」"
		CALL PRINT_STRW, @"这一次、睾丸直接被吞到口内深处、精巢被挤压的仿佛要被揉碎一般"
		CALL PRINT_STRW, @"睾丸被痛苦和快感混合的奇妙感觉和不断逆流的未知热量所蹂躏"
		PRINTL
		CALL PRINT_STRW, @"「哼哼♪ 嗯、呜啾噜噜噜！」"
		CALL PRINT_STRW, @"米娅继续用牙齿玩弄睾丸…"
		PRINTL
		CALL PRINT_STRW, @"「嗯嗯嗯嗯～～…_HH_ 啵！！♪」"
		CALL PRINT_STRW, @"卵袋被拉长到极限后、嘴巴突然离開了"
		CALL PRINT_STRW, @"感受到本能无法忍受的、至今为止最强烈的热量逆流的瞬间"
		PRINTL
		CALL PRINT_STRW, @"「嘿嘿♪ 揉揉、捏捏～_HH_」"
		CALL PRINT_STRW, @"米娅が貴方の睾丸を握りしめ、強めに揉み上げてきた"
		PRINTL
		CALL PRINT_STRW, @"「请%CNAME("二人称")%再忍耐一下…」"
		CALL PRINT_STRW, @"「通过这样用力揉捏、才能化解注入魔力的热量…」"
		CALL PRINT_STRW, @"「不这么做的话、注入的魔力会在%CNAME("睾丸")%中凝固…对身体不好的…」"
		CALL PRINT_STRW, @"「所以请忍耐一下_HH_ 再忍一下吧_HH_」"
		CALL PRINT_STRW, @"米娅搓着你的两颗睾丸、继续用力地爱抚着"
		CALL PRINT_STRW, @"雄性的生存本能在持续的高温和快感的刺激中爆发、睾丸像火山爆发一般分泌精液"
		PRINTL
		CALL PRINT_STRW, @"「啊っ、好厉害…_HH_ 手上能感觉到%CNAME("睾丸")%在生产%CNAME("精液")%呢…_HH_」"
		CALL PRINT_STRW, @"「抱歉啦、很痛苦吧？ 很难受吧？ 但是、忍住啊…再忍一会…」"
		CALL PRINT_STRW, @"米娅は身を乗り出し、貴方の耳元で囁く"
		PRINTL
		CALL PRINT_STRW, @"「仪式结束之后、会让你狠狠地爽一发哦…」"
		CALL PRINT_STRW, @"「迄今为止最亲切地…比任何人都要全心全意地…为你提供人生中最棒的侍奉」"
		CALL PRINT_STRW, @"「在%CNAME("阴茎")%上一点一点…舔来舔去、啾咻啾咻…」"
		CALL PRINT_STRW, @"「一直到根部都用%CNAME("肛門")%吞掉…储存的臭烘烘%CNAME("精液")%、随你喜欢地尽情%CNAME("中出し")%到里面…_HH_」"
		CALL PRINT_STRW, @"「所以再忍耐一会…现在一定要忍住哦…_HH_」"
		PRINTL
		CALL PRINT_STRW, @"「%CNAME("二人称")%…要加油哦…_HH__HH_」"
		CALL PRINT_STRW, @"貴方は暫く米娅にされるがまま、睾丸の熱が冷めるまで悶絶し続けた"
		CALL PRINT_STRW, @"…"
		CALL PRINT_STRW, @"……"
		CALL PRINT_STRW, @"「%CNAME("二人称")%、辛苦啦…%CNAME("睾丸")%也冷静下来了、仪式大成功♪」"
		CALL PRINT_STRW, @"「……好厉害、%CNAME("二人称")%的%CNAME("睾丸")%…真不得了啊…_HH_」"
		CALL PRINT_STRW, @"貴方は落ち着きを取り戻した後、睾丸から今だかつてない、溢れんばかりの精力と活力を感じていた"
		CALL PRINT_STRW, @"而且雄性的本能也增强了、自信和性欲也提高了不少、心情相当舒爽"
		CALL PRINT_STRW, @"そんな貴方の成長し切った睾丸に米娅は興奮を隠せない様子を呈した"
		PRINTL
		CALL PRINT_STRW, @"「呜、呜哇…_／／／_ 啊、真的好厉害啊这个…_／／／_」"
		CALL PRINT_STRW, @"「好大好热、还这么强壮…_／／／_ 呜哇、好重！？」"
		CALL PRINT_STRW, @"「す、すごっ……ぱんっぱんに詰まってる…これ全部%CNAME("精液")%なんだっ、うわっはぁ…_HH_」"
		CALL PRINT_STRW, @"「嗯、味道也…嗯、嗅嗅！？_HH_ ……哈啊、有种特别的精臭_HH_」"
		CALL PRINT_STRW, @"「这、这样的…米娅也是第一次见、从没尝过呢…_HH_」"
		CALL PRINT_STRW, @"米亚像献媚的雌犬拿脸蹭着肉棒和卵袋、并恳求着"
		PRINTL
		CALL PRINT_STRW, @"「あの～これからも米娅にご奉仕させてくれますか…？_／／／_」"
		CALL PRINT_STRW, @"無論、貴方は迷い無く米娅の懇願を肯定した"
		PRINTL
		CALL PRINT_STRW, @"「太好啦！ 库库、以后的H绝对超级厉害的说_／／／_」"
		CALL PRINT_STRW, @"「话说回来、米娅真的是这种可怕精力的对手嘛…_HH_」"
		CALL PRINT_STRW, @"「那么…之后请多多関照、%CNAME("二人称")%…_HH_」"
		CALL PRINT_STRW, @"「……啾_HH_」"
		CALL PRINT_STRW, @"米娅在你的睾丸深吻一口、为提高精力的仪式画上句号"
	ENDIF

CASE "業物"
	;自分を相手にＨしてる最中にお願いされた
	IF COND("Ｈ最中の取引")
		;Ａ挿入中！
		IF INSERT("Ａ挿入相手") == MASTER
			;業物Ⅸになるとき
			IF TALENT:MASTER:業物 == 8
				CALL PRINT_STRW, @"「在%CNAME("肛門")%进行%CNAME("阴茎")%强化的最终仪式…不愧是%CNAME("二人称")%呀♪」"
				CALL PRINT_STRW, @"「んふふ♪ ではじっくりねっとり…精心慢慢地やりますよ～_HH_」"
				CALL PRINT_STRW, @"「あっ、途中で%CNAME("射精")%しちゃだめですよ？ やり直しになっちゃいますからね♪」"
				CALL PRINT_STRW, @"「まぁ米娅はOKですけどね★」"
				CALL PRINT_STRW, @"貴方は口で応える代わりに、米娅の直腸を阴茎でかき混ぜた"
				PRINTL
				CALL PRINT_STR, @"（咕溜咕溜…）"
				PRINTL
				CALL PRINT_STRW, @"「%TEXTR("嗯恩恩/齁噢噢噢")%～…！_HH_ 哈啊、不愧是%CNAME("二人称")%♪ 那就開始咯…请努力地忍耐吧～」"
				CALL PRINT_STRW, @"…"
				CALL PRINT_STRW, @"……"
				CALL PRINT_STRW, @"最後の%TEXTR("魔術/施術")%が完了し、米娅は人生で最高の業物を%CNAME("肛門_地文")%で堪能していた"
				PRINTL
				CALL PRINT_STRW, @"「啊…_HH_ 哇啊…_HH_ 嗯、嗯、啊啊啊啊…_HH_ 这、这么、激烈…_HH_」"
				CALL PRINT_STRW, @"「不硬也不软…热量适中…尺寸也正好…」"
				;馬根以上
				IF SIZE("阴茎", PLAYER) >= 3
					CALL PRINT_STRW, @"「んくっ…_HH_ 先っぽもすっごくイイ感じっ…お、奥に簡単に入りそうっ…_HH_」"
				;巨根以下
				ELSE
					CALL PRINT_STRW, @"「んくっ…_HH_ カリの尺寸も丁度いいっ、すっごくいい所に当たってくれるのが分かりますっ…_HH_」"
				ENDIF
				CALL PRINT_STRW, @"「な、なにこれっ……さいっこうの%CNAME("阴茎")%になんですけどっ…_HH_」"
				CALL PRINT_STRW, @"米娅の絶賛と共に熱くなっていく%CNAME("肛門_地文")%に、貴方は阴茎を猛々しく滾らせた"
				PRINTL
				CALL PRINT_STRW, @"「ぉっ…！？ ま、まだ大きくっ…！？」"
				;馬根以上
				IF SIZE("阴茎", PLAYER) >= 3
					CALL PRINT_STRW, @"激烈地勃起的事で亀頭と結腸口の角度が合うと、それだけで亀頭が結腸内に滑り込んだ"
					PRINTL
					CALL PRINT_STR, @"（啾溜）"
					PRINTL
					CALL PRINT_STRW, @"「んぉっ…！？！？_HH_ おっほぉ……！？_HH_」"
					CALL PRINT_STRW, @"「い、今っ、奥に入って…！？ う、うわぁ、でもぴったりぃ…！_HH_」"
					CALL PRINT_STRW, @"稳住顺利滑入深处的龟頭、在结肠内与肠壁完美地贴合、没留下一丝缝隙"
					CALL PRINT_STRW, @"只是这样、就为米娅带来了无与伦比的快感"
					PRINTL
					CALL PRINT_STRW, @"「呜…呜哇…_HH_ 好、好厉害的%CNAME("阴茎")%…！ 里面变成你的形状惹！_HH_」"
				;巨根以下
				ELSE
					CALL PRINT_STRW, @"貴方は試しに、米娅の直腸を少しピストンし、轻轻地攪拌してみた"
					PRINTL
					CALL PRINT_STR, @"（噗溜噗溜…咕溜咕溜…）"
					PRINTL
					CALL PRINT_STRW, @"「齁！？_HH_ 嗯mmm！？_HH_ 齁哦哦哦哦哦～っ！？_HH_」"
					CALL PRINT_STRW, @"米娅发出了从来没听过的%CNAME("あえぎ声_地文")%、直肠像绝顶前一样痉挛"
					PRINTL
					CALL PRINT_STRW, @"「……哈_HH_ 米、米娅…遇到不得了的%CNAME("阴茎")%呢…_HH_」"
				ENDIF
			;業物Ⅷ以下になるとき
			ELSE
				SELECTCASE RAND:3
					CASE 0
						CALL PRINT_STRW, @"「那么、为了达成愿望、得先用手好好爱抚一下%CNAME("阴茎")%呢…_HH_」"
						CALL PRINT_STRW, @"米娅の説明に意を介さず、貴方は阴茎で直腸をかき混ぜた"
						PRINTL
						CALL PRINT_STR, @"（咕溜咕溜…）"
						PRINTL
						CALL PRINT_STRW, @"「%TEXTR("嗯恩恩/齁噢噢噢")%～ーっ…！_HH_ 讨厌啦！ 那就这样继续吧！」"
						CALL PRINT_STRW, @"「はぁ…はぁ…でも、時間はかかちゃいますよっ…_／／／_」"
					CASE 1
						CALL PRINT_STRW, @"「知道了啦、会帮%CNAME("二人称")%实现的～♪」"
						CALL PRINT_STRW, @"「………え～と、念の為聞きたいのですが……%CNAME("阴茎")%は挿れたままで……？」"
						CALL PRINT_STRW, @"貴方は口で応える代わりに、米娅の直腸を阴茎でかき混ぜた"
						PRINTL
						CALL PRINT_STR, @"（咕溜咕溜…）"
						PRINTL
						CALL PRINT_STRW, @"「%TEXTR("んんん/んんぁ")%～ーっ…！_HH_ ですよね！ 分かってましたぁ！ %CNAME("二人称")%ったら相変わらずですねっ！」"
						CALL PRINT_STRW, @"「哈…哈啊…但是、会花更多时间哦_HH_」"
					CASE 2
						CALL PRINT_STRW, @"「勿論叶えますよ！……ちなみに、挿れたままでいいのですか？」"
						CALL PRINT_STRW, @"「要是仪式进行一半射出来、必须从頭開始的说…」"
						CALL PRINT_STRW, @"「要是因为%CNAME("肛門")%太舒服一直射出来的话、或许永远没法完成哦～？」"
						CALL PRINT_STRW, @"「和%CNAME("精液")%一起射出来的、还有你的灵魂哟？♪」"
						CALL PRINT_STRW, @"「即使这样、还要选择继续嘛？_HH_」"
						CALL PRINT_STRW, @"ニヤニヤと挑発してくる米娅に、貴方は口で応える代わりに直腸を突き上げた"
						PRINTL
						CALL PRINT_STR, @"（噗溜噗溜…！）"
						PRINTL
						CALL PRINT_STRW, @"「齁哦！_HH_ 嗯！_HH_ 就是这样♪」"
				ENDSELECT
				CALL PRINT_STRW, @"…"
				CALL PRINT_STRW, @"……"
				CALL PRINT_STRW, @"業物的%TEXTR("魔術/仪式")%完成后、米娅还在回味%CNAME("肛門_地文")%的触感"
				PRINTL
				SELECTCASE RAND:6
					CASE 0
						CALL PRINT_STRW, @"「啊…、呀啊……_HH_ 嗯、哼嗯_HH_ 哈、哈啊…」"
						CALL PRINT_STRW, @"「す、すっごく…すっごくいいですっ_HH_」"
					CASE 1
						CALL PRINT_STRW, @"「嗯…、嗯MMMM…！ 啊、嗯啊啊啊_HH_ 好、好厉害…」"
						CALL PRINT_STRW, @"「比、比刚才还要猛_HH_」"
					CASE 2
						CALL PRINT_STRW, @"「%TEXTR("哈啊/呼哇～/啊嗯")%…和刚才的感觉完全不一样捏！」"
						CALL PRINT_STRW, @"「库库♪ 有点期待之后的发展了呢_HH_」"
					CASE 3
						CALL PRINT_STRW, @"「啊咧？ 嗯～……？ 哈啊？ 好像没什么变化呢…」"
						CALL PRINT_STRW, @"这么说着的时候、米娅咕噜咕噜地压下腰、连阴茎根部都吞没了"
						PRINTL
						CALL PRINT_STR, @"（咕溜咕溜…）"
						PRINTL
						CALL PRINT_STRW, @"「齁哦哦哦哦哦～～…！？_HH_ 普通的磨蹭完全比不上这个啊！_HH_」"
					CASE 4
						CALL PRINT_STRW, @"「咦？ 没什么变化吗…抱歉、好像失败了呢……」"
						CALL PRINT_STRW, @"そう言った米娅だが、貴方は試しに轻轻地ピストンしてみた"
						PRINTL
						CALL PRINT_STR, @"（噗溜噗溜…！）"
						PRINTL
						CALL PRINT_STRW, @"「んっ！？_HH_ んぉおお！？！？_HH__HH_ せ、成功でしたっ！ つ、突かれると全然違ってましたっ！_HH_」"
					CASE 5
						CALL PRINT_STRW, @"「んんっ？ ん～～？ あれ……何も変わって無いような…」"
						CALL PRINT_STRW, @"「不好意思啊%CNAME("二人称")%、稍微再忍耐一下、请不要动…」"
						CALL PRINT_STRW, @"米娅闭上双眼、開始将意识集中在%CNAME("肛門_地文")%上"
						PRINTL
						CALL PRINT_STRW, @"「哈啊…稍微%TEXTR("变大了/粗壮了/长了/变热了/变硬了/粗了")%一点啊_HH_」"
						CALL PRINT_STRW, @"「んふふ、米娅じゃないと見逃しますね♪」"
				ENDSELECT
			ENDIF
		;挿入してない。記載予定无
		ELSE

		ENDIF
	;通常状態
	ELSE
		;業物Ⅸになるとき
		IF TALENT:MASTER:業物 == 8

		;業物Ⅷ以下になるとき
		ELSE
			CALL PRINT_STRW, @"「啊啦啦、%CNAME("二人称")%居然能提出这么棒的愿望嘛！」"
			CALL PRINT_STRW, @"「怎么可能拒绝呢♪ 那么请马上掏出%CNAME("阴茎")%吧～_HH_」"
			CALL PRINT_STRW, @"…"
			CALL PRINT_STRW, @"……"
			CALL PRINT_STRW, @"「库弗弗弗～♪ 失礼了……」"
			SELECTCASE RAND:8
				CASE 0
					CALL PRINT_STRW, @"「…咔姆_HH_」"
					CALL PRINT_STRW, @"米娅は%CNAME("阴茎_地文")%の%TEXTR("先端/亀頭")%を精心甘噛みした"
				CASE 1
					CALL PRINT_STRW, @"「揉揉～_HH_」"
					CALL PRINT_STRW, @"米娅は%CNAME("阴茎_地文")%を程よくマッサージした"
				CASE 2
					CALL PRINT_STRW, @"「…哈姆_HH_…PeroPero_HH_」"
					CALL PRINT_STRW, @"米娅は%CNAME("阴茎_地文")%を口に含み、尿道を舌で舐めまわした"
				CASE 3
					CALL PRINT_STRW, @"「…啾_HH_」"
					CALL PRINT_STRW, @"米娅は%CNAME("阴茎_地文")%の%TEXTR("先端/亀頭")%に温柔的接吻した"
				CASE 4
					CALL PRINT_STRW, @"「…PeroPero_HH_ 啾噜_HH_」"
					CALL PRINT_STRW, @"米娅は%CNAME("阴茎_地文")%を執拗に舐め上げた"
				CASE 5
					CALL PRINT_STRW, @"「咔哩咔哩～_HH_」"
					CALL PRINT_STRW, @"米娅は%CNAME("阴茎_地文")%を爪先でしつこく撫で上げた"
				CASE 6
					CALL PRINT_STRW, @"「咻～_HH_」"
					CALL PRINT_STRW, @"米娅は%CNAME("阴茎_地文")%をギリギリ痛くない程度に締め上げた"
				CASE 7
					CALL PRINT_STRW, @"「…%TEXTR("呼呜呜呜/哗呜呜呜")%_HH_」"
					CALL PRINT_STRW, @"米娅は%CNAME("阴茎_地文")%に生暖かい息を吹きかけた"
			ENDSELECT
			CALL PRINT_STRW, @"之后、%CNAME("阴茎_地文")%上下都在热了起来、有种在慢慢变化的感觉"
			PRINTL
			SELECTCASE RAND:8
				CASE 0
					CALL PRINT_STRW, @"「%TEXTR("哇/嗯")%…好像粗了一点啊…」"
					CALL PRINT_STRW, @"「尺寸比以前更合适了呢♪」"
				CASE 1
					CALL PRINT_STRW, @"「%TEXTR("哇/嗯")%…这个硬度、好棒…_HH_」"
					CALL PRINT_STRW, @"「有点期待之后的…_HH_」"
				CASE 2
					CALL PRINT_STRW, @"「%TEXTR("哇/嗯")%…变大了不少呢…」"
					CALL PRINT_STRW, @"「这个在里面抽插的话…会很舒服吧…_HH_」"
				CASE 3
					CALL PRINT_STRW, @"「嗯？ 嗅嗅、哈啊…嗅嗅嗅…_HH_」"
					CALL PRINT_STRW, @"「讨、讨厌、这么棒色情的雄臭…_HH_」"
				CASE 4
					CALL PRINT_STRW, @"「%TEXTR("哇/嗯")%♪ 比之前更烫了呢～♪」"
					CALL PRINT_STRW, @"「变得相当有活力呢_HH_」"
				CASE 5
					CALL PRINT_STRW, @"「形状比之前更好了呢…」"
					CALL PRINT_STRW, @"「%CNAME("阴茎")%越来越健康真是太好了♪」"
				CASE 6
					CALL PRINT_STRW, @"「%TEXTR("哇/嗯")%♪ 这个角度…好像翘起来了一点…」"
					CALL PRINT_STRW, @"「…呜、有、有些Play可以期待了呀…_HH_」"
				CASE 7
					CALL PRINT_STRW, @"「%TEXTR("哇/嗯")%…虽然看不出哪里有变化…」"
					CALL PRINT_STRW, @"「不过整体感觉变了不少呢…_HH_」"
			ENDSELECT
		ENDIF
	ENDIF

CASE "射精量強化"
	;自分を相手にＨしてる最中にお願いされた
	IF COND("Ｈ最中の取引")
		;Ａ挿入中！
		IF INSERT("Ａ挿入相手") == MASTER
			SELECTCASE RAND:3
				CASE 0
					CALL PRINT_STRW, @"「…呀啊！_HH_ %TEXTR("哈啊/齁哦哦/嗯mmm/呼呜")%、明明还在%CNAME("肛門性交")%呢…居然挑这种时候拜托什么的_HH_」"
					PRINTL
					CALL PRINT_STR, @"（呲咻！！）"
					PRINTL
					CALL PRINT_STRW, @"「%TEXTR("啊哦/嗯恩恩/齁噢噢噢噢/哇啊/哈啊/哼嗯")%！！_HH_ 对、对不起！ 答、答应你了啦！」"
				CASE 1
					CALL PRINT_STRW, @"「…咿呀！_HH__HH_ 这个愿望很棒的说！_HH_」"
					CALL PRINT_STRW, @"「当、当然会答应你的！ 米娅也超開心的！_HH_」"
				CASE 2
					CALL PRINT_STRW, @"「%TEXTR("哈啊/齁哦哦/嗯mmm/呼呜")%♪ 在%CNAME("肛門性交")%的时候、想着让%CNAME("睾丸")%再大一点什么的…最喜欢惹！_HH_」"
					PRINTL
					CALL PRINT_STR, @"（咕溜咕溜…）"
					PRINTL
					CALL PRINT_STRW, @"「…%TEXTR("啊/嗯/齁")%哦！_HH_ %TEXTR("啊/嗯/哈")%、%TEXTR("噫/嗯/呜")%~！_HH_ 又不是不答应你、不要猴急啊！_HH_」"
			ENDSELECT
			CALL PRINT_STRW, @"米娅保持着%CNAME("肛門_地文")%、只手伸向你的%CNAME("阴茎")%、%TEXTR("献媚般/恭敬")%地%TEXTR("爱抚这/抓握着/揉捏着")%"
			CALL PRINT_STRW, @"瞬时间、%TEXTR("睾丸/精巣")%膨胀起来、充满了精力"
			PRINTL
			SELECTCASE RAND:4
				CASE 0
					CALL PRINT_STRW, @"「射、射出来！_HH_ 元气满满的%CNAME("精液")%、在米娅的%CNAME("肛門")%里全部射出来！！_HH_」"
				CASE 1
					CALL PRINT_STRW, @"「%TEXTR("哈啊/嗯mmm")%、%TEXTR("はっ/はぁっ")%！ %TEXTR("power up/強化")%后的%CNAME("射精")%、已经等不及惹_HH_」"
				CASE 2
					CALL PRINT_STRW, @"「就、就这样！ 全部射到%CNAME("肛門")%里面！_HH_」"
					CALL PRINT_STRW, @"「已经没法忍耐啦！_HH_」"
				CASE 3
					CALL PRINT_STRW, @"「%TEXTR("哈啊/齁哦哦/嗯mmm/呼呜")%_HH_ %CNAME("射精")%会变成什么样呢…！」"
					CALL PRINT_STRW, @"「可以不用在意米娅、随意大社保嘛？_HH_」"
				CASE 4
					CALL PRINT_STRW, @"「%TEXTR("哈啊/齁哦哦/嗯mmm/呼呜")%、%CNAME("二人称")%真棒…」"
					CALL PRINT_STRW, @"「这样一来、就能在米娅的%CNAME("肛門")%里更多地%CNAME("射精")%了呢♪」"
			ENDSELECT
		;挿入してない
		ELSE
			CALL PRINT_STRW, @"「%TEXTR("嘛/哇哦")%！ 真是H的请求呢♪」"
			CALL PRINT_STRW, @"「不可能会拒绝的啦_HH_ 那么、失礼惹……」"
			SELECTCASE RAND:9
				CASE 0
					CALL PRINT_STRW, @"「…咔姆_HH_」"
					CALL PRINT_STRW, @"米娅は%TEXTR("睾丸/精巣")%を精心甘噛みした"
				CASE 1
					CALL PRINT_STRW, @"「揉揉～_HH_」"
					CALL PRINT_STRW, @"米娅は%TEXTR("睾丸/精巣")%を痛気持ち良い程度に揉み上げた"
				CASE 2
					CALL PRINT_STRW, @"「…哈姆_HH_ …PeroPero_HH_」"
					CALL PRINT_STRW, @"米娅は%TEXTR("睾丸/精巣")%を口に含み、じっくり舌で転がした"
				CASE 3
					CALL PRINT_STRW, @"「…啾_HH_」"
					CALL PRINT_STRW, @"米娅は%TEXTR("睾丸/精巣")%を温柔的接吻した"
				CASE 4
					CALL PRINT_STRW, @"「…PeroPero_HH_ 啾噜_HH_」"
					CALL PRINT_STRW, @"米娅は%TEXTR("睾丸/精巣")%を執拗に舐め上げた"
				CASE 5
					CALL PRINT_STRW, @"「咔哩咔哩～_HH_」"
					CALL PRINT_STRW, @"米娅は%TEXTR("睾丸/精巣")%を爪先でしつこく撫で上げた"
				CASE 6
					CALL PRINT_STRW, @"「咻～_HH_」"
					CALL PRINT_STRW, @"米娅は%TEXTR("睾丸/精巣")%をギリギリ痛くない程度に締め上げた"
				CASE 7
					CALL PRINT_STRW, @"「…%TEXTR("呼呜呜呜/哗呜呜呜")%_HH_」"
					CALL PRINT_STRW, @"米娅は%TEXTR("睾丸/精巣")%に生暖かい息を吹きかけた"
				CASE 8
					CALL PRINT_STRW, @"「虽然会有点痛、但只有一小会所以请忍耐一下吧～♪」"
					CALL PRINT_STRW, @"米娅は%TEXTR("睾丸/精巣")%をコリコリと握り、ギリギリ耐えられる程度にキツめに揉み上げた"
			ENDSELECT
			CALL PRINT_STRW, @"感觉到热量流入睾丸的深处、紧接着有种奇妙的力量从深处涌出"
			PRINTL
			CALL PRINT_STRW, @"「%TEXTR("哇哦/哇～/哈啊")%、和比刚才比起来、 %TEXTR("已经塞地满满的说/都有点堵住的感觉了呢/更大了呢/更重了呢")%♪」"
			CALL PRINT_STRW, @"「快点%TEXTR("来试试吧/射出来试试")%_HH_」"
		ENDIF
	;通常状態
	ELSE
		CALL PRINT_STRW, @"「%TEXTR("哇哦/哼哼")%っ！ 真是不错的请求呢♪」"
		CALL PRINT_STRW, @"「不可能会拒绝的啦_HH_ 那么、失礼惹……」"
		SELECTCASE RAND:9
			CASE 0
				CALL PRINT_STRW, @"「…咔姆_HH_」"
				CALL PRINT_STRW, @"米娅は%TEXTR("睾丸/精巣")%を精心甘噛みした"
			CASE 1
				CALL PRINT_STRW, @"「揉揉～_HH_」"
				CALL PRINT_STRW, @"米娅は%TEXTR("睾丸/精巣")%を痛気持ち良い程度に揉み上げた"
			CASE 2
				CALL PRINT_STRW, @"「…哈姆_HH_ …PeroPero_HH_」"
				CALL PRINT_STRW, @"米娅は%TEXTR("睾丸/精巣")%を口に含み、じっくり舌で転がした"
			CASE 3
				CALL PRINT_STRW, @"「…啾_HH_」"
				CALL PRINT_STRW, @"米娅は%TEXTR("睾丸/精巣")%を温柔的接吻した"
			CASE 4
				CALL PRINT_STRW, @"「…PeroPero_HH_ 啾噜_HH_」"
				CALL PRINT_STRW, @"米娅は%TEXTR("睾丸/精巣")%を執拗に舐め上げた"
			CASE 5
				CALL PRINT_STRW, @"「咔哩咔哩～_HH_」"
				CALL PRINT_STRW, @"米娅は%TEXTR("睾丸/精巣")%を爪先でしつこく撫で上げた"
			CASE 6
				CALL PRINT_STRW, @"「咻～_HH_」"
				CALL PRINT_STRW, @"米娅は%TEXTR("睾丸/精巣")%をギリギリ痛くない程度に締め上げた"
			CASE 7
				CALL PRINT_STRW, @"「…%TEXTR("呼呜呜呜/哗呜呜呜")%_HH_」"
				CALL PRINT_STRW, @"米娅は%TEXTR("睾丸/精巣")%に生暖かい息を吹きかけた"
			CASE 8
				CALL PRINT_STRW, @"「虽然会有点痛、但只有一小会所以请忍耐一下吧～♪」"
				CALL PRINT_STRW, @"米娅は%TEXTR("睾丸/精巣")%をコリコリと握り、ギリギリ耐えられる程度にキツめに揉み上げた"
		ENDSELECT
		CALL PRINT_STRW, @"感觉到热量流入睾丸的深处、紧接着有种奇妙的力量从深处涌出"
		PRINTL
		CALL PRINT_STRW, @"「%TEXTR("哇哦/哇～/哈啊")%、和比刚才比起来、 %TEXTR("已经塞地满满的说/都有点堵住的感觉了呢/更大了呢/更重了呢")%♪」"
		CALL PRINT_STRW, @"「%TEXTR("んふふ/いひひ")%♪ %TEXTR("今夜が楽しみですね/早く試してみたいですね/素敵っ")%_HH_」"
	ENDIF
CASE "巨根化"
	;これは"大きくなる前"のサイズなのに注意
	SELECTCASE CONDS("潜在的含む阴茎尺寸")
	CASE "短小"
		CALL PRINT_STRW, @"「米娅はちっちゃくて可愛い%CNAME("阴茎")%も好きだったんですけどね～」"
		CALL PRINT_STRW, @"「コンプレックスだったんですか？ まぁ、確かに普通が一番ですよね♪」"
	CASE "普通"
		CALL PRINT_STRW, @"「わっはぁ！ 素敵なサイズ成为了ねっ♪ うわぁ熱々…_HH_ そして太ぉ～い…_HH_」"
		CALL PRINT_STRW, @"「はぁぁああ…♪ 今夜がとっても楽しみです…_HH_」"
		CALL PRINT_STRW, @"米娅出神地不断亲吻着肉棒"
	CASE "巨根"
		IF EXP:結腸経験 >= 1
			CALL PRINT_STRW, @"「哈啊、来惹来惹♪ 这种超大号的…_HH_」"
			CALL PRINT_STRW, @"「这样的%CNAME("阴茎")%都能插到%TEXTR("結腸/最里面")%了吧…要受不了…_HH_」"
			CALL PRINT_STRW, @"「哈、哈啊…好、好期待…_HH_」"
		ELSE
			CALL PRINT_STRW, @"「哇啊…好粗、变得好大…」"
			CALL PRINT_STRW, @"「哼嗯！ 才没觉得越大越好啦！」"
			CALL PRINT_STRW, @"「………」"
			CALL PRINT_STRW, @"「…那个、稍微让米娅尝一口好不好嘛？_HH_」"
			CALL PRINT_STRW, @"大概是淫魔的本能吧、逞能的米娅还是屈服于超大号的肉棒下"
		ENDIF
	CASE "馬根"
		CALL PRINT_STRW, @"「啊啦啊啦、真是不得了…」"
		CALL PRINT_STRW, @"「不对、这种尺寸女孩子真的会舒服吗…？」"
		CALL PRINT_STRW, @"米娅は貴方の願いを聞き入れたことを後悔している様子だ"
	;腕並以上
	CASEELSE
		CALL PRINT_STRW, @"「………」"
		CALL PRINT_STRW, @"米娅一脸严肃地看着你的肉棒"
		PRINTL
		CALL PRINT_STRW, @"「这、这怎么弄啊？」"
		CALL PRINT_STRW, @"「これ入るの牛か馬くらいですよ？」"
		CALL PRINT_STRW, @"「说真的、%CNAME("二人称")%到底怎么想的」"
		CALL PRINT_STRW, @"米娅は割とマジのトーンで貴方を責め始めた"
	ENDSELECT
CASE "短小化"
	;これは"小さくなる前"のサイズなのに注意
	SELECTCASE CONDS("潜在的含む阴茎尺寸")
	CASE "普通"
		CALL PRINT_STRW, @"「きゃーーー！ かぁわいいいぃ！_HH_」"
		CALL PRINT_STRW, @"「哈啊～～っ_HH_ 好想一口吃下去！_HH_」"
	CASE "巨根"
		CALL PRINT_STRW, @"「咦！？ 明明是很棒的尺寸啊…」"
		CALL PRINT_STRW, @"「…不过、普通尺寸也很棒就是了」"
	CASE "馬根"
		IF EXP:結腸経験 >= 1
			CALL PRINT_STRW, @"「诶、要小一点？ 呜、知道了啦…」"
			CALL PRINT_STRW, @"貴方は何故米娅が残念そうにしているかを尋ねた"
			PRINTL
			CALL PRINT_STRW, @"「えっ！？ あっ、い、いやぁ～……そ、そのぉ～……_／／／_」"
			CALL PRINT_STRW, @"「%TEXTR("結腸/最深处")%被%TEXTR("抽插/直接中出/直接射满")%的…的感觉很棒……_／／／_」"
			CALL PRINT_STRW, @"「嘛、总之先按您的要求变小一点吧！」"
			CALL PRINT_STRW, @"「…不过、总有一天要变回来哦…人家还想再被那么肏…_HH_」"
		ELSE
			CALL PRINT_STRW, @"「要小一点吗？ 我知道了」"
			CALL PRINT_STRW, @"「………」"
			CALL PRINT_STRW, @"「…好、好可惜的说」"
		ENDIF
	;腕並、規格外
	CASEELSE
		CALL PRINT_STRW, @"「嗯、做出正确的决定了呢」"
		CALL PRINT_STRW, @"米娅は真顔で貴方の願いを聞き入れた"
	ENDSELECT
ENDSELECT

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

;汎用拒否
IF STRCOUNT(ARGS, "拒否")
	CALL PRINT_STRW, @"「んむぅ…非常抱歉が、お断りさせて頂きます…」"
;汎用取引（特に記述することがないならスキップ）
ELSEIF STRCOUNT(ARGS, "取引")

;汎用ＯＫ
ELSE
	CALL PRINT_STRW, @"「分かりました～、おっけーですよ！」"
ENDIF

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

SELECTCASE ARGS
CASE "一緒に出発"
	;初回
	IF SEVENT(ARGS) == 0
		CALL PRINT_STRW, @"「去成人商店嘛、好期待～_HH_」"
		CALL PRINT_STRW, @"「库库、%CNAME("二人称")%的性癖、米娅想好好了解一下哦♪」"
	;着替えてもらう
	ELSEIF CHECK_CLO("裸体") || CHECK_CLO("泳装姿") || CHECK_CLO("体操服姿") || CHECK_CLO("内衣姿")

	ELSE
		CALL PRINT_STRW, @"「明明平时怪小气的、结果意外的不排斥去成人商店呢～」"
		CALL PRINT_STRW, @"「就是因为这样、才能每一次都逛的開心啊♪」"
	ENDIF
CASE "目送"

CASE "没収胖次出発"
	;初回
	IF SEVENT(ARGS) == 0
		CALL PRINT_STRW, @"「呜～哇、真的要这么玩吗…」"
		CALL PRINT_STRW, @"「…不愧、不愧是你、米娅也有点性奋了」"
		CALL PRINT_STRW, @"「……呜、絶対会発情的、回去之后要好好地安慰我一下哦_HH_」"
	;既に没穿内褲
	ELSEIF EQUIP:胖次 == 0
		SELECTCASE RAND:2
			CASE 0
				CALL PRINT_STRW, @"「既に没穿内褲ですけど、このまま出かけるんですか？」"
				CALL PRINT_STRW, @"「もぉ～貴方の%TEXTR("変態/へんたい/変態")%_／／／_」"
			CASE 1
				CALL PRINT_STRW, @"「えぇ～没穿内褲で出かけるんですかぁ？_／／／_」"
				CALL PRINT_STRW, @"「%CNAME("二人称")%も中々良い趣味してるじゃないですか_HH_」"
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			CASE 0
				CALL PRINT_STRW, @"「ま、またですかっ…_／／／_」"
				CALL PRINT_STRW, @"「诶？ 才没有讨厌！ 不如说是超级性奋_HH_」"
			CASE 1
				CALL PRINT_STRW, @"「没穿内褲でエッチなお店に行かせるなんてっ…_／／／_」"
				CALL PRINT_STRW, @"「%CNAME("二人称")%这家伙真%TEXTR("変態/鬼畜")%…_HH_」"
			CASE 2
				CALL PRINT_STRW, @"「啊、那个…、等一下可以让米娅去结账嘛…？」"
				CALL PRINT_STRW, @"「…没穿内褲のままレジで店員桑に見られるの…結構興奮するんでっ…_／／／_」"
		ENDSELECT
	ENDIF
CASE "保持现在的装扮出発"
	IF CHECK_CLO("泳装姿")

	ELSEIF CHECK_CLO("体操服姿")

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

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

	ELSE
		CALL PRINT_STRW, @"「好啊～米娅来结账、再去挑点东西吧_HH_」"
		CALL PRINT_STRW, @"「…でも%TEXTR("ぷー太郎/ヒモ")%になってはダメですよ？」"
	ENDIF
CASE "询问有什么想要的东西"

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

	CASE "避孕套"
		;この商品を初めて買わされた
		IF SEVENT(STR:購入道具) == 0
			CALL PRINT_STRW, @"「诶…要买避孕套吗…」"
			CALL PRINT_STRW, @"「どうせ%CNAME("前穴")%は使わないんですよ？ こんなの要らないじゃないですかー」"
			CALL PRINT_STRW, @"かなり不満そうにしているが、貴方は構わず米娅に買わせた"
			PRINTL
			CALL PRINT_STRW, @"「ぶぅーぶぅーぶぅー！ 米娅とする時は使わないで下さいね！」"
			CALL PRINT_STRW, @"「留着和其他女孩子做爱的时候用吧！ 哼！」"
		ELSE
			SELECTCASE RAND:2
				CASE 0
					CALL PRINT_STRW, @"「哼ー哼ー！ 又让人家买避孕套！」"
					CALL PRINT_STRW, @"「都说了几次了、要在米娅尻穴里满满地无套中出！」"
				CASE 1
					CALL PRINT_STRW, @"「んむぅ…こんなもの要らないのに…え？ なぜ避孕套が嫌いかだって？」"
					CALL PRINT_STRW, @"「这样不是没法吸掉精液吗！ 这么简单的问题都要问！」"
					CALL PRINT_STRW, @"「避孕套是%TEXTR("淫魔/魅魔")%的敌人！」"
			ENDSELECT
		ENDIF
	;えっちな商品
	CASEELSE
		CALL PRINT_STRW, @"「%TEXTR("啊啦啊啦/哦呀哦呀")%…%TEXTR("这是/嘛嘛")%…」"
		CALL PRINT_STRW, @"「こういうのがお好きなんですねぇ…_HH_」"
	ENDSELECT
CASE "店内待機"
	;とりあえず何か一個買った時or33％で喋る
	SIF COND("買上品数") != 1 && RAND:3
		RETURN 0
	;胖次没収中
	IF COND("買い物胖次没収中")
		SELECTCASE RAND:3
			CASE 0
				CALL PRINT_STRW, @"「ノ、没穿内褲なのが店員桑にバレないかドキドキしましたっ…！_／／／_」"
				CALL PRINT_STRW, @"「……次はもっと攻めた露脐装超短裙でギリギリ探ってみません？_HH_」"
			CASE 1
				CALL PRINT_STRW, @"「い、いや～スリリングでしたねっ…_／／／_ こういう経験はあまり無かったですっ…_／／／_」"
			CASE 2
				CALL PRINT_STRW, @"「もしバレてたら店員桑どんな反応したんでしょうね…_／／／_」"
				CALL PRINT_STRW, @"「……そういえばアダルトショップ関係者でご奉仕してる方っていないなぁ」"
				CALL PRINT_STRW, @"「……今度わざとバレて店員桑を誘惑しちゃおうかな……%TEXTR("んふふ/いひひ")%_HH_」"
		ENDSELECT
	ELSE
		SELECTCASE RAND:2
			CASE 0
				CALL PRINT_STRW, @"「诶？ 这个大家伙是电动的！？」"
				CALL PRINT_STRW, @"「す、すごいですね…執念とか情熱とか……殿方の色んな想いを感じますね…」"
			CASE 1
				CALL PRINT_STRW, @"「あははっ！ 見て見て%CNAME("二人称")%～、胸部飞机杯がお試しで触れるみたいですよ♪」"
				CALL PRINT_STRW, @"「どれどれ～もみもみ～♪」"
				CALL PRINT_STRW, @"「……」"
				CALL PRINT_STRW, @"「…………」"
				CALL PRINT_STRW, @"「………………すごいなこれ………」"
				CALL PRINT_STRW, @"米娅は飞机杯の高過ぎる再現度に思わず感心している"
		ENDSELECT
	ENDIF
CASE "购物終了"
	;胖次没収中
	IF COND("買い物胖次没収中")
		CALL PRINT_STRW, @"「はぁぁ～～……_／／／_ ど、どきどきしたぁ…_／／／_」"
		CALL PRINT_STRW, @"「ね、ねぇ%CNAME("二人称")%…帰ったら米娅の相手をお願いしますねっ…_HH_」"
		CALL PRINT_STRW, @"かなり興奮していたのか、米娅の太ももに一筋の腸液が垂れていた"
	;なにも買わなかった
	ELSEIF COND("買上品数") == 0
		CALL PRINT_STRW, @"「没有要买的东西吗？」"
		CALL PRINT_STRW, @"「まぁ【買い物は一期一会】と言いますけど、気に入らない物を買ってもしょうがないですからね」"
	ELSEIF CHECK_CLO("泳装姿") || CHECK_CLO("体操服姿")

	ENDIF
ENDSELECT

path: ERB/EVENT_K/56 ミア/EVENT_K56_SHOP.ERB