code:
;-------------------------------------------------
; eraTheWorld 4.782用 ドレミー口上（キャラクターの名前を入れる、下にコンセプトなど一言あれば入れる）
;-------------------------------------------------
;他者による修正、加筆、改変については、同梱のライセンス条項に従ってください。
;
;すごい偏見だけど、ドレミーさんってフィアット500とか乗ってそう
;それで休日にサグメ連れてドライブに行って欲しい
;
;**** FlagManagement **********************************************************
;本口上にて使用しているCFLAG・TCVAR等
;
;CFLAG:109:1100～1103 その周回で一度だけ表示される日常系コマンド
;※CFLAG:109:1102はフェイシャルマッサージをドレミーに習ったか
;CFLAG:109:1104 妊娠願望
;TCVAR:109:350～354 一日一回デート中に天気のことを話す
;TCVAR:109:355～356 一日一回表示される日常系コマンド
;TCVAR:109:357 願掛け
;TCVAR:109:358 その日二回目に部屋に入る
;TCVAR:109:359 その日二回目に部屋から出る
;TCVAR:109:400 怒り口上
;
;******************************************************************************

;### 口上存在判定 ###################################
@M_KOJO_K109(ARG)
;ここでRESULTSを設定すると他の同キャラ口上を突っ込まれても正常動作する。

;RESULTS = _TEST_

;と設定すると、"EVENT"系イベントだと
;M_KOJO_TEST_EVENT_KX_1() とかで呼ばれる…はず。（未テスト機能）

;ここでCFLAG等のキャラ変数を使う場合、キャラ番号の指定が必要になります

;コメントアウトを外して眠姦口上有、時間停止口上有に1を入れると、それぞれ時間停止時、眠姦時、なりきり時にコマンド口上が読み込まれるように
;入れないと時間停止時、眠姦時、なりきり時は一切喋りません

;破瓜キャンセル口上有に1を入れると、@M_KOJO_EVENT_KX_LOST_VIRGIN_STOPでキャンセルの成否を操作できます
;口上内抱き寄せ判定_初回と口上内抱き寄せ判定_通常に1を入れるとM_KOJO_EVENT_KX_PERMISSIONで押し倒しの成否を操作できます

;Xにはキャラ番号を入れてください

;CFLAG:X:眠姦口上有 = 0

;一部書いてありますが未完成なのでオミット
CFLAG:109:時間停止口上有 = 0

;CFLAG:X:なりきり口上有 = 0
;CFLAG:X:破瓜キャンセル口上有 = 0
;CFLAG:X:口上内抱き寄せ判定_初回 = 0
;CFLAG:X:口上内抱き寄せ判定_通常 = 0

	IF TALENT:恋慕 || TCVAR:発情
		CFLAG:109:押し倒し禁止 = 0
	ELSE
		CFLAG:109:押し倒し禁止 = 1
	ENDIF

;口上存在判定です、けしてコメントアウトしないでください
RETURN 1
;### 口上色判定 ###################################
@M_KOJO_COLOR_K109

;ここでSETCOLORすることで口上に色を付けられます
SETCOLOR 0xEC3860

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"UPDATE判定"
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_UPDATE_K109
;口上独自のUPDATE用
;ENCOUNTER専用に独自分岐フラグを仕込んだ場合等にどうぞ
;UPDATE判定でCFLAG等のキャラ変数を使う場合、キャラ番号の指定が必要になります

IF CFLAG:109:1000 == 0
	PRINTL
	PRINTFORML ドレミーからの呼び名を変更しますか？
	PRINTL
	CALL ASK_M("はい",1 , "いいえ",1 , "もう変更しない",1)
	SELECTCASE RESULT
		CASE 0
			CALL NAME_SET_K109
		CASE 1
			PRINTFORMW 呼び名を変更する際はもう一度[UPDATE]を押してください
		CASE 2
			PRINTFORMW 了解しました
			CFLAG:109:1000 = 1
			RETURN 1
	ENDSELECT
	PRINTL
	PRINTFORML ついでに色々変更できます
	PRINTFORML ドレミーを………
	PRINTL
	CALL ASK_M("巨乳で母乳体質にする",1 , "朝型にする",1 , "そういうのいいです",1)
	SELECTCASE RESULT
		CASE 0
			PRINTFORMW おっぱいおっぱい
			TALENT:109:バストサイズ = 1
			TALENT:109:母乳体質 = 2
			RETURN 1
		CASE 1
			CFLAG:109:来訪時間 = 540
			CFLAG:109:帰宅時間 = 1140
			CFLAG:109:就寝時間 = 1380
			CFLAG:109:起床時間 = 360
			PRINTFORML ドレミーを６時起床２３時就寝に変更しました
			PRINTFORMW もう一度[UPDATE]を押すとリセットされます
			RETURN 1
		CASE 2
			PRINTFORMW 了解しました
			RETURN 1
	ENDSELECT
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K109
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
;経験の変更は齟齬が出る場合がありますので、CSVを修正し同梱する事を推奨します
;バイツァ・ダスト
IF FLAG:周回数
	PRINTFORMW 「良い夢は見れましたか？」
	PRINTFORMDW ビクリとして振り向くとそこには%CALLNAME:MASTER%が良く知る…夢の支配者が居た
	PRINTFORMW 「それとも貴方はまだベッドの上、未だ夢の中なのか……」
	PRINTFORMDW 妖しい笑みを浮かべる少女の姿に、%CALLNAME:MASTER%は冷や汗が浮かぶ
	PRINTFORMW 「…ふふっ、冗談ですよ…どちらにしても些末な事」
	PRINTFORMW 「私はドレミー・スイート、夢の支配者です。……そうだ、現世の貴方はなんと呼べば良いですか？」
	PRINTFORMW 「貴方の本当の名前は知っていますが……敢えて聞いておこうと思いまして」
	CALL NAME_SET_K109
	PRINTFORMW 「では%MASTERNAME:109%、以後お見知りおき」
	;スイート安眠枕を持っている
	IF ITEM:404 == 1
		PRINTFORMW 「そうだ、帰る前に……」
		PRINTFORMW 「ちゃんとチュートリアルを読了した%MASTERNAME:109%にご褒美をあげようと思いまして」
		PRINTFORMW 「…ふふ、驚いてますね？夢じゃなかったのか…と」
		PRINTFORMW 「確かに貴方に教示したのは夢の世界ですが…そこで終わらせるのは勿体ないでしょう？」
		PRINTFORMW 「…さあ、貴方の願いは？今ならば夢を叶えることができるかもしれませんよ？」
		CALL ASK_M("金くれ", 1, "抱かせろ", 1, "いらないです", 1)
		SELECTCASE RESULT
			CASE 0
				PRINTFORMW 「なんとも夢が無いというか…堅実的ですね」
				PRINTFORMW 「では、これを受け取ってください」
				PRINTFORMDW そう言うとドレミーはポチ袋を渡してきた。中身を覗くと……
				SELECTCASE RAND:3
					CASE 0
						SELECTCASE RAND:5
							CASE 0
								PRINTFORMDW １円が入っていた！
								CALL COLORMESSAGE(@"なんとドレミーから１円を貰った！",C_YELLOW,1,1)
								MONEY += 1
								PRINTFORMW 「さっき拾いました。いらないので貴方にあげますね」
							CASE 1
								PRINTFORMDW ５０００円が入っていた！
								CALL COLORMESSAGE(@"なんとドレミーから樋口を貰った！",C_YELLOW,1,1)
								MONEY += 5000
								PRINTFORMW 「彼女が生きていたら、一体どのような作品を生み出したのでしょうね」
							CASE 2
								PRINTFORMDW １０円が入っていた！
								CALL COLORMESSAGE(@"なんとドレミーから１０円を貰った！",C_YELLOW,1,1)
								MONEY += 10
								PRINTFORMW 「昭和２６年発行のギザ１０です。しかも未使用ですよ」
							CASE 3
								PRINTFORMDW １００００００円が入っていた！
								CALL COLORMESSAGE(@"なんとドレミーから札束を貰った！",C_YELLOW,1,1)
								MONEY += 1000000
								PRINTFORMW 「ふふ、おめでとうございます。良い夢が見れたようですね」
							CASE 4
								PRINTFORMDW １００円が入っていた！
								CALL COLORMESSAGE(@"なんとドレミーから１００円を貰った！",C_YELLOW,1,1)
								MONEY += 100
								PRINTFORMW 「美品の稲１００円銀貨です。額面以上の価値はあるかと」
						ENDSELECT
					CASE 1
						SELECTCASE RAND:5
							CASE 0
								PRINTFORMDW ５０円が入っていた！
								CALL COLORMESSAGE(@"なんとドレミーから５０円を貰った！",C_YELLOW,1,1)
								MONEY += 50
								PRINTFORMW 「５円チョコが１０枚も買えますよ。お得ですね」
							CASE 1
								PRINTFORMDW １０００円が入っていた！
								CALL COLORMESSAGE(@"なんとドレミーから野口を貰った！",C_YELLOW,1,1)
								MONEY += 1000
								PRINTFORMW 「少ない？文句を言わないでください」
							CASE 2
								PRINTFORMDW ５００カリスマ入っていた！
								CALL COLORMESSAGE(@"なんとドレミーから５００カリスマを貰った！",C_YELLOW,1,1)
								MONEY:2 += 500
								PRINTFORMW 「カジノで夢など見てみては？」
							CASE 3
								PRINTFORMDW １０００００円が入っていた！
								CALL COLORMESSAGE(@"なんとドレミーから給付金を貰った！",C_YELLOW,1,1)
								MONEY += 100000
								PRINTFORMW 「最近外の世界で配られたようなので、それに倣ってみました」
							CASE 4
								PRINTFORMDW １００００円が入っていた！
								CALL COLORMESSAGE(@"なんとドレミーから諭吉を貰った！",C_YELLOW,1,1)
								MONEY += 10000
								PRINTFORMW 「無駄遣いをしないように」
						ENDSELECT
					CASE 2
						SELECTCASE RAND:5
							CASE 0
								PRINTFORMDW １００カリスマ入っていた！
								CALL COLORMESSAGE(@"なんとドレミーから１００カリスマを貰った！",C_YELLOW,1,1)
								MONEY:2 += 100
								PRINTFORMW 「カジノで夢など見てみては？」
							CASE 1
								PRINTFORMDW １０００００００円が入っていた！
								CALL COLORMESSAGE(@"なんとドレミーから一千万円貰った！",C_YELLOW,1,1)
								MONEY += 10000000
								PRINTFORMW 「はぁ…枕の売り上げが……」
							CASE 2
								PRINTFORMDW ５００円が入っていた！
								CALL COLORMESSAGE(@"なんとドレミーから５００円を貰った！",C_YELLOW,1,1)
								MONEY += 500
								PRINTFORMW 「この機会に５００円玉貯金など始めてみては？」
							CASE 3
								PRINTFORMDW ５円が入っていた！
								CALL COLORMESSAGE(@"なんとドレミーから５円を貰った！",C_YELLOW,1,1)
								MONEY += 5
								PRINTFORMW 「これからもご縁がありますようにという願いを込めてみました」
							CASE 4
								PRINTFORMDW 子供銀行券が入っていた
								CALL COLORMESSAGE(@"%CALLNAME:MASTER%はそれを捨てた！",C_YELLOW,1,1)
								PRINTFORMW 「おや、気に入りませんでしたか？」
						ENDSELECT
				ENDSELECT
				RETURN 1
			CASE 1
				PRINTFORMDW ドレミーの全身を舐めるように見回した後、下卑た笑みを浮かべながら抱かせろと要求した
				PRINTFORMW 「抱かせろって……本気ですか？」
				PRINTFORMDW %CALLNAME:MASTER%はドレミーの肩を抱くと、物陰へと引き摺り込もうとする……
				PRINTFORMW 「あ…っ、ちょっと…ッ」
				PRINTFORMDL ………
				PRINTFORMDL ……
				PRINTFORMDW …
				IF ABL:MASTER:戦闘能力 >= 6
					PRINTFORMDL 物陰から男女の交わる音が聞こえてくる
					PRINTFORMDW 結局、ドレミーは%CALLNAME:MASTER%の力に敵わず無理矢理犯されてしまっていた
					CALL HPH_PRINT,@"「もう…ダメ…ッHPHこれ以上は…妊娠…ッHPH」","W"
					PRINTFORMDL %CALLNAME:MASTER%はドレミーの懇願を無視し、背後から何度も腰を打ち付ける
					PRINTFORMDW 元々素質があったのか、幾度も中出しされた淫壺はキュウキュウと肉棒を締め付け更なる種付けをねだってくる
					CALL HPH_PRINT,@"「ぁッHPHあぁッHPHまた、イッ―――きゅッッHPH HPH HPH」","W"
					PRINTFORMDL ドレミーが達すると同時に%CALLNAME:MASTER%も精を放つ
					PRINTFORMDW 射精しながら腰を動かし隅々まで遺伝子を塗り付けてやると、それだけでドレミーは腰砕けになり座り込んでしまった
					CALL HPH_PRINT,@"「はぁ―――ッHPH…はぁ―――ッHPH…ん、ぢゅる…っHPH」","W"
					PRINTFORMDL 引き抜かれたことで露わになった一物は未だ硬く勃起し、互いの体液でぬらぬらとテカっている
					PRINTFORMDW それをドレミーの頬に押し付けると、すっかり調教された彼女は当然のようにそれを咥え恭しくしゃぶりだした……
					PRINTFORMDL ………
					PRINTFORMDL ……
					PRINTFORMDW …
					PRINTFORMDW 行為が終わり身なりを整えると、%CALLNAME:MASTER%はドレミーに向き直りセフレになれと命令する
					CALL HPH_PRINT,@"「……それが、貴方の望みでしたら……HPH」","W"
					PRINTFORMDW 精液のたっぷり詰まったお腹を撫でながら、一匹の堕ちた雌は艶っぽく微笑んだ
					IF !TALENT:MASTER:非童貞
						FONTBOLD
						SETCOLOR 255,100,255
						PRINTFORMW 童貞喪失
						FONTREGULAR
						RESETCOLOR
						TALENT:MASTER:非童貞 = 1
					ENDIF
					IF TALENT:109:処女 == 1
						CALL SET_HISTORY_LOST_V(109, MASTER, "ペニス")
						SETCOLOR 247,171,166
						PRINTFORMW 処女喪失
						RESETCOLOR
					ENDIF
					CALL COLORMESSAGE(@"ドレミーの合意を得た",C_YELLOW,2)
					SETBIT CFLAG:109:既成事実 , 1
					TALENT:109:セフレ = 1
					CALL ADD_SAMEN_V(109, BASE:MASTER:精力)
					EXP:109:精液経験 += 5
					EXP:109:膣射経験 += 5
					EXP:109:Ｖ性交経験 += 5
					EXP:109:絶頂経験 += 4
					EXP:MASTER:絶頂経験 += 4
					EXP:MASTER:射精経験 += 5
					EXP:MASTER:挿入経験 += 5
					PALAM:潤滑 += 10000
				ELSE
					PRINTFORMDW 押し倒そうとするが思ったより力が強く、%CALLNAME:MASTER%は無様にも投げ飛ばされてしまった
					PRINTFORML 「残念でしたね。今日の所は大目に見ますが…代わりに貴方にはお説教をプレゼントしましょう」
					PRINTFORMDW ………
					PRINTFORMDW お説教の悪夢から解放された時には、%CALLNAME:MASTER%は心身共に疲れ果てていた……
					BASE:MASTER:体力 -= 1000
					BASE:MASTER:気力 -= 1000
				ENDIF
				RETURN 1
			CASE 2
				PRINTFORML 「随分と謙虚なんですね」
				PRINTFORMDW %CALLNAME:MASTER%の謙虚な姿勢はドレミーに好印象を与えたようだ
				CALL CHANGE_CFLAG(2, 109, 100)
				RETURN 1
		ENDSELECT
	ENDIF
;月でドレミーと会った
ELSEIF MAIN_MAP == 10 || (CFLAG:MASTER:現在位置 / 100) == 10
	PRINTFORMW 「どうやら哀れな子羊が迷い込んだようですね」
	PRINTFORMDL 不意に声を掛けられ、驚いて周囲を見回す%CALLNAME:MASTER%
	PRINTFORMDW 見上げると、そこには頭にサンタ帽のようなものを被った奇抜な恰好の少女がこちらを見下ろしていた
	PRINTFORMW 「さて、どこに行こうというのでしょうかねぇ」
	PRINTFORMDW %CALLNAME:MASTER%は怪しい者じゃないと名を名乗った……
	CALL NAME_SET_K109
	PRINTFORMW 「ははぁ、貴方が噂の…私はドレミー・スイート。夢の世界の支配者です。以後お見知りおきを」
	PRINTFORMDL そう名乗った彼女はスカートの裾を軽く持ち上げて挨拶すると、ニタァと何とも言えない笑みを浮かべ近付いてきた
	PRINTFORMDW %CALLNAME:MASTER%は目の前の少女が只者ではないと感じながら、彼女とどう付き合っていくかの算段を立て始めた
;月以外
ELSE
	PRINTFORMDL %CALLNAME:MASTER%が歩いていると、頭にサンタ帽を被り白黒のボンボンのついたワンピースを着た少女が目についた
	PRINTFORMDW 興味を持った%CALLNAME:MASTER%が彼女に近付くとふっとこちらに振り向く
	PRINTFORMW 「おや、貴方は……現世で会うのは初めてですね」
	PRINTFORMDW はて彼女とは初対面のはずだが……そう思っていると
	PRINTFORMW 「貴方のことはよく知っていますよ。最も貴方は私を知らないかもしれませんが」
	CALL NAME_SET_K109
	PRINTFORMW 「%MASTERNAME:109%。それが貴方の名前ですよね？」
	PRINTFORMW 「私は獏のドレミー・スイート。夢の世界の住人です。以後お見知りおきを」
	PRINTFORMDL そう名乗ると彼女はニタァと底の見えない不敵な笑みを浮かべた
	PRINTFORMDW %CALLNAME:MASTER%は得体の知れない少女に多少の恐怖心を感じながらも、よく見れば容姿が整っていることに気が付いた……
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;デート帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K109_1(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
;地の文
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
IF LOCAL
	PRINTFORMDL デートの帰り道、二人で並んで歩いているとドレミーの足取りが覚束無くなる
	PRINTFORMDW どうかしたのか？と言いながらドレミーに向き直ると――
	PRINTFORMW 「…ん…」
	PRINTFORMDW ほんの一瞬、二人の唇が重なり合う。顔を離したドレミーはその熱を確認するようにゆっくりと唇を指でなぞっている
	PRINTFORMW 「キスの味はレモン味と聞いていましたが、全くの無味ですねぇ」
	PRINTFORMW 「ちなみにキスの夢はなんとも甘酸っぱい味がするのですよ」
	PRINTFORMDW そう言うとドレミーは呆然とする%CALLNAME:MASTER%を置いて去っていった
	PRINTFORMDW 去り際に見えたドレミーの顔は、サンタ帽のように真っ赤に染まっているように見えた
	PRINTL
	PRINTFORMW (……はぁ…やってしまったわね…)
	PRINTW
	;キスをキャンセルしたい場合は以下を開放
	;TCVAR:キスキャンセル = 1
RETURN 1
ENDIF

;==================================================
;デート帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K109_2(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_2(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;告白内容
	;この告白内容表示後に受けるかどうかの選択分が表示されます
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		;初回
		IF FIRSTTIME("告白")
			PRINTL
			PRINTFORMDW デートを終え帰路に付く途中、ドレミーが%CALLNAME:MASTER%の手を握ってきた
			PRINTFORMW 「……どうしても伝えたい事が」
			PRINTFORMDW 普段とは違う真剣な様子に%CALLNAME:MASTER%は足を止めドレミーに向き直る
			PRINTFORMDW 辛抱強く待っていると意を決したのかドレミーが口を開いた
			PRINTW
			PRINTFORMW 「最近、%MASTERNAME:109%と一緒に居ることが増えましたよね」
			PRINTFORMW 「それが、とても楽しいんです」
			PRINTFORMW 「同時に、とても苦しくて……」
			PRINTFORMW 「……私、貴方に恋をしてしまったみたいです」
			PRINTFORMW 「私だけを見て欲しい。私だけを愛して欲しい…」
			PRINTFORMW 「…だから…」
			PRINTW
			PRINTFORMW 「…私に夢を、見させてくれませんか…？」
		;前回振った
		ELSE
			PRINTL
			PRINTFORMDW  デートの帰路。後ろを歩いていたドレミーが%CALLNAME:MASTER%の袖を掴んでくる
			PRINTW
			PRINTFORMW 「%MASTERNAME:109%…やっぱり私、諦めきれない」
			PRINTFORMW 「貴方のことが好きなの。貴方のことを考えると胸が苦しいの」
			PRINTFORMW 「だから……お願い…私を、愛して…」
			PRINTFORMDW ドレミーはそう言うと、震えながら%CALLNAME:MASTER%に縋りついてきた…
		ENDIF
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTL
		PRINTFORMW 「…あぁ…」
		PRINTW
		PRINTFORMDW ドレミーは感極まったように声を震わせると%CALLNAME:MASTER%に抱き着いてきた
		PRINTFORMW 「夢が叶うって、こんなにも嬉しいものなのね…」
		PRINTFORMDW ………
		PRINTFORMDL 晴れて恋人同士となった二人は互いに寄り添い家路につく
		PRINTFORMDW 本当に自分で良かったのか？そう聞くとドレミーは俯きながらポツポツと喋りだした
		PRINTFORMW 「…ずっと悩みましたよ」
		PRINTFORMW 「夢の支配者と現世の住人、人間と妖怪…相容れる筈もありません。一時は貴方の前から姿を消そうかとも思いました」
		PRINTFORMW 「それでも……%MASTERNAME:109%じゃなきゃダメなんです。だって愛してしまったから……」
		PRINTFORMW 「だから……貴方が私を忘れてしまうその日まで、恋人で居させてくださいね」
		PRINTFORMDW ドレミーは一瞬悲し気な表情を見せるが、すぐに飄々とした顔に戻ると%CALLNAME:MASTER%の唇にそっと自らのものを重ねた
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMDW 付き合うことはできない
		PRINTFORMDW その言葉を聞いたドレミーはどこか悲し気に目を伏せる
		PRINTFORMW 「…私が妖怪だからですか」
		PRINTFORMW 「私が――ッ」
		PRINTFORMDL 一瞬、時が止まったような静寂が訪れる
		PRINTFORMDW %CALLNAME:MASTER%は居ても立ってもいられなくなり、ドレミーの唇に自らのものを重ねていた
		PRINTFORMW 「んんっ……ふ…ちゅっ…はぁ…はぁ…」
		PRINTFORMDW ドレミーの身体を離す。呆然と立ち尽くす彼女の手を握り%CALLNAME:MASTER%は歩き出した
		PRINTFORMW 「……やっぱり、ズルいですね。貴方は」
		EXP:109:キス経験 ++
		EXP:MASTER:キス経験 ++
	RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;デート帰り
;==================================================
@M_KOJO_SPEVENT_K109_3(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_3(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		IF TALENT:恋人
			SELECTCASE RAND:3
				CASE 0
					PRINTFORMDL 別れ際、名残惜しさを感じた%CALLNAME:MASTER%はドレミーを抱き寄せ口付けを交わした
					CALL HPH_PRINT,@"「ん…HPH…すぐに会えますよ。ね？」","W"
				CASE 1
					PRINTFORML 「さて、ここでお開きですね」
					PRINTFORMDL %CALLNAME:MASTER%がすぐに会えるかと聞くと、ドレミーは優しく頭を撫でてきた
					PRINTFORML 「私はいつでも傍に居ますよ。夢の中でも、ね」
					PRINTFORMDW そのまま%CALLNAME:MASTER%の額にキスをすると、耳元で『また後で』と囁き帰っていった
				CASE 2
					PRINTFORML 「ふぅ…少しはしゃぎすぎましたね」
					PRINTFORMDL デート終わり、ドレミーは疲れたのか%CALLNAME:MASTER%にもたれ掛かってきた
					PRINTFORMW 「あそこに丁度良い物陰があるので……少し休んでいきませんか？」
					PRINTFORMDL ………
					PRINTFORMDL ……
					PRINTFORMDW …
					CALL HPH_PRINT,@"「もう、服に皺が…HPH」","W"
					PRINTFORMDW 少しばかり長い休憩を終え、ドレミーと別れた
					EXP:109:Ｃ経験 += 2
					EXP:109:Ｂ経験 += 2
					EXP:109:絶頂経験 += 1
					EXP:109:キス経験 ++
					EXP:MASTER:キス経験 ++
					EXP:MASTER:手淫経験 += 2
					PALAM:潤滑 += 1000
			ENDSELECT
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「はぁ、楽しかった。%MASTERNAME:109%のエスコートのお陰かしら」
					PRINTFORMDL 照れるからやめて欲しいと言うとドレミーは悪戯っぽく笑った
					PRINTFORML 「ははぁん、ならもっと言ってあげますよ」
					PRINTFORMDW 暫く会話を楽しんだ後、手を振り別れた
				CASE 1
					PRINTFORML 「…よし、と」
					PRINTFORMDL 別れ際、ドレミーは手帖にスラスラと何かを書き込んでいた
					PRINTFORMW 「……ん、これですか？今日の出来事を忘れないようにと思いまして…」
					PRINTFORMDW ドレミーは手帖を閉じると『また誘ってください』と言い去っていった
				CASE 2
					PRINTFORML 「また誘ってくれますか？」
					PRINTFORMDL %CALLNAME:MASTER%は明日デートしようと即答する
					PRINTFORML 「急ですねぇ…でも良いですよ」
					PRINTFORMDW ドレミーとデートの約束をして別れた
					CFLAG:109:翌日来訪 = 1
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「ふぅ…デートって意外と疲れますね」
					PRINTFORML 「…楽しくなかったのかって？…違いますよ。…ほら、分かるでしょう？」
					PRINTFORMDW %CALLNAME:MASTER%が首を傾げると、ドレミーは『分からないならいいです』と言い去っていった
				CASE 1
					PRINTFORML 「今日はありがとうございました」
					PRINTFORMDL %CALLNAME:MASTER%は楽しかったかとドレミーに聞いてみた
					PRINTFORML 「そうですねぇ…%TEXTR("２０/３０/５０/")%点といった所でしょうか。……なんて嘘ですよ。楽しかったです」
					PRINTFORMDW ドレミーは小さく手を振ると夢の世界へ帰っていった
				CASE 2
					PRINTFORML 「良い気分転換になりました」
					PRINTFORMDL どうやらドレミーはデートを楽しめたようだ。その表情は明るい
					PRINTFORMW 「それでは、良い夢を」
			ENDSELECT
		ENDIF
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
			PRINTFORML 「もう怒っていませんよ。本当です」
			PRINTFORMDW どうやら機嫌を直してくれたようだ
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
			PRINTFORML 「どうやら反省しているようですね。その調子ですよ」
			PRINTFORMDW あと一押しといったところか
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印3>2レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
			PRINTFORML 「必死さが伝わってきましたよ。ですがまだ足りませんね」
			PRINTFORMDW まだ許してくれないらしい
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;遭遇時関数
;==================================================
@DOREMY_ENCOUNTER
;DAY:2で季節を選択
SELECTCASE DAY:2
	;春
	CASE 1
		;TIME:2で朝昼晩を選択
		SELECTCASE TIME:2
			;朝
			CASE 1,2
				PRINTFORML 「おはようございます。%MASTERNAME:109%」
				PRINTFORML 「といっても、私はもうすぐ休むのですが…」
				PRINTFORMDW ドレミーは申し訳なさそうだ
			;昼
			CASE 3,4
				PRINTFORML 「こんにちは。%MASTERNAME:109%」
				PRINTFORML 「最近は暖かく過ごしやすいからか、夢の世界の住民も落ち着いています」
				PRINTFORMW 「というわけで、暇なのでデートにでも行きませんか？」
			;夜
			CASE 5,6,7
				PRINTFORML 「こんばんは。%MASTERNAME:109%」
				PRINTFORML 「これから眠る所ですか？それとも今起きたところ？」
				PRINTFORMW 「寝る前には白湯を飲むと心地よい眠りに就くことができますよ」
		ENDSELECT
	;夏
	CASE 2
		SELECTCASE TIME:2
			;朝
			CASE 1,2
				PRINTFORML 「おはようございます。%MASTERNAME:109%」
				PRINTFORMW 「この時間帯はまだ涼しくて何かしらの活動をするには最適ですね」
			;昼
			CASE 3,4
				PRINTFORML 「こんにちは。%MASTERNAME:109%」
				PRINTFORML 「…ふぅ…暑いですねぇ…」
				PRINTFORMDW 汗で張り付いた衣服がなまめかしい
			;夜
			CASE 5,6,7
				PRINTFORML 「こんばんは。%MASTERNAME:109%」
				PRINTFORML 「昨夜、うなされていましたね」
				PRINTFORMW 「早く涼しくなってくれると良いのですが……」
		ENDSELECT
	;秋
	CASE 3
		SELECTCASE TIME:2
			;朝
			CASE 1,2
				PRINTFORML 「おはようございます。%MASTERNAME:109%」
				PRINTFORMW 「涼しくなってきましたね。体調を崩さないように気を付けてください」
			;昼
			CASE 3,4
				PRINTFORML 「こんにちは。%MASTERNAME:109%」
				PRINTFORMW 「行楽シーズンですね。紅葉狩りにでも行きますか？」
			;夜
			CASE 5,6,7
				PRINTFORMW 「こんばんは。%MASTERNAME:109%」
				PRINTFORML 「秋と言えばお月見ですが…」
				PRINTFORML 「平安時代の貴族は直接月を見るのではなく盃に映った月を見て楽しんだと言われています」
				PRINTFORMDW いきなりうんちくかよ？ ドレミーらしいな
		ENDSELECT
	;冬
	CASE 4
		SELECTCASE TIME:2
			;朝
			CASE 1,2
				PRINTFORML 「おはようございます。%MASTERNAME:109%」
				PRINTFORML 「うぅ…冷えますねぇ…」
				PRINTFORMW ドレミーの手を優しく包んでやると、彼女は顔を赤くして微笑んだ
			;昼
			CASE 3,4
				PRINTFORML 「こんにちは。%MASTERNAME:109%」
				PRINTFORML 「寒いので暖を取らせてもらいますね」
				PRINTFORMDW そう言うとドレミーは%CALLNAME:MASTER%に寄り添ってきた
			;夜
			CASE 5,6,7
				PRINTFORML 「こんばんは。%MASTERNAME:109%」
				PRINTFORMDL ドレミーの手が頬に触れる。その冷たさに思わずビクッとしてしまう
				PRINTFORMW 「ふふっ、可愛い反応ですね」
		ENDSELECT
ENDSELECT

;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_EVENT_K109_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;仕事中ではなく、今日会ってない。
	IF !TCVAR:109:今日会ったか
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;正月、バレンタイン、ハロウィン、クリスマスの場合
		IF (DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1) || (DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000) || (DAY:2 == 3 && DAY:3 == 30) || (DAY:2 == 4 && DAY:3 == 25)
			CALL SPECIALDAY_EVENT_K109
		ELSEIF CFLAG:318 == 1
			PRINTFORML 「今はちょっと話す気になれませんね」
			PRINTFORMDW ドレミーはムスっとしている
		;同棲してる
		ELSEIF CFLAG:MASTER:初期位置 == CFLAG:109:初期位置
			PRINTFORML 「%MASTERNAME:109%、どこに行っていたのですか？」
			PRINTFORML 「どこでもいいだろって？ふふ、まあ確かにそうなのですが……」
			PRINTFORML 「貴方が怪我でもしていないか、心配だったもので」
			PRINTFORMDW ドレミーはそれだけ言うと%CALLNAME:MASTER%の傍に寄り添った
		ELSEIF TALENT:恋慕
			CALL DOREMY_ENCOUNTER
		ELSE
			SELECTCASE TIME:2
				;朝
				CASE 1,2
					PRINTFORML 「おや、おはようございます」
					PRINTFORML 「早起きですねぇ…それとも今から寝るところですか？」
					PRINTFORMW 「より良い睡眠は規則正しい生活から。昼夜逆転は直したほうが身の為ですよ」
				;昼
				CASE 3,4
					PRINTFORML 「こんにちは。%MASTERNAME:109%」
					PRINTFORML 「この時間帯は仕事が少なくて暇なので色々見て回ってました」
					PRINTFORMW 「%MASTERNAME:109%は何を？」
				;夜
				CASE 5,6,7
					PRINTFORML 「こんばんは。%MASTERNAME:109%」
					PRINTFORML 「仕事をしなくていいのかって？分身に任せているので大丈夫ですよ」
					PRINTFORMDW 分身できたら色々と捗りそうだと%CALLNAME:MASTER%は思った
			ENDSELECT
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;TARGETが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;正月、バレンタイン、ハロウィン、クリスマスの場合
		IF (DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1) || (DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000) || (DAY:2 == 3 && DAY:3 == 30) || (DAY:2 == 4 && DAY:3 == 25)
			CALL SPECIALDAY_EVENT_K109
		ELSEIF CFLAG:318 == 1
			PRINTFORML 「%CALLNAME:MASTER%…」
			PRINTFORMDW ドレミーはムスっとしている
		;同棲してる
		ELSEIF CFLAG:MASTER:初期位置 == CFLAG:109:初期位置
			PRINTFORML 「おや、ここに居たのですか」
			PRINTFORML 「突然どこかに行ってしまうから、探していたのですよ？」
			PRINTFORMDW ドレミーはそれだけ言うと%CALLNAME:MASTER%の傍に寄り添った
		ELSEIF TALENT:恋慕
			CALL DOREMY_ENCOUNTER
		ELSE
			SELECTCASE RAND:3
				CASE 0
					CALL HPH_PRINT,@"「来ちゃったHPH」","W"
					PRINTFORML 「ふふ、言ってみたかったんですよね。じゃあ私はこれで…」
					PRINTFORMDW %CALLNAME:MASTER%は帰ろうとするドレミーを引き留めた
				CASE 1
					PRINTFORML 「おや、奇遇ですね」
					PRINTFORMDL ドレミーはこちらを見止めると、飄々とした表情を崩さぬまま近付いてきた
					PRINTFORML 「なぜここにって？想像にお任せしますよ」
					PRINTFORMDW 自分に会いに来たと都合の良いように想像しておいた
				CASE 2
					PRINTFORML 「また会いましたね」
					PRINTFORMDW ドレミーはこちらを見ている
			ENDSELECT
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて一緒に入る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋慕
			PRINTFORMW 「%MASTERNAME:109%。入ってたのね」
			PRINTFORMDL 風呂の戸が開くと、一糸纏わぬ姿のドレミーが入ってきた
			PRINTFORMDL 普段は服装のからは想像できないとても魅力的な肢体を惜し気もなく晒している
			PRINTFORML 「ご一緒しても？」
			PRINTFORMDW 笑顔で近付いてくるドレミーの姿に%CALLNAME:MASTER%は一も二もなく頷いた
		ELSE
			PRINTFORMDL %CALLNAME:MASTER%がくつろいでいると突然ガラッと戸が開く
			PRINTFORMDW ビックリして戸の方向を見ると、そこには一糸纏わぬ姿のドレミーが立っていた
			PRINTFORML 「あれ？入ってたのですか…」
			PRINTFORMW 「服を着直すのも面倒なので、お邪魔しても？」
			PRINTFORMDW %CALLNAME:MASTER%は前屈みになりながら頷いた
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて出て行った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
			PRINTFORML 「おや、失礼しました」
			PRINTFORMDW こちらがドレミーの肢体を目に焼き付ける間もなく出て行ってしまった
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
			PRINTFORML 「…えっと、その…」
			PRINTFORMDL ドレミーと%CALLNAME:MASTER%はお互いに一糸纏わぬ姿で見つめ合っている
			PRINTFORMDL 気まずい沈黙が辺りを包む…
			PRINTFORML 「…とりあえず、夢魂…いっときます？」
			PRINTFORMDW ドレミーに夢魂を投げ付けられる前に%CALLNAME:MASTER%はそそくさと退散した
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で遭遇した
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;正月、バレンタイン、ハロウィン、クリスマスの場合
		IF (DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1) || (DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000) || (DAY:2 == 3 && DAY:3 == 30) || (DAY:2 == 4 && DAY:3 == 25)
			CALL SPECIALDAY_EVENT_K109
		ELSEIF CFLAG:318 == 1
			PRINTFORML 「………」
			PRINTFORMDW ドレミーにさっと目を逸らされた
		ELSEIF TALENT:恋慕
			CALL DOREMY_ENCOUNTER
		ELSE
			SELECTCASE CFLAG:現在位置
				;CASE 槐安通路
				CASE 1010
					IF TALENT:思慕
						PRINTFORML 「おや…%MASTERNAME:109%じゃないですか」
						PRINTFORMW 「生身の人間がこんな所に来てはいけませんよ」
						PRINTFORMDL ドレミーはどこか威厳に満ちた、言うなれば夢の支配者然とした態度で警告してくる
						PRINTFORMDL %CALLNAME:MASTER%は、そんなこと今更だ。と言い返す
						PRINTFORMW 「はぁ…仕方ないですねぇ…」
					ELSE
						PRINTFORML 「おやおや、誰かと思えば…」
						PRINTFORML 「きっと強い悪夢を見ているのね…って生身…！？」
						PRINTFORMDW 夢の支配者の威厳は何処へやら、ドレミーは夢でもみたような顔をしてこちらを見ている
						PRINTFORML 「どうやって夢の世界まで…って聞くのはきっと野暮なのでしょうねぇ…」
						PRINTFORMW 「私の方で処理しても良いですが…今日の所は見逃しておきましょう」
					ENDIF
				CASEELSE
					PRINTFORML 「奇遇ですね」
					PRINTFORMDW ドレミーは%CALLNAME:MASTER%に気付くと挨拶してきた
			ENDSELECT
		ENDIF
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;他キャラとデート中に遭遇した
	;ARG:1にデート相手
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		IF CFLAG:318 == 1
			PRINTFORML 「………」
			PRINTFORMDW ドレミーにさっと目を逸らされた
		ELSEIF TALENT:恋人
			IF FLAG:デート相手 == 110
				PRINTFORML 「へぇ～ふ～ん…ほぉ～…」
				PRINTFORMDW サグメとデート中、ドレミーと鉢合わせた
				PRINTFORML 「サグメさんも隅に置けないですねぇ…まさか%MASTERNAME:109%とデートだなんて」
				PRINTFORMDL %CALLNAME:MASTER%は冷や汗を垂らしながらドレミーに弁明をする
				PRINTFORMDW その様子をサグメは冷ややかな目で見つめている…
				PRINTFORML 「いえいえ、怒ってなんていませんよ？むしろ%MASTERNAME:109%の魅力を知ってもらういい機会ですからねぇ…」
				PRINTFORMDW ドレミーの目は笑っていなかった
				TALENT:109:機嫌 = -1
			ELSE
				PRINTFORML 「堂々と浮気とは、逆に清々しいですね」
				PRINTFORMDW ドレミーは%CALLNAME:MASTER%をじーっと見つめている
				PRINTFORMW 「まあ夢の中では私が独占しているのでいいですが」
			ENDIF
		ELSE
			PRINTFORMW 「おや、モテモテですね」
			PRINTFORMDW ドレミーは%CALLNAME:MASTER%をじとーっと見つめている
		ENDIF
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;MAIN_MAP上で一日最初の挨拶
	;注、このあと通常の遭遇口上、ARG==1 OR ARG==2に接続します
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で一日最初の挨拶
	;ARG:1にデート相手、ARG:1が0の場合は非デート
	;注、このあと通常の外出先で遭遇した口上、ARG==6 OR ARG==7に接続します
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;ARG:1とデート中
		IF ARG:1
		;一人で外出
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
ENDIF
RETURN 1

;==================================================
;特別な日イベント用関数
;==================================================
;-------------------------------------------------
@SPECIALDAY_EVENT_K109
;-------------------------------------------------
	;謹賀新年
	IF DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1
		IF TALENT:恋人
			PRINTFORML 「明けましておめでとうございます」
			PRINTFORMW 「お正月といえばおせち料理ですねぇ。作ってくれませんか？」
		ELSEIF TALENT:恋慕
			PRINTFORML 「明けましておめでとうございます」
			PRINTFORML 「初夢といえば一富士二鷹三茄子ということわざが有名ですが…」
			PRINTFORMW 「あれは徳川家縁の地である駿河国での高いものの順番を表しているのですよ」
		ELSEIF TALENT:思慕
			PRINTFORML 「明けましておめでとうございます」
			PRINTFORML 「初夢といえば一富士二鷹三茄子ということわざが有名ですが…」
			PRINTFORML 「あれには続きがあるのをご存じですか」
			PRINTFORMW 「一富士二鷹三茄子、四扇五煙草六座頭と続くのですよ」
		ELSE
			PRINTFORML 「明けましておめでとうございます」
			PRINTFORMW 「初夢は見ることができましたか？」
		ENDIF
	;バレンタインデー
	ELSEIF DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000
		IF TALENT:恋人
			PRINTFORMW 「今日はバレンタインデーですよ。もちろん知ってますよね」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「本日の一大イベント、バレンタインデーの時間がやってまいりました」
		ELSEIF TALENT:思慕
			PRINTFORMW 「バレンタインデーのチョコ？もちろん用意していますよ」
		ELSEIF CFLAG:2 >= 1000
			PRINTFORMW 「もてなさそうな%MASTERNAME:109%の為になんと…」
		ENDIF
		SELECTCASE CFLAG:好感度
		CASE 1000 TO 3000
			PRINTFORMW 「チョコをご用意しました。受け取ってください」
			PRINTFORMW 「あ、もちろん義理チョコですので」
		CASE 3001 TO 5000
			PRINTFORMW 「どうぞ。おいしいおいしいチョコレートですよ」
			PRINTFORMW 「食べすぎには気を付けてくださいね」
		CASE IS > 5000
			IF EXP:愛情経験 >= 100
				PRINTFORML 「なんと私の手作りチョコです。受け取ってください」
				PRINTFORMW 「手作りチョコを渡す相手なんて、きっとこれから先%MASTERNAME:109%しか現れませんね」
			ELSE
				PRINTFORML 「チョコのプレゼントです。受け取ってください」
				PRINTFORMDW 高そうな包装紙に包まれている
			ENDIF
		ENDSELECT
	;ハロウィン
	ELSEIF DAY:2 == 3 && DAY:3 == 30
		PRINTFORML 「トリックオアトリート！」
		IF TALENT:恋人
			PRINTFORMDL ホッケーマスクを被った不審者が飛び出してきた
			PRINTFORML 「私ですよ。驚きましたか？」
			PRINTFORMW 「余談ですが、有名なホッケーマスクの殺人鬼の得物はチェーンソーではなく鉈なんですよ」
		ELSEIF TALENT:恋慕
			PRINTFORMDL 肩に鋭いカギ爪が添えられ、ひやっとした
			PRINTFORMW 「驚きましたか？悪夢といえばやはりフレなんとかさんですね」
		ELSEIF TALENT:思慕
			PRINTFORMDL 後ろから急にチェーンソーの音が聞こえてびっくりした
			PRINTFORML 「驚きましたか？このために外の世界から取り寄せてもらいました」
			PRINTFORMDW 危ないからやめなさい
		ELSE
			PRINTFORMDL そういえば今日はハロウィンだった
			PRINTFORMDL ドレミーはお菓子を配り歩いていたらしい。片手に飴玉の詰まったバスケットを持っている
			PRINTFORMW 「スッキリとした目覚めをサポートするGABA飴です。%MASTERNAME:109%にもあげますね」
			CALL GET_ITEM("飴", 1, 1)
		ENDIF
	;クリスマス
	ELSEIF DAY:2 == 4 && DAY:3 == 25
		IF TALENT:恋人
			PRINTFORML 「今日は何の日かわかりますよね。性夜ですよ」
			PRINTFORMDL そう言うと、ドレミーは%CALLNAME:MASTER%に擦り寄ってきた
			PRINTFORML 「クリスマスの夜にすることといったら…ねぇ？」
			PRINTFORMDW 股間を撫でながらそう言ってきた
		ELSEIF TALENT:恋慕
			PRINTFORML 「メリークリスマス！%MASTERNAME:109%」
			PRINTFORMDL ドレミーが笑顔で寄ってきた
			PRINTFORMW 「クリスマスデートでもいきませんか？」
		ELSEIF TALENT:思慕
			PRINTFORML 「メリークリスマス！%MASTERNAME:109%」
			PRINTFORMDL ドレミーが元気よく寄ってきた
			PRINTFORMW 「この帽子ですか？サンタ帽じゃなくてナイトキャップなのですが…」
		ELSE
			PRINTFORML 「クリスマスが今年もやってきましたね」
			PRINTFORMW 「この時期はサンタクロースのバイトと勘違いされて困りますよ」
		ENDIF
	ENDIF
;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K109_2(ARG,ARG:1)
CALL MESSAGE_GOODMONING(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;非同棲かつ相手が先に起きてる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;TARGET私室にMASTERが入っている（恋慕時添い寝中就寝時のみ？
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「良い夢は見れましたか？」
					PRINTFORMDL 目を開けるとドレミーがすぐ傍で優しく微笑んでいた
					PRINTFORMDW なんだかとても良い夢を見た気がする
				CASE 1
					PRINTFORML 「おはようございます%MASTERNAME:109%」
					PRINTFORMDL 目覚めると、ドレミーがこちらの顔を覗き込んでいた
					PRINTFORML 「それで、エッチな夢は見れましたか？」
					PRINTFORMDW 朝勃ちした肉棒を見られからかわれた
				CASE 2
					PRINTFORML 「よく眠ってましたねぇ」
					PRINTFORMDL 目が覚めるとドレミーが隣にいた
					PRINTFORML 「貴方の悪夢は私が処理しておきましたよ」
					PRINTFORMDW ありがたいことである
				ENDSELECT
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF TALENT:恋慕
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「良い夢は見れましたか？」
						PRINTFORMDL 目を開けるとドレミーがすぐ傍で優しく微笑んでいた
						PRINTFORMDW なんだかとても良い夢を見た気がする
					CASE 1
						PRINTFORML 「おはようございます%MASTERNAME:109%」
						PRINTFORMDL 目覚めると、ドレミーがこちらの顔を覗き込んでいた
						PRINTFORML 「それで、エッチな夢は見れましたか？」
						PRINTFORMDW 朝勃ちした肉棒を見られからかわれた
					CASE 2
						PRINTFORML 「よく眠ってましたねぇ」
						PRINTFORMDL 目が覚めるとドレミーが部屋にいた
						PRINTFORML 「貴方の悪夢は私が処理しておきましたよ」
						PRINTFORMDW ありがたいことである
				ENDSELECT
			ELSE
				PRINTFORML 「おはようございます %MASTERNAME:109%」
				PRINTFORMDW ドレミーが部屋にいた
			ENDIF
		RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が起きている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;DAY:2で季節を選択
		SELECTCASE DAY:2
			;春
			CASE 1
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「おはようございます。よく寝てましたねぇ」
						PRINTFORMDL 目が覚めるとドレミーと目が合った
						PRINTFORMW 「お着替え、ここに置いておきますね」
					CASE 1
						PRINTFORML 「～～～♪」
						PRINTFORMDL 目が覚めると、どこか懐かしい鼻歌が聞こえてきた
						PRINTFORMDL 視線を彷徨わせると、ドレミーが机に向かい手帖に何かを書き込んでいる
						PRINTFORMDL %CALLNAME:MASTER%はもぞもぞと布団から這い出ると背後からドレミーに抱き着いた
						PRINTFORMW 「…おや？%MASTERNAME:109%…ふふ、おはようございます」
					CASE 2
						PRINTFORML 「おはようございます。%MASTERNAME:109%」
						PRINTFORMDL 未だ目を開けてすらいないのに、ドレミーはまるで分かっていたかのように朝の挨拶をしてくる
						PRINTFORMW 「ずっと監視していましたからね。分かりますよ…ほら、起きた起きた」
				ENDSELECT
			;夏
			CASE 2
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「暑いから仕方ないですけど…すごい寝相ですね」
						PRINTFORMDL 目が覚めると、ドレミーは%CALLNAME:MASTER%が蹴った布団を整えていた
						PRINTFORMDL その様はまるで手のかかる息子を持った母親のようだ…
						PRINTFORMW 「ひどい寝汗ですよ。はやく着替えてください」
					CASE 1
						PRINTFORMDL %CALLNAME:MASTER%は布団から飛び上がるように目覚めた
						PRINTFORMDL なにやらとても恐ろしい夢を見た気がする…
						PRINTFORML 「悪夢を見れば涼しくなると思ったのですが…失敗でしたね」
						PRINTFORMDW どうやらドレミーの仕業らしい。酷い寝汗をかいてしまった…
					CASE 2
						PRINTFORML 「おはようございます。ずいぶんうなされてましたねぇ」
						PRINTFORMDL 目が覚めると、ドレミーは手際よく着替えを用意して水を手渡してくれた
						PRINTFORMDL 受け取った水を一気に呷る。冷たい喉越しが眠気を覚ましてくれる…
						PRINTFORMW 「さっさと着替えちゃってください。洗うので」
				ENDSELECT
			;秋
			CASE 3
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「良い夢は見れましたか？」
						PRINTFORMDL 目を開けるとドレミーがすぐ傍で優しく微笑んでいた
						PRINTFORMDW なんだかとても良い夢を見た気がする
					CASE 1
						PRINTFORML 「おはようございます%CALLNAME:MASTER%」
						PRINTFORMDL 目覚めると、ドレミーがこちらの顔を覗き込んでいた
						PRINTFORML 「それで、エッチな夢は見れましたか？」
						PRINTFORMDW 朝勃ちした肉棒を見られからかわれた
					CASE 2
						PRINTFORML 「よく眠ってましたねぇ」
						PRINTFORMDL 目が覚めるとドレミーが部屋にいた
						PRINTFORML 「貴方の悪夢は私が処理しておきましたよ」
						PRINTFORMDW ありがたいことである
				ENDSELECT
			;冬
			CASE 4
				SELECTCASE RAND:3
					;モーニングフェラ
					CASE 0
						PRINTFORML 「…おや、起きてしまいましたか」
						PRINTFORMDL 目が覚めると、布団の中でドレミーに抱き着かれていた
						PRINTFORMDL 柔らかな胸の感触と甘い匂いに下半身に血が集まっていくのを感じる…
						CALL HPH_PRINT,@"「…ふふ、起きる前に…処理しちゃいましょうねHPH」","L"
						PRINTFORMDW ドレミーは耳元でそう囁くと布団の中に潜っていった…
						PRINTFORMDL ………
						PRINTFORMDL ……
						PRINTFORMDW …
						PRINTFORMDW 目覚めの一発を決めた後、ドレミーに改めて起床の挨拶をした
						BASE:MASTER:精力 -= 200
					CASE 1
						PRINTFORML 「…ん、起きましたか。おはようございます」
						PRINTFORMDL 目が覚めると、隣でドレミーが編み物をしていた
						PRINTFORMDW %CALLNAME:MASTER%は目を擦りながら、いったい何を編んでいるのかと問う
						PRINTFORML 「これですか？新しい帽子ですよ。偶には自作してみようかと…」
						PRINTFORML 「まあ、結局作りかけで放置してしまうことが多いんですけどね」
						PRINTFORMDW %CALLNAME:MASTER%は今度何か作って貰おうと思いながらも、今はそれを口にすることはなかった
					CASE 2
						PRINTFORML 「おはようございます。今日も寒いですねぇ…」
						PRINTFORMDL あまりの寒さに、%CALLNAME:MASTER%は目覚めた後も布団から出ようとしない
						PRINTFORML 「気持ちは分かりますが…早く布団から出てください。簀巻きにしてしまいますよ」
						PRINTFORMDW それでもいいと%CALLNAME:MASTER%は心の底から思った…
				ENDSELECT
		ENDSELECT
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が寝ている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMDL 目が覚めると、ドレミーが横で目を閉じていた
		PRINTFORMDL はたして獏も夢を見るのだろうか
		PRINTFORMW
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERが起きていて、相手が起きてきた
	;添い寝時TARGET起床はこちら（TARGET衰弱or添い寝中TARGET睡魔負け後そのままMASTERが起き続けた上で相手が起床した場合限定
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;-------------------------------------------------
		;非同棲
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;同棲中
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		;共通
		IF TALENT:恋慕
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「ふぅ…おはようございます」
					PRINTFORMDW そういえばドレミーが寝ぼけているところをあまり見たことがない
					PRINTFORML 「いつも寝覚めが良いなって？そりゃ獏ですからね」
					PRINTFORML 「それに、寝ている間も仕事をしていますから」
					PRINTFORMDW …どうやら獏という妖怪は相当にブラックなようだ
				CASE 1
					PRINTFORML 「ん…起きていましたか」
					PRINTFORMDL 目覚めたドレミーにコーヒーを淹れてやる
					PRINTFORMDW 受け取ったドレミーは一息つくと着替えを取りに行った
				CASE 2
					PRINTFORML 「………」
					PRINTFORMDW 珍しくドレミーは寝ぼけた様子だ
					PRINTFORML 「…まあ、こういった日もありますよ」
					PRINTFORMDL 疲れた様子のドレミーの頭を優しく撫でる
					PRINTFORMDW すると彼女は%CALLNAME:MASTER%の胸に無言で頭を預けてきた
			ENDSELECT
			PRINTFORML
			RETURN 1
		ELSE
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「…んん～ッ…ふぅ、おはようございます」
					PRINTFORMDL ドレミーは可愛らしく背伸びをすると小さく息を吐いた
					PRINTFORMW 「ほら、あっちを向いててください。着替えるので……」
				CASE 1
					PRINTFORML 「……あれ…%CALLNAME:MASTER%…なぜここに……って、ぁぁ…そうでしたね…」
					PRINTFORMDL ドレミーは頭を押さえながら溜息を吐いている
					PRINTFORMW 「はぁ…着替えるのであっちを向いてもらっても？」
				CASE 2
					PRINTFORML 「…ぁ…%CALLNAME:MASTER%…♪」
					PRINTFORMDL むくりと起き上がったドレミーはねぼけた様子で布団から這い出ると、%CALLNAME:MASTER%に抱き着いてきた
					PRINTFORMDW そのままゴロゴロと甘えてくる彼女を揺り動かすと、正気に戻ったのか顔をバッと上げる…
					PRINTFORML 「………今のは忘れてください」
					PRINTFORMDW どうやら夢を見ていたらしい……
			ENDSELECT
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;夜寝るとき（おやすみ口上）
;==================================================
@M_KOJO_EVENT_K109_3(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;自室に帰る（定時になって寝る）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「それでは、良い夢を」
		PRINTFORMDW ドレミーは帰っていった
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;眠そうにしている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋慕
			SELECTCASE RAND:3
				CASE 0
					PRINTFORMW 「………寝てませんよ？」
					PRINTFORMDW ドレミーは眠そうだ
				CASE 1
					PRINTFORML 「…なるほど…」
					PRINTFORMDW 眠いのか、相槌が適当だ
				CASE 2
					PRINTFORML ドレミーが静かになったので、鼻を摘まんで息を出来なくしてやる
					PRINTFORMW 少しすると、息苦しくなったのか飛び起きた
			ENDSELECT
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;睡眠中（起きていないので会話というよりは寝言？）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		SELECTCASE RAND:5
			CASE 0
				PRINTFORML 「んん…この夢の味は青酸カリ…」
				PRINTFORMDL どんな味だ
			CASE 1
				PRINTFORML 「……ぐぅ…」
				PRINTFORMDW ドレミーは熟睡しているようだ
			CASE 2
				PRINTFORML 「…桜餅…」
				PRINTFORMDW どんな夢だろう
			CASE 3
				PRINTFORML 「…%MASTERNAME:109%…」
				PRINTFORMDW 寝言で名前を呼ばれた
			CASE 4
				PRINTFORML 「…スペースデブリが…」
				PRINTFORMDL 宇宙に居る夢だろうか
		ENDSELECT
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;イタズラ中
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		IF TALENT:恋慕
			SELECTCASE RAND:3
				CASE 0
					PRINTFORMW 「ぁ…んん…」
				CASE 1
					PRINTFORMW 「ふ…んぅ…」
				CASE 2
					PRINTFORMW 「ぃぃ…ぁっ…」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 0
					PRINTFORMW 「……んん…」
				CASE 1
					PRINTFORMW 「…ぁ…ん…」
				CASE 2
					PRINTFORMW 「…っ…」
			ENDSELECT
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;衰弱中（恋慕付き拠点内キャラがMAIN_MAPで衰弱状態になった場合か、お招き部屋で相手が衰弱した場合に発生
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML 「少し休ませてください…」
		PRINTFORMDW ドレミーは疲れ切っている
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（部屋まで運ばれる）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORML 「…良い夢を。%MASTERNAME:109%」
		PRINTFORMDL ドレミーに身を任せた
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが自室まで戻ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;そのまま着替えて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			PRINTFORML 「獏といえど仮眠は必要ですからね…」
			PRINTFORMDW ドレミーはパジャマに着替えると、小さな寝息を立て始めた…
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他キャラとのＨを止めさせて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			IF TALENT:恋人
				PRINTFORMW 「%MASTERNAME:109%…」
				PRINTFORMDW ギクリとして振り返ると、ドレミーが幽鬼のように佇んでいた
				PRINTFORML 「今日の夢は楽しみですね？…覚悟をしておいてください」
				PRINTFORMDW 衣服を着直しながら%CALLNAME:MASTER%は遺書を書いておこうか迷った
			ELSE
				PRINTFORMW 「お楽しみのところ申し訳ないですが…」
				PRINTFORMDW 声に振り替えると、ドレミーが軽蔑の視線で見下ろしていた
				PRINTFORML 「そういった行為を止めろとは言いません…が、私の部屋で盛るのだけは止めていただけませんか？」
				PRINTFORMDW ドレミーに警告され、行為の続きをするという空気でもなくなってしまった
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;非在住TARGETがMAIN_MAPで休憩
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;前のターンから一緒の部屋にいる状態で相手が寝る（お招き部屋含む（
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORMW
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;移動時すれちがい
;==================================================
@M_KOJO_EVENT_K109_4(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;立ち止まった
	;この後遭遇口上に接続
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF FLAG:時間停止
			PRINTFORML ドレミーの時は止まっている
			PRINTFORMW こうなってしまえば夢の支配者だろうが為す術もない
		ELSE
			PRINTFORM ドレミーは%CALLNAME:MASTER%に
				IF TALENT:恋人
					PRINTFORM 満面の笑みで
				ELSEIF TALENT:恋慕
					PRINTFORM 微笑みながら
				ELSEIF TALENT:思慕
					PRINTFORM 小さく笑みを浮かべながら
				ENDIF
			PRINTFORMW 手を振っている
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;軽く会釈して通り過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF FLAG:時間停止
		ELSE
			PRINTFORM ドレミーは%CALLNAME:MASTER%に
			IF TALENT:恋人
				PRINTFORM 優しい笑みを浮かべながら
			ELSEIF TALENT:恋慕
				PRINTFORM 微笑みながら
			ELSEIF TALENT:思慕
				PRINTFORM 小さく笑みを浮かべながら
			ENDIF
				PRINTFORMW 手を振っている
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無視して通り過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF FLAG:時間停止
			PRINTFORML 時を止められたドレミーに挨拶など不要だ
			PRINTFORMW %CALLNAME:MASTER%は無視して通り過ぎた
		ELSE
			IF TALENT:恋慕
				PRINTFORML 「おや、%MASTERNAME:109%…」
				PRINTFORMDL 気付いていないのかそれとも意図的か、%CALLNAME:MASTER%はドレミーを無視して通り過ぎてしまった
				PRINTFORMW 「……選択肢を間違えたのでしょうか？」
			ELSEIF TALENT:思慕
				PRINTFORML 「……おや？あんなに急いでどこへ行こうというのか…」
				PRINTFORML 「まあ、私が気にする事ではありませんね」
				PRINTFORMDW ドレミーは足早に立ち去っていく%CALLNAME:MASTER%の背中を見送った
			ELSE
				PRINTFORMW ドレミーは%CALLNAME:MASTER%に気付いていないようだ
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;他者介入でムード変化
;==================================================
@M_KOJO_EVENT_K109_5(ARG,ARG:1)
;口上主はTARGET
;ARGに入ってきたキャラ（人数が膨大なので、自己把握自己責任で
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;霊夢が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;る～ことが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;その他（キャラ指定なし
	IF TALENT:恋人
		PRINTFORML 「……ふふっ」
		PRINTFORMDL 何を思ったのか、ドレミーはわざとらしく%CALLNAME:MASTER%に抱き着いてみせた
		PRINTFORMW 「なにかご用ですか？私達は御覧の通り忙しいのですが…」
	ELSEIF TALENT:恋慕
		PRINTFORMDL ドレミーにクイクイと袖を引っ張られる
		PRINTFORML 「場所を変えませんか？ここだと人目が…」
		PRINTFORMW 「…え、別にいいじゃないかって？むぅ…分かってないですねぇ」
	ELSEIF TALENT:思慕 || TALENT:セフレ
		PRINTFORMDL 第三者の視線を感じ取ったドレミーはさっと%CALLNAME:MASTER%から身体を離した
		PRINTFORMW 「空気を読まない迷える子羊が…」
	ELSE
		PRINTFORMDW 気が付いた時にはドレミーは一歩離れていた
	ENDIF
ENDIF
RETURN 1

;==================================================
;情事を目撃した
;==================================================
@M_KOJO_EVENT_K109_6(ARG,ARG:1)
;口上主はTARGET
;ARGに情事相手
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を目撃した（馴れ合い度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF TALENT:恋人
			PRINTFORML 「浮気した夫を殴る夢は夫婦仲が良い吉夢といわれています」
			PRINTFORMDW 握り拳を作るドレミーを見て慌てて着替えた
		ELSEIF TALENT:恋慕
			PRINTFORML 「どうぞ私などに構わず」
			PRINTFORMDW 若干冷めた目で見つめるドレミーに興がそがれた
		ELSE
			PRINTFORML 「%CALLNAME:MASTER%もやりますねぇ」
			PRINTFORMDL ドレミーはにやにやしている
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;負けじと参加（馴れ合い度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF TALENT:恋人
			PRINTFORMW 「まあ諸々の説教は後でするとして…」
			CALL HPH_PRINT,@"「私も仲間に入れてもらいますよ%MASTERNAME:109%HPH」","L"
			PRINTFORMDL ドレミーが混ざってきた
		ELSEIF TALENT:恋慕
			PRINTFORML 「私も負けていられませんねぇ」
			PRINTFORMDW ドレミーが混ざってきた
		ELSE
			PRINTFORML 「これが淫夢というやつですか…どれどれ」
			PRINTFORMDW ドレミーが混ざってきた
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;気まずそうに立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF TALENT:恋人
			PRINTFORML 「ほう、浮気セックスですか…」
			PRINTFORML 「たいしたものですね」
			PRINTFORMDW ドレミーが立ち去る間際、冷たい眼光を浴びせてきた
		ELSEIF TALENT:恋慕
			PRINTFORML 「…失礼しました」
			PRINTFORMDW 若干嫉妬のこもった声で言うと去っていった
		ELSEIF TALENT:思慕
			PRINTFORMW 「まあ%MASTERNAME:109%も男性ですからね…」
		ELSE
			PRINTFORML 「続きをどうぞ？」
			PRINTFORMDW ドレミーはさっさと去っていった
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;情事を見られた
;==================================================
@M_KOJO_EVENT_K109_7(ARG,ARG:1)
;口上主はTARGET
;ARGに目撃者
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を見られた（目撃者の馴れ合い度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF TALENT:恋人
			PRINTFORML 「おや、迷える子羊が」
			PRINTFORML 「まあ減るものじゃありませんよ」
			PRINTFORMDW ドレミーに気にした様子はない
		ELSEIF TALENT:恋慕
			PRINTFORML 「おやおや…顔を真っ赤にして。どうしました？」
			PRINTFORMDW ドレミーは悪戯っぽい笑みを浮かべている
		ELSEIF TALENT:思慕 || TALENT:セフレ
			PRINTFORMW 「おや、迷える覗き魔が」
		ELSE
			PRINTFORMW 「最近、幻想郷には覗き魔が増えているようですねぇ」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が負けじと参加（目撃者の馴れ合い度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF TALENT:恋人
			PRINTFORML 「イッツ、乱交ターイム！」
			PRINTFORMW 「言ってみたかっただけですよ」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「幻想郷の性事情を垣間見たような気がします」
		ELSEIF TALENT:思慕
			PRINTFORML 「まじか」
			PRINTFORMDW 素が出てますよ
		ELSE
			PRINTFORMW 「さすが幻想郷。すべてを受け入れるとは本当だったようで…」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF TALENT:恋人
			PRINTFORMW 「まああの様子だと言い触らされるようなこともないでしょう」
			PRINTFORMW 「さ、続きを…」
		ELSEIF TALENT:恋慕
			PRINTFORML 「渡しませんよ」
			PRINTFORMDW 威嚇してるように見える
		ELSEIF TALENT:思慕
			PRINTFORMW 「走馬灯のように消えていてしまいましたねぇ」
		ELSE
			PRINTFORMW 「どうやら空気を読んでくれたようですねぇ」
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;目撃した情事を問い詰める（現在無し
;==================================================
@M_KOJO_EVENT_K109_8(ARG,ARG:1)
RETURN 1

;==================================================
;パンツ没収された
;==================================================
@M_KOJO_EVENT_K109_9(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		SELECTCASE RAND:2
			CASE 0
				PRINTFORMDL ドレミーにパンツが見つかる
				PRINTFORML 「ははぁ～そのような趣味があったのですか…」
				PRINTFORMW 「誰の下着かは存じませんが…これは預かっておきますね」
				PRINTFORMDL パンツは…パンツは力なんだ！パンツは…この幻想郷を支えているものなんだ…！
				PRINTFORMDL それを…それを、こうも簡単に失っていくのは…
				PRINTFORMDW それは…それは、酷いことなんだよ…ッ！
				PRINTFORML 「なにか文句でも？」
				PRINTFORMDW ありません
			CASE 1
				PRINTFORML 「おや、これは…」
				PRINTFORMDW 地面に落ちたパンツをドレミーが手に取る
				PRINTFORML 「私のほうで返しておきますね」
				PRINTFORMDW %CALLNAME:MASTER%が脳をフル動員して言い訳を考えていると
				PRINTFORMW 「ああ、それと」
				PRINTFORMW 「ひとつ貸し、と考えてもよろしいですね？」
				PRINTFORMDW %CALLNAME:MASTER%は黙って頷くことしかできなかった
		ENDSELECT
	ENDIF
	PRINTFORML
ENDIF
RETURN 0
;==================================================
;押し倒した
;==================================================
@M_KOJO_EVENT_K109_10(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;うふふ==2（開始時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;MASTERを押し倒した（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMDL 気が付いた時には%CALLNAME:MASTER%はドレミーに押し倒されていた
			PRINTFORMDW ガッシリと組み敷かれ、身動きの一つすら取ることができない…
			CALL HPH_PRINT,@"「ふー…ふぅうー…HPH」","L"
			PRINTFORMDW ドレミは目をぎらつかせ、甘いフェロモンを撒き散らしている…
			CALL HPH_PRINT,@"「ごめんなさい…%MASTERNAME:109%…HPH」","L"
			CALL HPH_PRINT,@"「さっきからセックスしたくて…たまらないんですHPH」","L"
			PRINTFORMDL 熱っぽい息を吐きながら顔を寄せてくるドレミーに理性があるようには見えない
			PRINTFORMDW どうやら溜まりに溜まった欲求が爆発し、発情してしまったようだ…
			CALL HPH_PRINT,@"「気持ち良くしますから…ね？HPH」","L"
			CALL HPH_PRINT,@"「それに…ふふHPH%MASTERNAME:109%も満更じゃなさそうですし…HPH」","L"
			PRINTFORMDL 発せられるフェロモンと柔らかい肌の感触に陰茎はガチガチに勃起し大きなテントを張ってしまっている
			CALL HPH_PRINT,@"「%MASTERNAME:109%はただ気持ち良くなればいいんですよ…私もそうするのでHPH」","L"
			PRINTFORMDW どうやら覚悟を決める必要がありそうだ…
			TCVAR:109:発情 = 1
		RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERに抱きついた（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;なだめられた（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;-------------------------------------------------
		;抜け出した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORML 「意外と体力がないんですね」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード満足終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW 「%MASTERNAME:109%成分充填完了です」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード強制終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;抜け出す失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;好きにして状態から抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW 「はい、まだダメです」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;欲求不満が高くて抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORMW 「私はまだ満足していませんよ」
			RETURN 1
		ENDIF
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;浴場で遭遇
;==================================================
@M_KOJO_EVENT_K109_11(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
			PRINTFORMDL 入浴中のドレミーの裸を目に焼き付けようと集中する
			PRINTFORML 「……それで、いつまで突っ立ってるつもりですか？」
			PRINTFORMDW 風呂桶の代わりに夢魂を投げつけられ逃げるように退散した…
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目が合った（追い出されない）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
			PRINTFORMDL %CALLNAME:MASTER%がガラっと浴場への戸を開ける
			PRINTFORMDW するとそこには入浴中のドレミーの姿があった
			PRINTFORMW 「おや、%CALLNAME:MASTER%ですか」
			PRINTFORMW 「…隣、空いてますよ？」
			PRINTFORMDW どうやら追い出されずに済みそうだ
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;寝床に忍び込み
;==================================================
@M_KOJO_EVENT_K109_12(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出される（怒り）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「出て行ってもらえませんか？」
		PRINTFORMDW ドレミーから圧力を感じる
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
			PRINTFORML 「%MASTERNAME:109%ですか。どうぞ」
			PRINTFORMDW ドレミーに招き入れてもらった
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕・衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML 「…疲れているのであまりお相手はできませんよ」
		PRINTFORMDW ドレミーに招き入れてもらった
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		PRINTFORMW 「さあ出た出た」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される（衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 5
		PRINTFORML 「疲れが酷くて…すみません」
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;お仕事中
;==================================================
@M_KOJO_EVENT_K109_13(ARG,ARG:1)
;口上主はTARGET
;ARG:1に残っている仕事量
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;仕事開始（職場へ移動する）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;業務中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;仕事終了
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;食事系
;==================================================
@M_KOJO_EVENT_K109_14(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		IF TALENT:恋人
			PRINTFORMDL 持っていた料理を見つけたドレミーが物欲しそうにしていたのでついあげてしまった
			PRINTFORMDL おいしそうに食べるドレミーを見てつい口元が緩む
			PRINTFORMW 「そのような慈愛に満ちた顔で見つめられると…まるで私が子供のようではありませんかっ」
		ELSEIF TALENT:恋慕
			PRINTFORML 「%MASTERNAME:109%の作る料理の匂いを嗅ぐとつい手が…」
			PRINTFORML 「うん、おいしい！」
			PRINTFORMDW ドレミーはつまみ食いした料理をMGMGしながら感想を伝えてきた
		ELSE
			PRINTFORML 「MGMG…」
			PRINTFORMDW 料理はいつの間にかドレミーにMGMGされていた。
		ENDIF
		RETURN 0
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;MASTERが押し倒した
;==================================================
@M_KOJO_EVENT_K109_15(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;未実装（押し倒しコマンドに統合？
	;MASTERが押し倒した（ウフフ開始時）
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;逢瀬終了（ウフフ終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF FLAG:時間停止
			PRINTFORMDL ドレミーを犯し抜いた%CALLNAME:MASTER%は服を着る
			PRINTFORMDW この便利な能力をもっと有効活用してやろう
		ELSEIF CFLAG:睡眠
			PRINTFORML
			RETURN 1
		ELSEIF TALENT:恋慕
			TCVAR:109:発情 = 0
			SELECTCASE RAND:3
				CASE 0
					CALL HPH_PRINT,@"「ん…じゅるるっHPH…あっ、もう少しだけ…」","L"
					PRINTFORMDL %CALLNAME:MASTER%は最後の仕上げとしてドレミーにお掃除フェラをさせている
					PRINTFORMDW いつまでもしゃぶっているドレミーを引き剥がすと、彼女は名残惜しそうに陰茎を見つめ続けていた
				CASE 1
					CALL HPH_PRINT,@"「素敵でしたよ…%MASTERNAME:109%…HPH」","L"
					PRINTFORMDL 情事が終わり、互いに寄り添いながら余韻に浸る
					PRINTFORMDW ドレミーの手を握ると、彼女は無言でしっかりと握り返してきた
				CASE 2
					IF TALENT:妊娠
						CALL HPH_PRINT,@"「ほら、赤ちゃんも我慢してくれたんですから撫でてあげてください」","L"
						PRINTFORMDL ドレミーに促され%CALLNAME:MASTER%がお腹に手を添えると、その上に彼女の手が重ねられる
						PRINTFORMDW 優しくお腹を撫でながら、暫し家族の時間を過ごした…
					ELSEIF PALAM:屈服 >= PALAMLV:15
						CALL HPH_PRINT,@"「はぁ…まだ膝がガクガクして…HPH」","L"
						PRINTFORMDL ドレミーは未だ抜けきらぬセックスの余韻に身体を震わせている
						PRINTFORMDW %CALLNAME:MASTER%がドレミーを抱き寄せ頭を撫でると、彼女は目を瞑り身を任せてきた
					ELSE
						PRINTFORML 「少し休憩を…」
						PRINTFORMDW %CALLNAME:MASTER%がドレミーの肩を抱くと、彼女は頭を預けてきた
					ENDIF
			ENDSELECT
		ELSE
			TCVAR:109:発情 = 0
			IF PALAM:屈服 >= PALAMLV:15
				PRINTFORML 「はぁっ、はぁっ、…激しすぎますよ…」
				PRINTFORMDL ドレミーは絶頂の余韻が抜けきらないのか時たまぴくっと体を震わせている
				PRINTFORML 「イキ殺されるかとおもいました…」
				PRINTFORMDL 乱れに乱れたドレミーを見ることができて満足した
				PRINTFORMW 「あっ…腰が抜けて……立たせてもらえませんか？」
			ELSEIF PALAM:屈服 >= PALAMLV:10
				PRINTFORML 「はぁ…ふぅ…終わり、ですか…？」
				PRINTFORMDW ドレミーは肩で息をしている。行為の激しさを物語っていた
			ELSEIF PALAM:屈服 >= PALAMLV:5
				PRINTFORML 「こうして身体を重ねるのも…まあ、悪くはありませんね」
				PRINTFORMDW ドレミーは頬を上気させながら行為の余韻に浸っていた
			ELSE
				PRINTFORML 「もう終わりですか？」
				PRINTFORMDW ドレミーは少し物足りなさそうだ
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
	;-------------------------------------------------
	;事後描写
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;精液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;愛液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;事後のムード
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;服を着る
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;添い寝する
;==================================================
@M_KOJO_EVENT_K109_16(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;添い寝を始めた（開始時）(存在せず
	;記入チェック
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;添い寝を終了した（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:睡眠
			PRINTFORMDL ドレミーを起こさないようにそっと布団から這い出た
			PRINTFORMDL 夢の支配者はどのような夢を見るのだろうか…
			PRINTFORMDW 少なくともその寝顔は穏やかだった
		ELSEIF CFLAG:TARGET:衰弱
			PRINTFORMDL 疲れ切ったドレミーは目を覚まさない
			PRINTFORMDL 夢の支配者はどのような夢を見るのだろうか…
			PRINTFORMDW 少なくともその寝顔は穏やかだった
		ELSE
			IF TALENT:恋人
				PRINTFORML 「もう少しゴロゴロしません？」
				PRINTFORMDL ドレミーはそう言うが、%CALLNAME:MASTER%は体を起こした
				PRINTFORML 「しょうがないですねー…」
				PRINTFORMDW どうやら起きることにしたようだ
			ELSEIF TALENT:恋慕
				PRINTFORML 「名残惜しいですが、仕方ありませんね」
				PRINTFORMDL そう言うとドレミーは体を起こした。
			ELSE
				PRINTFORML 「あまりゴロゴロしているわけにもいきませんからね」
				PRINTFORMDW ドレミーは体を起こした
			ENDIF
		ENDIF
	RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;時止め終了時
;==================================================
@M_KOJO_EVENT_K109_17(ARG,ARG:1)
;口上主はTARGET
;排他と明記されていないモノは状況によっては連続で表示されるので注意
;ARGに射精状況
;ARG:1に射精状態
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;ARG=1～3は排他
	;謎の快感
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋慕
			SELECTCASE RAND:3
				CASE 0
					CALL HPH_PRINT,@"「ん、んんっHPH…ふっHPH」","L"
					PRINTFORMDL ドレミーは突如肉体を襲った謎の快感に困惑している
					PRINTFORMDL %CALLNAME:MASTER%は具合でも悪いのかと声を掛けた
					PRINTFORML 「な、なんでもありませんよ…大丈夫です」
					PRINTFORMDL 額から汗を垂らしながら、必死で平静を装っている姿に思わず口元が緩みかけてしまう
					PRINTFORMW （なに…なんなの一体…）
				CASE 1
					CALL HPH_PRINT,@"「あッHPH…ッッ」","L"
					PRINTFORMDL 思わず口から漏れた甘い声に、ドレミーは顔を真っ赤にしながら口元を抑える
					PRINTFORMDL 元凶である%CALLNAME:MASTER%は、心配を装い声を掛けた
					PRINTFORML 「ちょ、ちょっと食べ過ぎてしまって…その、げっぷが…すみません」
					PRINTFORMDL 必死に言い訳をするドレミー。だがそれが嘘であるということは%CALLNAME:MASTER%が一番良く知っていた
					PRINTFORMW （突然なんなの…はぁ…恥ずかしい…）
				CASE 2
					CALL HPH_PRINT,@"「ふぅうッHPH…ふっ…ふっ…HPH」","L"
					PRINTFORMDL 身体を襲った痺れるような快感に、ドレミーは口元を押さえて見悶える
					PRINTFORML 「…ぅ…はぁ…ふぅ…」
					PRINTFORMDL 突然どうした？%CALLNAME:MASTER%はドレミーを覗き込み、心配する風を装って羞恥に染まった顔を目に焼き付けた
					PRINTFORML 「…つ、月の知り合いが…このようなポーズを取っているので物真似を」
					PRINTFORMDW 必死に考えた言い訳がそれか。%CALLNAME:MASTER%は思わずドレミーの頭を撫でたくなる衝動に駆られた
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 0
					CALL HPH_PRINT,@"「んぁっHPH…あっ…その」","L"
					PRINTFORMDL 突如肉体を襲った快楽に、ドレミーは思わず声を上げてしまう
					PRINTFORMDL %CALLNAME:MASTER%は内心ほくそ笑みながら、何か用かと声を掛けた
					PRINTFORML 「……すみません。持病の癪が」
					PRINTFORMDL きっと必死に言い訳を考えたのだろう。そう思うと目の前の存在が愛おしく思えた
					PRINTFORMW （…何かされた？いや、そんな筈は…）
				CASE 1
					CALL HPH_PRINT,@"「ふぁっHPH…んぅぅ…HPH」","L"
					PRINTFORMDL 突然の快感に困惑したドレミーは、前のめりになり壁にもたれ掛かる
					PRINTFORMDL 股をモジモジとさせている姿に、%CALLNAME:MASTER%はトイレかと声を掛ける
					PRINTFORML 「ち、違いますよ…女性にそのような事を言うと嫌われますよ」
					PRINTFORMDL いくら嫌われようが止められた時の中では拒否権などない。そう思いつつもドレミーに謝罪した
					PRINTFORMW （もう…%CALLNAME:MASTER%の前でこのような姿…）
				CASE 2
					PRINTFORML 「んぅっ…？」
					PRINTFORMDL ドレミーは体をピクンと反応させる
					PRINTFORMDL 快感からか恥ずかしさからか、心なしか頬が紅潮している…
					PRINTFORML 「今のは…？」
					PRINTFORMDW ドレミーは流れ出た汗を拭うと、すぐに平静を取り戻した
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋慕
			SELECTCASE RAND:3
				CASE 0
					CALL HPH_PRINT,@"「ぐっ…ん゛ぉ゛お゛…っっHPH」","L"
					PRINTFORMDL ドレミーは一瞬白目を向き意識を失ったようで体がふらつく
					CALL HPH_PRINT,@"「ぶっHPHん、ふぅ゛ぅ゛ぅ゛…HPH」","L"
					PRINTFORMDL ドレミーは獣のような声を上げ気合で踏ん張ると、震える体を抱き締め座り込んだ
					PRINTFORMDL 少しびっくりしながら、大丈夫かと心配そうな声色で声を掛ける
					CALL HPH_PRINT,@"「だ、だいじょう…ぶぅうう゛っっHPH」","L"
					PRINTFORMDW 人はイキすぎるとこうなるのかと勉強になった
				CASE 1
					CALL HPH_PRINT,@"「ぎッ―――」","L"
					PRINTFORMDL ドレミーは本能的に拙いと判断したのか、夢塊を顔に押し付け蹲る
					PRINTFORMDL 傍から見れば滑稽な姿だ…そう思いながらもドレミーに喋りかけた
					CALL HPH_PRINT,@"「―――ッ！！HPH――ッHPH―――ッ！！！HPH」","L"
					PRINTFORMDL ドレミーはこちらに腕を突き出し、今は構うなとでも言うかのように手を振りたくっている…
					CALL HPH_PRINT,@"（はやくっHPHはやくおさまってっHPH HPH HPH）","W"
				CASE 2
					CALL HPH_PRINT,@"「お゛く゛ッHPHふ、ぐぅう゛ッッHPH HPH HPH」","L"
					PRINTFORMDL 突如身体を襲った強烈な絶頂感に、ドレミーはビクビクと痙攣しながらしゃがみ込んでしまう
					PRINTFORMDL %CALLNAME:MASTER%はドレミーの肩に手を乗せ、具合でも悪いのかと声を掛ける
					CALL HPH_PRINT,@"「か、からだッHPHとつぜッHPHぴッHPH HPH」","L"
					PRINTFORMDL ゆっくりと背中を擦ってやると、余韻の抜けきらないドレミーはその刺激だけで更に絶頂してしまった
					PRINTFORMW （いや、いやいやいやッ…もう、いやッ…！）
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 0
					CALL HPH_PRINT,@"「お゛っ…っHPH」","L"
					PRINTFORMDL ドレミーは突然の快感に目を白黒させ盛大に潮を吹いている
					CALL HPH_PRINT,@"「んぐぅッHPHほぉお゛っ…HPH」","L"
					PRINTFORMDL あまりに下品な喘ぎ声をあげ蹲るドレミーに思わず吹き出しそうになる
					PRINTFORMDL 表情を出さないようにしながら、大丈夫かと心配そうな声色で声を掛ける
					CALL HPH_PRINT,@"「だ、だいじょう…ぶぅうう゛っっHPH」","L"
					PRINTFORMW あまり笑わせないでほしい
				CASE 1
					PRINTFORML 「あ――――――」
					PRINTFORMDL 呆けたような声を上げた後、ドレミーは倒れ込み芋虫のように這いつくばって動かなくなってしまった
					PRINTFORMDL 少しすると、突然ドレミーの下半身がガクガクと痙攣しスカートをびっしょりと濡らすほどの愛液が吹きだしてきた
					PRINTFORMDL このまま放置するのも可哀相なので、ドレミーの頬をペチペチと叩き起きるように促す
					CALL HPH_PRINT,@"「……あぇ？HPHわ、わたし…HPH」","L"
					PRINTFORMDW あまりの快感に脳の処理の限界を超えたドレミーは、自分に何が起きたのかすら把握していないようだ…
				CASE 2
					CALL HPH_PRINT,@"「んお゛ッ！？？HPH」","L"
					PRINTFORMDL 突然の強烈過ぎる快感に、ドレミーは余りにも下品な声を上げ座り込む
					CALL HPH_PRINT,@"「お゛ほッHPHぉ゛ぉ゛お゛…ッHPH」","L"
					PRINTFORMDL 全身をビクビクと震わせ、まるで下等妖怪のような唸りを響かせ地に額を擦り付けている…
					PRINTFORMDL 夢の支配者といえど、こうなってしまえば獣と変わらない…%CALLNAME:MASTER%はそんな感想を抱いた
					PRINTFORMW （なに？なになになに？え？なにこれ？）
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;パンツ紛失
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋慕
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「ひゃっ…あっ…えっと」
					PRINTFORMDL 突如下着が消失したドレミーがビクッと身体を震わせる
					PRINTFORMDL ドレミーの視線がこちらを向くが、%CALLNAME:MASTER%は素知らぬ顔で口笛を吹いている
					PRINTFORML 「………はぁ…どうかしてるわ…私…」
					PRINTFORMDL 少しでも%CALLNAME:MASTER%を疑ってしまった事にドレミーは軽い自己嫌悪に陥っているようだ
					PRINTFORMDW そんな様に多少の罪悪感を感じながらも、%CALLNAME:MASTER%にパンツを窃盗したことに対する後悔は全く無かった
				CASE 1
					PRINTFORML 「あっ…」
					PRINTFORMDL 突如下半身が涼しくなったドレミーはすぐに下着が無くなった事に気付く
					PRINTFORMDL だが、異常な事態にも関わらず彼女は全く動揺を見せない
					PRINTFORML 「どうかしたかって？…ふふ、どうもしませんよ」
					PRINTFORMDL …よく見ればドレミーの尻尾はせわしなく動き、毛は総毛立っている
					PRINTFORMDW 本当に大丈夫か？%CALLNAME:MASTER%が近付こうとすると、ドレミーはジリッと後ろに下がった
				CASE 2
					PRINTFORML 「っ…そんな…」
					PRINTFORMDL ドレミーはスカートをグッと押さえ、羞恥を堪えている
					PRINTFORML （…気配も感じなかった…脱がされたことにさえ気付かないなんて…）
					PRINTFORML （…まさかあのさとり妖怪が？…いえ、あの子がこんな悪戯をする風には見えなかった…）
					PRINTFORML 「一体……っ！？」
					PRINTFORMDW なにやら色々考え込んでいたので、こちらに意識を向けさせる為に尻を撫でてやるとドレミーは飛び上がって驚いた
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「…え？」
					PRINTFORMDL ドレミーは下半身の違和感の正体、下着が存在しないことにすぐ気付いたようだ
					PRINTFORML 「まさか履くのを忘れた…？いやそんなはず…」
					PRINTFORMDL どうかしたか？
					PRINTFORML 「い、いえ。なんでもありません」
					PRINTFORMDW そう強がるドレミーの頬は紅潮していた
				CASE 1
					PRINTFORML 「なっ…あ、いやその」
					PRINTFORMDL パンツを無くしたドレミーは首を傾げる%CALLNAME:MASTER%から目を背けている
					PRINTFORMDL 羞恥に顔を赤くしながら必死にスカートの裾を押さえ気取られないよう振舞っているが…
					PRINTFORML 「ちょ、ちょっと失礼しても？」
					PRINTFORMDW この場を去ろうとするドレミーを、なんとか引き止めた
				CASE 2
					PRINTFORML 「え、ええ…そうね…」
					PRINTFORMDL ドレミーはスカートの下に何も履いていないことを悟られないよう平静を装っている
					PRINTFORMDL パンツを盗んだ張本人が目の前に居るなど、ドレミーには知る由もない
					PRINTFORML （最近幻想郷で突然下着が盗まれる異変が起きているそうだけど…まさか私が標的になるなんてね…）
					PRINTFORML 「そろそろ、お暇しても…え？まだ話したいって…」
					PRINTFORMDW %CALLNAME:MASTER%は貴重なノーパン獏の生態をもう少し観察することにした
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚口内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;精液中毒低精飲
		IF ARG:1 == 1
			IF EXP:精液経験 == 0
				PRINTFORML 「んぐっ！？」
				PRINTFORMDL ドレミーは口内のねばねばとした食感に顔をしかめる
				PRINTFORMDL まさか吐き出すわけにもいかず、涙目になりながら少しずつ飲み込んでいく
				PRINTFORMDL 大丈夫かと素知らぬ顔で%CALLNAME:MASTER%が声を掛ける
				PRINTFORML 「だ、大丈夫です…ちょっと、痰が絡まって…」
				PRINTFORMDW ドレミーは口内に突如出現した正体不明の液体に不安そうな表情を見せている
			ELSE
				PRINTFORML 「うっ…？」
				PRINTFORMDL ドレミーは口内の精液の食感に顔をしかめる
				PRINTFORMDL まさか吐き出すわけにもいかず、涙目になりながら少しずつ飲み込んでいく
				PRINTFORMDL 大丈夫かと素知らぬ顔で%CALLNAME:MASTER%が声を掛ける
				PRINTFORML 「だ、大丈夫です……匂いませんか？そうですか…」
				PRINTFORMDW ドレミーは自分の口臭を気にしている
			ENDIF
		;精液中毒低吐き出し
		ELSEIF ARG:1 == 2
			IF TALENT:恋人
				PRINTFORML 「っ…」
				PRINTFORMDL 口内に突如現れた精液にドレミーの思考は真っ白になってしまう
				PRINTFORMDL 無言になったドレミーに、笑みを浮かべた%CALLNAME:MASTER%がどうしたと声を掛ける
				PRINTFORML （…仕方ない…）
				PRINTFORMDL 切羽詰まったドレミーは夢魂を%CALLNAME:MASTER%の顔面に投げつけ、昏倒させた
				PRINTFORML 「げほっげほっ…ぺっ…ごめんなさい%MASTERNAME:109%…すぐ起こしてあげますから」
				PRINTFORMDW …%CALLNAME:MASTER%が目を覚ますと、ドレミーは既に精液の処分を終えていた
			ELSE
				PRINTFORML 「うぷっ…」
				PRINTFORMDL ドレミーは口内の液体の正体が精液だとすぐに気が付いたようだ
				PRINTFORML （…%CALLNAME:MASTER%…お願い…あっちを向いて…）
				PRINTFORMDW 無言の圧力に気圧され後ろを向くと、ドレミーは素早く口内の精液を処分した
			ENDIF
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
			IF TALENT:恋人
				PRINTFORML 「げほっ…うぐっ…」
				PRINTFORMDL 口内に並々と注がれた精液に、ドレミーは蒼白になりながら口元を覆い震えていた
				PRINTFORMDL むせる度に、指の隙間から精液がびゅっと飛び出している…
				PRINTFORML （これ…精液…こんな、%MASTERNAME:109%以外の精液なんて飲みたくない…っ）
				PRINTFORMDL 突然の理不尽にさすがの夢の支配者も堪えたのか、ドレミーは口を押え涙目のまま俯いてしまった
				PRINTFORMDW …なんだか悪い事をしてしまったかもしれない。ドレミーの背中を擦ると、ただ一言、彼女は謝ってきた…
			ELSE
				PRINTFORML 「うっ…っ…っ…」
				PRINTFORMDL ドレミーは涙目になりながら口を押えむせた
				PRINTFORMDL 手の隙間からは%CALLNAME:MASTER%の精液が滲み出ている…
				PRINTFORMDL 吐き出せるように紙袋を渡すと、ドレミーは礼を言ってきた
				PRINTFORMW 「げほっ…%MASTERNAME:109%は優しいですねぇ…見直しましたよ」
			ENDIF
		;精液中毒高精飲
		ELSEIF ARG:1 == 4
			IF TALENT:恋人
				PRINTFORML 「んっ！？…んくっ…ごくっ…」
				PRINTFORMDL ドレミーは口内に突如出現した精液に動じることなく、味わうように飲み込んでいく
				PRINTFORMDL ごくっと嚥下する音が鳴る度に、ドレミーは恍惚とした表情で震える
				PRINTFORML （あぁ…おいしい…でも、この味どこかで…？）
				PRINTFORMDL 全て飲み干すと、ドレミーはじっと此方を見つめた後…頬を紅潮させ微笑んだ
				PRINTFORMDW …まさかバレてなどいないだろう。そう思い込むことにした
			ELSE
				PRINTFORML 「ぁ…んくっ…んっ…」
				PRINTFORMDL ドレミーは突如口内に出現した精液に動じることなく、MGMGと口を動かしながら飲み干した
				PRINTFORML 「…ふぅ…どうかしましたか？%MASTERNAME:109%」
				PRINTFORMDW ドレミーの関心はなぜ精液が出現したかにないようだ
			ENDIF
		;濃厚精液＆精液中毒低吐き出し
		ELSEIF ARG:1 == 5
			IF TALENT:恋人
				PRINTFORML 「お゛ぇ゛ッ…げほっ！げほっ！？」
				PRINTFORMDL 口内と胃にたっぷりと注がれた特濃子種に、ドレミーは思わず目を剥いて嘔吐してしまう
				PRINTFORMDL 胃液と混ざり合った精液はなんともいえない色合いと臭気を放っている…
				PRINTFORMDL %CALLNAME:MASTER%は、これはどういうことだ。誰かのものをしゃぶったのか…とドレミーを問い詰める
				PRINTFORML 「ちがっ、違うんですっ！…これは、違う…わたし…」
				PRINTFORMDL …ドレミーが本気で泣き出しそうになったので、頭を撫でて落ち着かせた
				PRINTFORMDW 悪いことをしたかもしれないが、自分のせいだとは口が裂けても言えなかった…
			ELSE
				PRINTFORML 「…ぅぶっ、お゛ぇ゛え゛ッ」
				PRINTFORMDL 口内に突如出現した特濃精液にさしものドレミーも耐え切れず盛大に吐き出す
				PRINTFORMDL ビチャビチャと唾液混じり精液が飛び散り、彼女の衣服まで汚してしまう…
				PRINTFORMW 「げほっげっほっ…もう…なんなんですか一体…」
				PRINTFORMDL …一瞬の間が空き、人前で盛大に嘔吐してしまったという事実にドレミーの血の気が引いていく
				PRINTFORMDW 気にしてないし言い触らす気もない。そうドレミーを元気付けた
			ENDIF
		;濃厚精液＆精液中毒高精飲
		ELSEIF ARG:1 == 6
			IF TALENT:恋人
				PRINTFORML 「んんっ…んくっ…ん～…ごくんっ」
				PRINTFORMDL 突如口腔を満たした半固形の精液にドレミーの口元が緩む
				PRINTFORMDL 何億という精子が泳ぎ回るそれを、彼女はなんの躊躇いもなく飲み込んでいった
				PRINTFORML 「ふぅ…ねぇ、%MASTERNAME:109%…今晩、どうですか？」
				PRINTFORMDL ドレミーは艶っぽい笑みを浮かべながら、口淫のジェスチャーを%CALLNAME:MASTER%に見せつけてくる
				PRINTFORMDW あれだけでは足りないということだろうか…とんでもなく淫乱な獏に、%CALLNAME:MASTER%は思わず苦笑いを浮かべた
			ELSE
				PRINTFORML 「ん、ふ…ちゅる…れる…ごくっ」
				PRINTFORMDL 口内に突如出現したプリプリとした特濃精液を、ドレミーは舌で弄びながら嚥下した
				PRINTFORMDL 引っ掛かるような喉越しに、ドレミーは尻尾をブンブンと振って興奮している
				PRINTFORML （ふふ…誰かは知りませんが…こんな美味しいザーメンを食べさせてくれて感謝しますよ…）
				PRINTFORMDW もはや、ドレミーにとって精液は夢と同等以上の主食となっているようだ…
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;無知持ち＆精液経験100未満
		IF ARG:1 == 1
		;通常ぬぐい取り
		ELSEIF ARG:1 == 2
			IF TALENT:恋人
				PRINTFORML 「っ！？」
				PRINTFORMDL ドレミーはまるで顔パックのように顔面にへばりつく精液に動揺している
				PRINTFORMDL こんな姿を見られるわけにはいかない…ドレミーは急いで精液を拭い取っていった
				PRINTFORML 「あぁ…メイクが…」
				PRINTFORMDL 精液と一緒に化粧まで剥がれてしまうが、背に腹は代えられない
				PRINTFORMDW 精液塗れになったハンカチを後ろ手に隠し、ドレミーは何事も無かったかのように振舞った
			ELSE
				PRINTFORML 「ぇ…あっ…」
				PRINTFORMDL ドレミーは突如出現した顔面にへばりつく精液に困惑している
				PRINTFORMDL ドロリとした精液が小鼻を伝い、足元に糸を引きながら滴っていく…
				PRINTFORML 「はぁ…こんな酷い事、誰が…」
				PRINTFORMDL ドレミーは顔を顰めながら、臭気を放つ体液を拭い去った
				PRINTFORMDW あの精液を拭いたハンカチはどうするのだろうか…そんな事を考えながら、身なりと整えるドレミーを観察した
			ENDIF
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
			IF TALENT:恋人
				PRINTFORML 「仕方…ありませんよね……んっ…れる…」
				PRINTFORMDL ハンカチが精液塗れになってしまったドレミーは、残る精液を指で掬い嘗め取っていく
				PRINTFORMDL わざとらしく舌に塗り付けてから口に含んでいる様を見るに、精液を味わうことに全く抵抗はないらしい
				PRINTFORML 「んっ…おいし…あ、もう無くなって…」
				PRINTFORMDL 顔の精液が綺麗さっぱり拭い去られると、ドレミーは物足りなさそうにザーメンハンカチを見つめる
				PRINTFORMDW しばし逡巡した後、ドレミーは%CALLNAME:MASTER%に背を向けハンカチに舌を這わせていった…
			ELSE
				PRINTFORML 「んぁ……ぺろ…ふふっ」
				PRINTFORMDL 突如出現した白濁液にドレミーは一瞬呆けたが、すぐに正気を取り戻すと手で精液を拭い取っていく
				PRINTFORMDL その過程で指に付着した精液を暫し見つめると、恐る恐る口に運び嘗め取っていった
				PRINTFORML 「まるで私…変態みたい…」
				PRINTFORMDL %CALLNAME:MASTER%が見ているにも関わらず、指を嘗めしゃぶる頻度が徐々に増えていく
				PRINTFORMDW 最終的に、ドレミーは精液の殆どを自らの胃に収めてしまった
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;ぬぐい取り
		IF ARG:1 == 1
			IF TALENT:恋人
				PRINTFORML 「ぅっ…いつの間に…」
				PRINTFORMDL ドレミーは手に付着した精液を、汚らわしいものを見るかのように睨んでいる
				PRINTFORML 「まったく、幻想郷にもこんな異常性癖者が居るなんて…」
				PRINTFORMDL 手首の辺りまで飛び散った精液をドレミーは自前のハンカチで拭い取っていく
				PRINTFORMDL 拭い終わる頃には、白黒のハンカチは白濁色に染まってしまっていた…
				PRINTFORMW （私の手を汚していいのは%MASTERNAME:109%だけなのに…許せないわね）
			ELSE
				PRINTFORML 「っ…はぁ…」
				PRINTFORMDL ドレミーは手の平にべったりと付着した精液を見止めると、顔を顰め水を切るように精液を飛ばしていく
				PRINTFORMDL しかし、粘度の高いザーメンはまるでグリースのように張り付いたままだ
				PRINTFORML 「嫌になりますねぇ…」
				PRINTFORMDL 仕方がないので、ドレミーは自らのハンカチで精液を拭い取っていく
				PRINTFORMDL 最終的にあのハンカチは捨てられるのだろうか。もしやあのハンカチはドレミーのお気に入りだったのだろうか…
				PRINTFORMDW そう想像するだけで、%CALLNAME:MASTER%は股間が熱くなるのを感じた
			ENDIF
		;舐めとり
		ELSEIF ARG:1 == 2
			IF TALENT:恋人
				PRINTFORML 「あっ…こんなに…」
				PRINTFORMDL ドレミーの手にはべったりと精液が付着している
				PRINTFORMDL 普通なら取り乱すところだが、ドレミーは自分の腕をウットリと見つめたままだ
				PRINTFORML 「…これは浮気じゃない…ただの掃除だから…」
				PRINTFORMDL まるで自分に言い聞かせるように呟くと、ドレミーは自らの腕に舌を這わせていく
				PRINTFORMDL 本人はバレないようにやっているつもりだろうが、ペチャペチャと嘗める音は意外に大きく周囲に聴こえていた
				PRINTFORML （…おいしい…あぁ…%MASTERNAME:109%…）
				PRINTFORMDL 結局、ドレミーは%CALLNAME:MASTER%が声を掛けて我に返るまでずっと嘗め続けていた…
			ELSE
				PRINTFORML 「…これ…あれ、ですよね…」
				PRINTFORMDL ドレミーは手にべったりと付着した精液を食い入るように見つめている
				PRINTFORMDL チラチラとこちらの様子を伺った後、ドレミーはゆっくりと顔を近付け舌で舐め取っていった
				PRINTFORML 「んっ…ぴちゃ…ちゅぱっ…」
				PRINTFORMDL 舌で掬い、口内で味わい、飲み込んでいく…
				PRINTFORMDL ドレミーは一連の動作を暫く続けた後、ハンカチで残ったザーメンを拭い取っていった
				PRINTFORMDW べったりと白濁が付着した面を折りたたむと、彼女はまるで宝物を扱うかのようにポケットに戻した…
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚アナル射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;Ａ感覚2以下
		IF ARG:1 == 1
			IF TALENT:恋人
				PRINTFORML 「ひっ…くぅぅ…」
				PRINTFORMDL ドレミーはアナルに出現した違和感に思わず悲鳴を上げそうになる
				PRINTFORMDL たっぷりと注ぎ込まれた子種汁は、直腸だけでなくＳ状結腸にまで達していた
				PRINTFORML 「っ…%MASTERNAME:109%…私…少し、席を外しても…」
				PRINTFORMDL 一々許可を取る必要があるのだろうか。ドレミーは%CALLNAME:MASTER%に縋るように懇願している
				PRINTFORMDL 少し面白いことになりそうだと思った%CALLNAME:MASTER%は、ダメだ…とドレミーに返した
				PRINTFORML 「そんな…ぁっ、あっ、あっ…！」
				PRINTFORMDL ブピッと音が鳴り、腸液と混ざり合った白濁が噴き出すのにそう時間は掛からなかった…
			ELSE
				PRINTFORML 「いっ…！？」
				PRINTFORMDL ドレミーはアナルに突如出現した感触に慄いている
				PRINTFORMDL 直腸にたっぷりと溜まった子種は、気を抜けばすぐにでもアヌスから溢れてしまいそうだ
				PRINTFORML 「く、ぅ…お腹が…熱い…」
				PRINTFORMDL 少し動く度にタプンと揺れる精液の動きに動くことすら儘ならない
				PRINTFORMDL ドレミーの顔面は真っ赤になったり、かといえば蒼白になったりと目まぐるしく変化している
				PRINTFORMDW %CALLNAME:MASTER%は今カメラを持っていないのが惜しいなぁと、どこか他人事のように思った
			ENDIF
		;ソレ以外
		ELSEIF ARG:1 == 2
			IF TALENT:恋人
				CALL HPH_PRINT,@"「ふ、ぅ゛ッHPHほ、ぉお…ッHPH」","L"
				PRINTFORMDL ドレミーは腸内で波打つザーメンの動きに合わせ見悶えている
				PRINTFORMDL 必死になって肛門を締めているようだが、漏れだした精液が太腿を伝って足元に流れ出ている
				PRINTFORML 「ッ…%MASTERNAME:109%ッ…わたし…っ」
				PRINTFORMDL ドレミーは%CALLNAME:MASTER%の腕をガシッと掴むと物陰へと連行する
				PRINTFORML 「ひ、人が来ないように監視しててください…っ」
				PRINTFORMDL ついに耐え切れなくなったドレミーは物陰にしゃがむと、腸内の精液を排出するべく踏ん張った
				PRINTFORMDW 存分に『監視』させてもらおう…%CALLNAME:MASTER%は背後から鳴り響く下品極まる排泄音を聴きながらほくそ笑んだ
			ELSE
				CALL HPH_PRINT,@"「お゛ッ…HPH」","L"
				PRINTFORMDL 突如直腸を満たした精液の圧迫感にドレミーは思わず下腹部を押さえ喘いでしまう
				PRINTFORMDL タプンと腸内で波打つ度に、足をガクガクと痙攣させ大量の汗を流している…
				PRINTFORML 「っあ…これ、でちゃう…ッ」
				PRINTFORMDL なにが？と%CALLNAME:MASTER%は白々しく返答する
				PRINTFORML 「でちゃうのッッ！」
				PRINTFORMDL ドレミーは%CALLNAME:MASTER%を放置してひと気の無い場所へと全速力で飛んで行った
				PRINTFORMDW その意図を察した%CALLNAME:MASTER%は時を止め先回りすると、夢の支配者の『排泄』を思う存分視姦した…
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚処女喪失】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
			;心の壊れた子が無理して元気に振舞ってるのいいよね
			IF TALENT:恋人
				PRINTFORML 「え……」
				PRINTFORMDL ドレミーは自分の股から流れ出る血を呆けたように見つめている
				PRINTFORML 「……あ、え、えっ、えっ」
				PRINTFORMDL もはや蒼白を通り越して真っ白になったドレミーは、ただひたすらに困惑していた
				PRINTFORMDL 大切な人に捧げるはずだった純潔は、あっけなく散ってしまった…
				PRINTFORML 「……%MASTERNAME:109%……わたし……」
				PRINTFORMDW ドレミーは、自分の中で何かが壊れた気がした
				PRINTL
				PRINTFORML ドレミーは[陽気]を失い[感情乏しい]を得た
				PRINTW
				TALENT:109:感情乏しい = 1
				TALENT:109:陽気／陰気 = 0
			ELSE
				PRINTFORML 「痛ッ…！？」
				PRINTFORMDL ドレミーは下腹部の焼けるような痛みに顔を顰める
				PRINTFORML 「え…血…？なぜ…」
				PRINTFORMDL 顔面蒼白になったドレミーは謎の喪失感に囚われている
				PRINTFORMDW %CALLNAME:MASTER%の心配する声も届いていないようだ
			ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚膣内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;非処女膣内射精ピルなし
		IF ARG:1 == 1
			IF TALENT:恋人
				CALL HPH_PRINT,@"「ぅ゛ッHPH…ッく…HPH」","L"
				PRINTFORMDL ドレミーは膣内を満たす液体が精液だとすぐさま理解し、普段の飄々とした様からは想像もつかない鋭い視線で周囲を睨んだ
				PRINTFORMDL 尻尾は総毛立ち、眼光だけで人なら殺せそうなほどの圧を放っている
				PRINTFORML （もし…妊娠してしまったら…%MASTERNAME:109%になんて説明すれば…）
				PRINTFORMDL 無様にも他の雄に種付けされた自分への怒りと、%CALLNAME:MASTER%への申し訳なさにドレミーの頬から涙が伝い落ちた
				PRINTFORML 「…くっ…ぅ…ぅう…」
				PRINTFORMDL %CALLNAME:MASTER%は申し訳ないことをしたとばかりにドレミーを抱き締め、優しく背中を撫でる
				PRINTFORMDW 静かに泣くドレミーを労りながら、%CALLNAME:MASTER%は次はいつ犯してやろうかと考えを巡らせていた…
			ELSE
				CALL HPH_PRINT,@"「ふ、んんっHPH」","L"
				PRINTFORMDL 子宮を圧迫する精液の感触に、ドレミーは呻くような喘ぎ声を上げてしまう
				PRINTFORMDL 太腿を伝い落ちる白濁液を見て、すぐに膣内を満たす液体がザーメンだと理解した
				PRINTFORML 「くっ…ぅ…一体誰が…」
				PRINTFORMDW 気丈に振舞っているがその実、妊娠してしまうかもという恐怖に怯えているのが見て取れた…
			ENDIF
		;非処女膣内射精ピルあり
		ELSEIF ARG:1 == 2
			IF TALENT:恋人
				CALL HPH_PRINT,@"「ぅ゛ッHPH…ッく…HPH」","L"
				PRINTFORMDL ドレミーは膣内を満たす液体が精液だとすぐさま理解し、普段の飄々とした様からは想像もつかない鋭い視線で周囲を睨んだ
				PRINTFORMDL 尻尾は総毛立ち、眼光だけで人なら殺せそうなほどの圧を放っている
				PRINTFORML （…避妊薬を飲んでいて助かったけど…）
				PRINTFORMDL 無様にも他の雄に種付けされた自分への怒りと、%CALLNAME:MASTER%への申し訳なさにドレミーの頬から涙が伝い落ちた
				PRINTFORML 「…くっ…ぅ…ぅう…」
				PRINTFORMDL %CALLNAME:MASTER%は申し訳ないことをしたとばかりにドレミーを抱き締め、優しく背中を撫でる
				PRINTFORMDW 静かに泣くドレミーを労りながら、%CALLNAME:MASTER%は次はいつ犯してやろうかと考えを巡らせていた…
			ELSE
				CALL HPH_PRINT,@"「ふ、んんっHPH」","L"
				PRINTFORMDL 子宮を圧迫する精液の感触に、ドレミーは呻くような喘ぎ声を上げてしまう
				PRINTFORMDL 太腿を伝い落ちる白濁液を見て、すぐに膣内を満たす液体がザーメンだと理解した
				PRINTFORML 「くっ…ぅ…一体誰が…」
				PRINTFORMDL 予めピルを飲んでいたから少なくとも妊娠の心配はないだろう
				PRINTFORMDW ドレミーは犯人を見つけたらどうしてやろうかと考えを巡らせている
			ENDIF
		;処女膣内射精
		ELSEIF ARG:1 == 3
			IF TALENT:恋人
				PRINTFORML 「………」
				PRINTFORMDL ドレミーはただ呆然と流れ出るピンク色の体液を眺めている
				PRINTFORMDL もはや、彼女にとってはどうでも良いことらしい…
				PRINTFORMDW 本当にこれでよかったのかという後悔と、夢の支配者を壊したという倒錯感で%CALLNAME:MASTER%は異常な興奮に包まれた
			ELSE
				PRINTFORML 「え…はっ…えっ？」
				PRINTFORMDL 下腹部から流れ出る紅白の液体に、さすがのドレミーも言葉を失う
				PRINTFORMDW 顔面蒼白で涙目になったドレミーを見ると、さすがに可哀そうになってきた
			ENDIF
		ENDIF
	RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K109_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORML 「さすがにまだ子供は早いのでは…」
			PRINTFORMW 「無計画な妊娠は子供も不幸にしますよ？」
		ELSEIF TALENT:恋慕
			PRINTFORML 「子供が出来てしまったらどうするのですか？」
			PRINTFORMW 「ノリと勢いだけでお互いの人生を棒に振る必要はないですよ」
		ELSE
			PRINTFORMW 「避妊しない男は挨拶しない男と一緒だって偉い人も言ってますよ」
		ENDIF
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORML 「ダメです」
			PRINTFORML 「冷静になって考えてください」
			PRINTFORMDW ドレミーは強い口調で避妊するよう言っている
		ELSEIF TALENT:恋慕
			PRINTFORML 「耳クソをストローでスコスコ吸い取ってよおーく聞いてくださいね…」
			PRINTFORMW 「避妊してください」
		ELSE
			PRINTFORML 「私の負担も考えてください」
			PRINTFORMDW ドレミーはジト目でこちらを見つめている
		ENDIF
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋人
			PRINTFORML 「はぁ…なんで分かってくれないのですか」
			PRINTFORMW 「可哀そうな人…」
		ELSEIF TALENT:恋慕
			PRINTFORML 「避妊しないのならもうセックスしませんよ」
			PRINTFORMW 「ドゥーユゥーアンダスタンンンンドゥ！！」
		ELSE
			PRINTFORML 「自由すぎる厄介者め…」
			PRINTFORMDW ドレミーに軽蔑の視線を向けられた
		ENDIF
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日以外許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		IF TALENT:恋人
			PRINTFORML 「わかりました」
			PRINTFORMW 「ただし、危険日には絶対に避妊してくださいね」
		ELSEIF TALENT:恋慕
			PRINTFORML 「…はぁ…」
			PRINTFORMW 「危険日以外なら…まぁ」
		ELSE
			PRINTFORML 「…しょうがないですね…」
			PRINTFORMW 「無いと思いますが、もし妊娠したら…わかりますね？」
		ENDIF
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF TALENT:恋人
			PRINTFORML 「まったく…そんなに私との子供が欲しいのですか……はい。わかりました」
			PRINTFORMW 「育児はしっかり手伝ってくださいね」
		ELSEIF TALENT:恋慕
			PRINTFORML 「……貴方の情熱には呆れを通り越して感心すらしますよ」
			PRINTFORMW 「責任…とってくださいね」
		ELSE
			PRINTFORMW 「もし出来てしまった時の為に、今からしっかり稼いでおいてくださいね」
		ENDIF
	RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K109_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;認められる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「まさか幻想郷で暮らすことになるとは思ってもみませんでしたよ」
		PRINTFORMDL ドレミーは%CALLNAME:MASTER%の近くで暮らせることに期待を膨らませている
		PRINTFORMW 「まずはこの部屋の掃除ですねぇ」
		PRINTFORMW 「それから家具も新調して…あとは…」
		PRINTFORML 「…あとは…そう、%MASTERNAME:109%が居てくれるだけで十分ですよ」
		PRINTFORMDW ドレミーは%CALLNAME:MASTER%の手を取り、ニッコリと笑った
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「なにか認められない理由でも？」
		PRINTFORML 「…まあ聞くだけ野暮というものでしょうか」
		PRINTFORMDW ドレミーは残念そうだ
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K109_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋慕
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「…あ、もうこんな時間ですか」
					PRINTFORML 「時間が経つのはあっという間ですねぇ…」
					PRINTFORMDL %CALLNAME:MASTER%は名残惜しそうにしているドレミーに、夢の中ですぐに会えるだろう。と言った
					PRINTFORMW 「ふふ、よく分かってるじゃないですか。…それでは、またお会いしましょう」
				CASE 1
					PRINTFORML 「はぁ…そろそろ夢の世界へと戻らなければ…」
					PRINTFORMDL ドレミーはとても忙しそうだ…
					PRINTFORMW 「忙しそうだなって？まあ確かに暇ではありませんが…」
					PRINTFORMW 「…%MASTERNAME:109%の顔を見るだけで頑張れますよ」
					PRINTFORMDL 去り際、ドレミーがボソッと何かを呟いたが%CALLNAME:MASTER%の耳には届かなかった
				CASE 2
					PRINTFORML 「それではそろそろお暇しますね」
					PRINTFORML 「またすぐにお会いしましょう。%MASTERNAME:109%」
					PRINTFORMDW ドレミーは笑顔で手を振ると去っていった
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「ふぁ…っと、失礼」
					PRINTFORMDW ドレミーは小さく欠伸をした
					PRINTFORML 「私はそろそろお暇させて頂きますね。それでは…」
				CASE 1
					PRINTFORMW 「さて、私はこの辺で」
					PRINTFORMW ドレミーは去っていった
				CASE 2
					PRINTFORML 「それでは、良い夢を」
					PRINTFORMDW いつの間にかドレミーは居なくなっていた
			ENDSELECT
		ENDIF
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;デート中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
	;デート中疲れて帰った想定
		IF TALENT:恋慕
			PRINTFORML 「…ふぅ……」
			PRINTFORMDL デート中、ふとドレミーがもたれ掛かってくる
			PRINTFORMDW 普段の飄々とした顔は鳴りを潜め、酷く疲れているように見える…
			PRINTFORML 「ちょっとはしゃぎすぎましたね…」
			PRINTFORML 「少しこうしていれば大丈夫ですから…」
			PRINTFORMDW %CALLNAME:MASTER%が今日のデートはここまでにしようと言うと、ドレミーは少し悲しそうな顔を見せた
			PRINTFORML 「ですが……いえ、そうですね」
			PRINTFORML 「次回のデート、楽しみにしてます」
			PRINTFORMDW ドレミーは最後まで名残惜しそうにしながらも、ついに飛び去って行った
		ELSE
			PRINTFORML 「……っと…」
			PRINTFORMDL 不意にドレミーがふらつく
			PRINTFORMDW %CALLNAME:MASTER%はビックリした様子で彼女を支えた
			PRINTFORML 「すみません…ちょっと、疲れてしまって…」
			PRINTFORML 「申し訳ありませんが…今日のデートはここまでということで…」
			PRINTFORMDW 本当に大丈夫かと何度も確認するが、ドレミーは大丈夫の一点張りだ
			PRINTFORML 「一日休めば回復しますよ。妖怪ですからね」
			PRINTFORML 「…気遣っていただいて感謝します。%MASTERNAME:109%」
			PRINTFORMDW ドレミーはこちらに微笑むと、会釈をして飛び去っていった
		ENDIF
	RETURN 1
	ENDIF
	;----------------------------------------
	;玄関先でお見送り
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋慕
			PRINTFORML 「では、また会いましょう」
			PRINTFORML 「良い夢を。%MASTERNAME:109%」
			PRINTFORMDW ドレミーは優しい笑みを浮かべると、去っていった
		ELSE
			PRINTFORML 「これはご丁寧に…それではこのあたりで」
			PRINTFORMDL ドレミーは去っていった
		ENDIF
	RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K109_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTL
		PRINTFORMW 長き夜に いくたび見たる夢のぬし 七世の後の君とこそ思へ
		PRINTW
		PRINTFORMDW 夢の世界のとある場所
		PRINTFORMDW まさに夢の国に相応しい立派な城の中で、ドレミーは上機嫌に鼻歌を歌っていた
		PRINTFORMW 「明日は何を付けていこうかしら…」
		PRINTFORMW 「たまには香水なんか使ってみたり…」
		PRINTFORMW 「ワンポイントにアクセサリーなんか付けてみたらどうかしら？」
		PRINTFORMDW 化粧台を前にして、ドレミーは笑みをこぼしながら想い人を空想する
		PRINTFORMW （%MASTERNAME:109%の表情、%MASTERNAME:109%の匂い、%MASTERNAME:109%の温もり…）
		PRINTFORMW （%MASTERNAME:109%の事が恋しい…）
		PRINTFORMW 「こんなこと、ガラじゃないんですけどねぇ…」
		PRINTFORMW 「……好きになってしまったものは、しょうがないですよね…？%MASTERNAME:109%…」
		PRINTFORMDW ドレミーはすっと立ち上がると、まるでワルツを踊るかのように回りながらベッドに飛び込む
		PRINTFORMDW キングサイズのベッドは一人で眠るには少しばかり広く感じた
		PRINTFORMW 「今日の仕事はお休み」
		PRINTFORMW 「恋に焦がれた素敵な気持ちのまま、夢の支配者は幸せな眠りにつくの……」
		PRINTFORMDW 獏は夢を見ない
		PRINTFORMDW しかし今だけは外見相応の少女らしく、素敵な夢を見られるよう願いながら眠り落ちるのだった……
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTL
		PRINTFORMW 春の夜の 夢ばかりなる 手枕に かひなく立たむ 名こそ惜しけれ
		PRINTW
		PRINTFORMW 「はぁ…」
		PRINTFORMDW 無意識に恋に関する夢を手に取っていたドレミーはそれを口に含む
		PRINTFORMW 「%MASTERNAME:109%に連れまわされるせいで仕事が溜まってこまるわ」
		PRINTFORMDW ひとり愚痴りながらも仕事の手は止めない
		PRINTFORMW （それに付き合っている私も私…ということかしら）
		PRINTFORMW 「困りましたねぇ」
		PRINTFORMDW ドレミーは満更でもないといった顔で仕事をこなしていった
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMDL ニチッ…クチュクチュ…
		PRINTFORMDW 皆が寝静まった頃、ドレミーは夢の世界で自慰に耽っていた
		PRINTFORMW 「はぁ…はぁ…んっ…」
		PRINTFORMDW 脚をピンと伸ばし、秘貝を弄っていた動きが止まる
		PRINTFORMW 「足りない…あぁ…%MASTERNAME:109%…私を…」
		PRINTFORMDW %CALLNAME:MASTER%に犯される自らの姿を想像しながら、満たされることのない欲望を鎮めていった…
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORMW 「私も馬鹿ですねぇ…こんな簡単に篭絡されるなんて…」
		PRINTFORMDW そう言うドレミーの頬は赤く染まり、満更でもなさそうな表情をしている
		PRINTFORMW 「…%MASTERNAME:109%…」
		PRINTFORMDW 服に染み付いた%CALLNAME:MASTER%の匂いを嗅ぎながら、ドレミーは自慰に耽っていった…
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;セフレ取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW 「ちょっとした遊びのつもりがずるずると…」
		PRINTFORMDW 最近、ドレミーと%CALLNAME:MASTER%は頻繁に体を重ねていた
		PRINTFORMW 「あんなに気持ちよくされたら、私…」
		PRINTFORMDW 無意識に下腹部に手が伸びる
		PRINTFORMDW 欲望の沼に足を取られたドレミーは、それを鎮めるために慰めていった…
	RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K109_22(ARG,ARG:1)
;口上主はARG
;ARG:0に自慰状況
;ARG:1に自慰種類
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;通常自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋慕
			;十分の一の確率で夜這い
			SELECTCASE RAND:10
				CASE 9
					PRINTFORMW 「さすがに職権濫用かしら…まあ構いませんよね」
					PRINTFORML ………
					PRINTFORML ……
					PRINTFORMW …
					CALL DOREMY_YOBAI
				CASEELSE
					SELECTCASE RAND:2
					CASE 0
						CALL HPH_PRINT,@"「ふっ…HPH…くっ…HPH」","L"
						PRINTFORMDL ドレミーは%CALLNAME:MASTER%の匂いの付いた衣服を自らの顔に押し付けながら自慰に耽っている
						PRINTFORMDW 次はいつ会えるだろうか。ドレミーの頭にはそのことしかなかった
					CASE 1
						CALL HPH_PRINT,@"「…ぁっHPH…はぁ…HPH」","L"
						PRINTFORMDW ドレミーは%CALLNAME:MASTER%をおかずに自慰に耽った
					ENDSELECT
			ENDSELECT
		ELSE
			CALL HPH_PRINT,@"「…んっ…HPH」","L"
			PRINTFORMDW 昂ぶりを抑えられなくなったドレミーは淫らな夢を見ながら自慰に耽っている…
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同室時自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋慕
			;十分の一の確率で夜這い
			SELECTCASE RAND:10
				CASE 9
					CALL HPH_PRINT,@"「んっHPH…こんなになるまで放っておいて…お仕置きが必要ですね…HPH」","L"
					PRINTFORML ………
					PRINTFORML ……
					PRINTFORMW …
					CALL DOREMY_YOBAI
				CASEELSE
					SELECTCASE RAND:2
						CASE 0
							CALL HPH_PRINT,@"「ふっ…HPH…くっ…HPH」","L"
							PRINTFORMDL ドレミーは%CALLNAME:MASTER%の体に鼻を押し付けながら自慰に耽っている
							PRINTFORMDW 今起きたらどういった反応をするのだろうか。興味はありつつも眠気には勝てなかった
						CASE 1
							CALL HPH_PRINT,@"「…っ…っHPH」","L"
							PRINTFORMDW %CALLNAME:MASTER%が深い眠りに落ちていることをしつこく確認した後、ドレミーは自慰に耽った
					ENDSELECT
			ENDSELECT
		ELSE
			CALL HPH_PRINT,@"「………んっHPH」","L"
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;中だし精液自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無知持ち（自慰経験(調教自慰経験は差し引き)による分岐あり
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		LOCAL:2 = EXP:自慰経験 - EXP:調教自慰経験
		;無知消去イベントあり（表示は一度だけ
		IF LOCAL:1 >= 25
		;地の文分岐。書きたい場合は[SKIPSTART][SKIPEND]を削除してください
		[SKIPSTART]
		ELSEIF LOCAL:1 >= 20
		ELSEIF LOCAL:1 >= 15
		ELSEIF LOCAL:1 >= 10
		ELSEIF LOCAL:1 >= 5
		[SKIPEND]
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質あり自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;-------------------------------------------------
		;Ｃ敏感orＣ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｖ敏感orＶ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ａ敏感orＡ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｂ敏感orＢ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部位指定無し
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 5
			PRINTFORML
			RETURN 1
		ENDIF
		;その他
		;上の分岐を一切書かずに、ここに書くことで陥落素質あり自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;-------------------------------------------------
		;尻穴膣腔同時
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;膣腔のみ
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;その他
		;上の分岐を一切書かずに、ここに書くことで自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;我慢
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORMW 「我慢…我慢よ…耐えるのよドレミースイート」
		RETURN 1
	ENDIF
	;その他
	;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K109_23(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;断られた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORML 「嫌ではないですが…今日はダメです」
			PRINTFORMW 「察してくださいね」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「それはちょっと…恥ずかしいというか」
		ELSEIF TALENT:思慕
			PRINTFORMW 「さすがにそこまで気安い仲ではないと思いますが」
		ELSE
			PRINTFORMW 「それはちょっと生理的にきついですねぇ」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;一緒に入ってくれた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORMW 「いいですよ。洗いっこでもしますか？」
		ELSEIF TALENT:恋慕
			PRINTFORML 「混浴ですか？」
			PRINTFORMW 「少し恥ずかしいですが…良いですよ」
		ELSEIF TALENT:思慕
			PRINTFORMW 「本当に混浴だけが目的なんですかねぇ」
		ELSE
			PRINTFORMW 「気の迷いというか…今回だけですよ」
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K109_24(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:109:子供人数
			PRINTFORML 「まあ、さすがに慣れたものですね」
			PRINTFORMDW 再び新しい命を宿したドレミーは優しく下腹部を撫でている
			PRINTFORML 「あの子にも報告してあげないといけませんね…弟か妹ができるのよって」
			PRINTFORMDL ドレミーの手に%CALLNAME:MASTER%の手が重なる
			PRINTFORMDW 嬉しそうに微笑むドレミーの傍に寄り添い、暫くの間家族の未来について語り合った…
			CFLAG:109:1104 = 0
		ELSE
			PRINTFORML 「ふふ…私と%MASTERNAME:109%の……」
			PRINTFORMDW まだ膨らんでもいないが、確かに新しい命が宿った下腹部を撫でる
			PRINTFORMW 「とりあえず%MASTERNAME:109%に報告ですね…あとは…」
			PRINTFORMW 「素敵な名前を考えないといけませんねぇ」
			PRINTFORMDW 生まれてくる命に思いをはせながら、ドレミーは確かな幸せを感じていた
			CFLAG:109:1104 = 0
		ENDIF
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「なんだか最近だるいと思ったら…」
		PRINTFORMDW ドレミーは妊娠検査薬を前に、何とも言えない表情をしている
		PRINTFORML 「まったく、計画性がないんだから…」
		PRINTFORMDW 愚痴るドレミーだが、その手は新しい命が宿った下腹部を優しく撫でている
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「胎児と胎児よなぜ踊る」
		PRINTFORMDL 幾度も%CALLNAME:MASTER%と体を重ねた結果、望まぬ妊娠をしてしまったドレミー
		PRINTFORMDW 部屋の隅で蹲ったドレミーは陽性表示の妊娠検査薬を睨みつけた
		PRINTFORML 「母親の心がわかっておそろしいのか…なんて」
		PRINTFORML 「…この子に罪はないですからね」
		PRINTFORMDW 多少表情に暗い影を落としながらも、新しい命を生む決心をしたようだ
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORMW 「悲報。私、ドレミースイートは聖母マリアだった」
		PRINTFORML 「なんてふざけてる場合じゃないわよ…どういうことなの…」
		PRINTFORMDW 妊娠する心当たりが全くないドレミーは酷く狼狽している
		PRINTFORML 「全くイエスでも生まれてくるのかしら…」
		PRINTFORMDW ドレミーは頭を抱えた
	RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;出産
;==================================================
@M_KOJO_EVENT_K109_25(ARG,ARG:1)
;口上主はLOCAL
;ARG:1	何人目の子供か
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:109:子供人数
			PRINTFORML 「ふふっ、可愛いですねぇ…」
			PRINTFORMDL ドレミーは産声を上げる我が子を優しく抱いている
			PRINTFORMDW 前回のお産でコツを掴んだのか、その表情には余裕すら見える
			CALL HPH_PRINT,@"「さあ、これから大変ですよ…お・と・う・さ・んHPH」","L"
			PRINTFORMDW しっかり養っていかなければと思う%CALLNAME:MASTER%だった
		ELSE
			PRINTFORMW 「産まれ…ましたよ…私たちの赤ちゃん…」
			PRINTFORMDL 滝のように汗を流すドレミーを見ればどれだけ大仕事だったかが分かる
			PRINTFORMDW %CALLNAME:MASTER%は笑みを浮かべるドレミーを労りながら、愛しの我が子へと目を落とす
			PRINTFORML 「可愛いわね…とても…」
			PRINTFORMDW ドレミーは母性に満ち溢れた表情で%CALLNAME:MASTER%と我が子の誕生を祝った
		ENDIF
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「はぁ…はぁ…」
		PRINTFORMDW 難産だったが、ドレミーは%CALLNAME:MASTER%との子を無事出産した
		PRINTFORMW 「これからどうするかとか…そんなことどうでもよくなるくらい可愛いわね…」
		PRINTFORMDW ドレミーは母性に満ちた表情で我が子を抱いている…
		PRINTFORMW 「しっかりと教育してあげないと…避妊はしっかりしなさいって」
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「はぁ…ふぅ…産まれた…」
		PRINTFORMDL ドレミーは産まれた我が子を抱き上げる
		PRINTFORMDW 望まぬ妊娠ではあったが、しっかりと育てようと固く決意した
		PRINTFORMW 「私がこの子を守らなければ…」
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML 「………」
		PRINTFORMDL 父親の知れぬ我が子に愛情など抱けるのか。レイプ同然に身ごもったようなものだ
		PRINTFORMDL 母親としての義務を果たすことができるのかと不安に苛まれていた
		PRINTFORMDL 無意識に我が子の首に伸びかけていた手を見て、ドレミーは心底自分自身に恐怖した
		PRINTFORMW 「ごめんね…ごめんね…」
		PRINTFORMW ドレミーは小さく謝罪を繰り返しながら、虚ろな表情で我が子を撫でていた
	RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;オナバレ
;==================================================
@M_KOJO_EVENT_K109_26(ARG,ARG:1)

;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;見られた瞬間
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORML 「あっ…%MASTERNAME:109%…」
				PRINTFORML 「あの、何と言いますか、その…」
				PRINTFORMDW ドレミーはしどろもどろしている
				PRINTFORMW 「…%MASTERNAME:109%が悪いのですからね」
			ELSE
				PRINTFORMW 「……あの…どこから見ていました？」
				PRINTFORMW ドレミーは思考停止しかけている
			ENDIF
		RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;何もしない
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORML 「えっ、この流れで…」
				PRINTFORML 「………」
				PRINTFORMDW ドレミーはどこか悲しい気持ちになりながら布団に包まった
			ELSE
				PRINTFORMW 「あ、はい」
				PRINTFORMW 「………」
				PRINTFORMW 「あれ？殴ってでも記憶を消去するべきだったのでは？」
			ENDIF
		RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;そのまま続行
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORML 「…このような姿、誰にも…いや、でも%MASTERNAME:109%なら…」
				CALL HPH_PRINT,@"「……分かりました。しっかりと目に焼き付けてくださいね…HPH」","W"
			ELSE
				PRINTFORMW 「…はぁ…しょうがないですねぇ…」
			ENDIF
		RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;追い出し
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORML 「あの、後日改めて…というわけにはいきませんか」
				PRINTFORMW 「…ダメ？…はぁ…警告はしましたよ」
				PRINTFORMDL ドレミーがそう言うと、急に強い眠気が襲ってきた…
				PRINTFORMDW …意識が…遠く…
			ELSE
				PRINTFORML 「早く出ていかないと、私の知る限り最怖の悪夢を７代先まで見ることになりますよ？」
				PRINTFORMDW 子孫に申し訳ないので出て行った
			ENDIF
		RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;やっちゃう
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋人
				PRINTFORML
				CALL HPH_PRINT,@"「あっ…%MASTERNAME:109%…HPH」","L"
				CALL HPH_PRINT,@"「そんな、強姦魔みたいな真似を…っHPH」","W"
			ELSE
				PRINTFORML
				PRINTFORML 「夜這い文化も幻想入りしていた…ということですかねぇ」
			ENDIF
		RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;事後
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORML
			PRINTFORML 「まったく…酷い目にあいましたよ…」
			PRINTFORMDW そう言うドレミーは満更でもなさそうな顔をしている
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 6
		;事後お泊り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORML
			PRINTFORMW 「ふふっ、さすが話が分かりますね」
			PRINTFORMW 「ここまでしたのですから、今日は一日付き合ってもらいますよ」
			PRINTFORMW 「まずは夢の管理のお手伝いですね。最近は夢に干渉してくる者が多くて…」
			PRINTFORML 「それが終わったら……終わったら…」
			CALL HPH_PRINT,@"「………HPH」","W"
			PRINTFORMDW ……………
			PRINTFORMDW …………
			PRINTFORMDW ………
		RETURN 1
		ENDIF
	ENDSELECT
ENDIF

;==================================================
;相手からデートのお誘い
;==================================================
@M_KOJO_EVENT_K109_27(ARG,ARG:1)
;口上主はLOCAL
;ARG:1は目的地
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;誘い文句
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋慕
				PRINTFORML 「もしお暇でしたらデートにでも行きませんか？お弁当も作ってあるのですが……」
				PRINTFORMDL ドレミーはバクがプリントされた可愛らしい包みを取り出した
				PRINTFORMDW 断るのも悪い気がするが……
			ELSE
				PRINTFORML 「これから幻想郷を見て回るのですが、よろしければご一緒に如何ですか？」
				PRINTFORMDL どうやらデートのお誘いのようだ。どういう風の吹き回しだろうか……
				PRINTFORML 「もちろん無理にとは言いません。ただ相応のお礼はしますよ」
				PRINTFORMDW 手作り弁当だろうか。ドレミーはバクがプリントされた可愛らしい包みを取り出した
				PRINTFORMDW 断るのも悪い気がするが……
			ENDIF
		RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋慕
				PRINTFORML 「よかった……さ、行きましょうか」
				PRINTFORMDL ドレミーは%CALLNAME:MASTER%の隣に寄り添うと腕を組んできた
				PRINTFORMW 「今日は良い夢を見させて貰いますよ」
			ELSE
				PRINTFORML 「ありがとうございます。では、行きましょうか」
				PRINTFORMDW %CALLNAME:MASTER%はドレミーと連れ立って歩き出した
			ENDIF
		RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋慕
				PRINTFORML 「そうですか……ではこのお弁当は夜食にでもしてください」
				PRINTFORMDL ドレミーは少し悲しそうにしながら包みを渡してきた
				PRINTFORMDW %CALLNAME:MASTER%は申し訳ない気持ちになった
			ELSE
				PRINTFORML 「いきなりでしたからね。都合が合わないのも仕方ありません」
				PRINTFORMDL ドレミーは気にした様子もなく弁当の包みを仕舞った
				PRINTFORMW 「では、私はこれで」
			ENDIF
		RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;部屋に誘われた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋慕
				PRINTFORML 「もし用事がなければ、私の部屋でお茶でも飲んでいきませんか？」
				PRINTFORMDL ドレミーは%CALLNAME:MASTER%と一緒に過ごしたいようだ
				PRINTFORMW 「美味しいお菓子も用意してありますよ」
			ELSE
				PRINTFORML 「もしよかったら、私の家で話し相手にでもなってくれませんか？」
				PRINTFORMDL 女性が部屋に男を上げる意味が分かっているのだろうか
				PRINTFORMDW %CALLNAME:MASTER%にとっては願っても無い誘いだが……
			ENDIF
		RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;部屋に誘われたのを受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋慕
				PRINTFORMDL ドレミーの部屋に入ると心地良い香りが%CALLNAME:MASTER%を出迎えてきた
				PRINTFORML 「幻想郷で見つけて買ってみました。美味しいですよ」
				PRINTFORMDL 椅子に座り辺りを見回しているとドレミーがお茶とお菓子を持ってきてくれた
				PRINTFORMW 「ふふ、どうぞごゆっくり」
			ELSE
				PRINTFORMDL %CALLNAME:MASTER%が随分と簡単に上げるんだなと言うとドレミーは不敵な笑みを浮かべた
				PRINTFORML 「おや、私を押し倒してレイプでもしますか？」
				PRINTFORMDL ……………
				PRINTFORMW 「そこは否定してください」
			ENDIF
		RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;部屋に誘われたのを断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋慕
				PRINTFORML 「そうですか……仕方ないので、用意していたお菓子は私一人で食べることにします」
				PRINTFORMDL %CALLNAME:MASTER%がお菓子は欲しいと言うとドレミーは呆れた表情を浮かべた
				PRINTFORMW 「しょうがないですねぇ…包んでくるので待っててください」
				PRINTFORMDW ………
				PRINTFORMW 「はいどうぞ。ほんと意地汚いんですから……」
				SELECTCASE RAND:3
				CASE 0
					CALL GET_ITEM("チョコレート", 1, 1)
				CASE 1
					CALL GET_ITEM("かしわもち", 1, 1)
				CASE 2
					CALL GET_ITEM("飴", 1, 1)
				ENDSELECT
			ELSE
				PRINTFORML 「そうですか…色々とお話を聞きたかったのですが」
				PRINTFORMDL %CALLNAME:MASTER%は女性が部屋に男を上げるもんじゃないと諭した
				PRINTFORMW 「意外と硬派だったりしますか？」
			ENDIF
		RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;脱衣口上
;==================================================
@M_KOJO_EVENT_K109_28(ARG,ARG:1)
;口上主はTARGET
;ARGに脱がし方選択
;ARG:1（ARG=3の場合のみあり）地の文の反応
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;全裸にする
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSEIF TALENT:恋慕
				PRINTFORMDL しゅるしゅると衣擦れの音が静かな空間に響く
				PRINTFORMDL ドレミーはストリップをするかのように%CALLNAME:MASTER%を焦らしながら、ついに産まれたままの姿になった
				CALL HPH_PRINT,@"「ほら……貴方も脱いで……HPH」","W"
			ELSEIF TALENT:愛欲 || TALENT:セフレ || TALENT:ヤリマン
				PRINTFORMDL 息を荒げながら衣服を脱いでいくドレミーの肢体を視姦する
				CALL HPH_PRINT,@"「さあ、続きを…きゃっHPH」","L"
				PRINTFORMDW 辛抱堪らなくなった%CALLNAME:MASTER%はドレミーに抱き着き体をまさぐった
			ELSE
				PRINTFORMW 「やはり慣れないですね…」
			ENDIF
		RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;下着姿にする
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSEIF TALENT:恋慕
				PRINTFORML 「どんな下着を付ければ%CALLNAME:MASTER%が興奮するのか……毎日悩んでいるのですよ」
				PRINTFORMDL ゆっくりと露わになっていく肌に%CALLNAME:MASTER%は目が離せない
				CALL HPH_PRINT,@"「…感想、聞かせてくださいね。もちろん言葉ではなく行動で…HPH」","W"
			ELSEIF TALENT:愛欲 || TALENT:セフレ || TALENT:ヤリマン
				PRINTFORMDL 生唾を飲み込む%CALLNAME:MASTER%の反応を楽しむようにドレミーがワンピースを脱いでいく
				PRINTFORMDL ゆっくりと露わになっていく肌に%CALLNAME:MASTER%は目が離せない
				CALL HPH_PRINT,@"「…はい、脱げましたよHPH」","W"
			ELSE
				PRINTFORMW 「…はい、これでよろしいですか？」
			ENDIF
		RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;半脱ぎ
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSEIF TALENT:恋慕
				CALL HPH_PRINT,@"「服を着たままシたいだなんて…変態ですねぇ…HPH」","L"
				PRINTFORMDL 扇情的な笑みを浮かべるドレミーは見せつけるようにスカートを捲り上げていく
				CALL HPH_PRINT,@"「衣服にセックスの香りが染み付いて…あぁ、ヤッたんだって皆にバレてしまうかも…HPH」","L"
				PRINTFORMDW それもいいと、%CALLNAME:MASTER%は陶酔した視線を向けるドレミーを抱き寄せた
			ELSEIF TALENT:愛欲 || TALENT:セフレ || TALENT:ヤリマン
				PRINTFORMDL 衣服を脱ごうとしたドレミーを組み伏せ、そのまま身体をまさぐっていく
				CALL HPH_PRINT,@"「…んぁっHPH服に皺が……もう、困った人ですねぇ…HPH」","W"
				PRINTFORMDW 衣服が汚れたらどうしようか。皺になったらどうしようか。そんなことは後で考えれば良いとドレミーは思った
			ELSE
				PRINTFORMW 「現実問題として汚れた服を洗うのが大変なんですよ」
			ENDIF
		RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;パンツちょうだい
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			SELECTCASE ARG:1
				;-------------------------------------------------
				CASE 0
				;交換です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORML 「等価交換です。私のパンツ半分あげるので貴方のパンツ半分ください」
					PRINTFORMDW パンツを真っ二つにするのか、持ってるパンツを半分ずつシェアするのか…
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 1
				;OK（嬉々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORML 「はいどうぞ」
					PRINTFORMDW ドレミーは丸めた下着を投げてよこした
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 2
				;OK（渋々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORMW 「貴方の変態趣味に付き合う私も私ですねぇ…」
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 3
				;嫌です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORMW 「ちょっと、いやかなりドン引きですよ」
					RETURN 1
				ENDIF
				RETURN 1
			ENDSELECT
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;怒り口上
;==================================================
@M_KOJO_EVENT_K109_29(ARG,ARG:1)
;口上主はTARGET
;ARGはTARGETの度胸で分岐
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;怒らせてしまった
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TCVAR:109:400 == 0
			TCVAR:109:400 = 1
			SELECTCASE RAND:2
				CASE 0
					PRINTFORMW 「………」
					PRINTFORMDW か、勘弁してくれ…ドレミー…勘弁してくれよ…っ
					PRINTFORMDW な…お、オレ…これからどうすりゃいいんだ…え？ドレミー…
					PRINTFORMDW 教えてくれ……教えてくれんのだな…もう…
				CASE 1
					PRINTFORML 「幻想郷で一番温厚な私を怒らせるとは、中々やりますね」
					PRINTFORMDW 知らなかったそんなの…
			ENDSELECT
		ELSE
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「……はぁ…」
					PRINTFORMDW ドレミーはまだ怒っているようだ
				CASE 1
					PRINTFORML 「………」
					PRINTFORMDW ドレミーはムスッとしている
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;泣かせてしまった　[臆病]持ち
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;相手が押し倒しを解除
;==================================================
@M_KOJO_EVENT_K109_30(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
	;疲れた
		PRINTFORML 「はぁ…ちょっと疲れましたね…」
		PRINTFORMDL 押し倒しておいて何とも勝手な言い草だ
		PRINTFORMDL %CALLNAME:MASTER%は溜息をつきながら衣服を整えた
		TCVAR:109:発情 = 0
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
	;満足して解放
		IF TALENT:恋慕
			CALL HPH_PRINT,@"「はぁ…気持ち良かった…HPH」","L"
			PRINTFORMDL 欲望を発散し切ったドレミーは肌をツヤツヤとさせ満足気だ
			CALL HPH_PRINT,@"「……また、シましょうね…HPH」","L"
			PRINTFORMDW 蕩け切った声で耳元で囁かれ、%CALLNAME:MASTER%はすぐにでもヤりたい衝動に駆られた…
			TCVAR:109:発情 = 0
		ELSE
			PRINTFORML 「その…こんなことに付き合わせてしまってすみません」
			PRINTFORMDL ドレミーは%CALLNAME:MASTER%を性的に襲ってしまったことを後悔しているようだ
			PRINTFORMDL %CALLNAME:MASTER%は、気持ち良かったから良い。とドレミーを慰めた
			TCVAR:109:発情 = 0
		ENDIF
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
	;満足したところを押し倒された
		CALL HPH_PRINT,@"「クスッHPH次は%CALLNAME:MASTER%の番ですか…HPH」","L"
		PRINTFORMDL ドレミーは舌なめずりをしながらこちらを熱っぽく見てくる
		PRINTFORMDW 熱に浮かされた一組のつがいは溶け合うように肌を重ねていった…
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
	;壊れるまでしてあげる
		PRINTFORML 「貴方がそんなことを言うとは意外でした」
		PRINTFORML 「そう言うのなら……壊してあげましょう。徹底的に♪」
		PRINTFORMDW ドレミーは舌なめずりをしながらまぐわいを再開した……
	RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;一日の終了時(AFTERTRAニーの前)、面識がなければ呼び出されない
;==================================================
@M_KOJO_EVENT_K109_31(ARG,ARG:1)
;口上主はTARGET
;ARGは会ってない日数
;何日以上会ってなかったら愚痴を言うとかできます
;CFLAG:オナバレで分岐入れてもよさそう
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	IF BASE:MASTER:体力 <= 500 && !RAND:5
		PRINTFORML ――夢の世界――
		CALL PRINT_FACE, [[ドレミー]], "通常", "服", "", ""
		IF TALENT:恋慕
			SELECTCASE RAND:5
				CASE 4
					PRINTFORML 「さて、%MASTERNAME:109%の夢は……ん？」
					PRINTFORMDL 夢の中の%MASTERNAME:109%は女性と楽しそうにデートをしている……
					PRINTFORML 「女性とデートをする夢……ここまでは良いのです」
					CALL PRINT_FACE, [[ドレミー]], "怒り", "服", "", ""
					PRINTFORML 「なのに、なぜ相手が私ではないのです？？？」
					PRINTFORML 「………」
					PRINTFORMW 「少しだけ、弄っておきましょう」
				CASEELSE
					PRINTFORML 「この夢の主は随分とうなされ……って、%MASTERNAME:109%じゃない」
					CALL PRINT_FACE, [[ドレミー]], "笑顔", "服", "", ""
					PRINTFORML 「必死に私の名前を叫んで……クスッ、可愛いですねぇ」
					PRINTFORMW 「……少しだけ、観察してみましょうか♪」
			ENDSELECT
		ELSE
			PRINTFORML 「さて、次の夢は……あら？」
			PRINTFORML 「この夢の主は、随分とうなされているようね」
			PRINTFORML 「安らかに眠れるよう、私が手助けしましょう」
		ENDIF
		CALL COLORMESSAGE(@"ドレミーが悪夢を食べてくれたことで体力と気力が大幅に回復した",C_YELLOW,1,1)
		BASE:MASTER:体力 += 5000
		BASE:MASTER:気力 += 5000
		CFLAG:MASTER:徹夜 = 0
	ENDIF
ENDIF
RETURN 1

[SKIPSTART]
;-------------------------------------------------
;オナバレ遭遇時の地の文をデフォルトのものから変更したい場合用。
;その場合は上下のSKIPSTART~SKIPENDを外してください。
;CFLAG等のキャラ変数を使う場合、キャラ番号の指定が必要になります。
;-------------------------------------------------
@M_KOJO_EVENT_K109_ONABARE_1(ARG)
;-------------------------------------------------
:口上色を付けるならコメントアウトを外しXをキャラ番号に
;CALL M_KOJO_COLOR_K109

IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレでそのまま続けてもらう場合の地の文をデフォルトのものから変更したい場合用。
;その場合は上下のSKIPSTART~SKIPENDを外してください。
;CFLAG等のキャラ変数を使う場合、キャラ番号の指定が必要になります。
;-------------------------------------------------
@M_KOJO_EVENT_K109_ONABARE_2(ARG)
;-------------------------------------------------
:口上色を付けるならコメントアウトを外しXをキャラ番号に
;CALL M_KOJO_COLOR_K109

IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレなし崩しックスの地の文をデフォルトのものから変更したい場合用。
;その場合は上下のSKIPSTART~SKIPENDを外してください。
;CFLAG等のキャラ変数を使う場合、キャラ番号の指定が必要になります。
;-------------------------------------------------
@M_KOJO_EVENT_K109_ONABARE_3(前戯１,本番はどっちか,回数,注入量)
;-------------------------------------------------
#DIM 前戯１
;1=C 2=B 3=M
#DIM 本番はどっちか
;0でＶ、1でＡ
#DIM 注入量
#DIM 回数

:口上色を付けるならコメントアウトを外しXをキャラ番号に
;CALL M_KOJO_COLOR_K109

SELECTCASE 前戯１
	CASE 1
		PRINTFORML Ｃ責め
	CASE 2
		PRINTFORML Ｂ責め
	CASE 3
		PRINTFORML Ｍ責め
ENDSELECT

IF 本番はどっちか
	PRINTFORML Aで本番
ELSE
	PRINTFORML Vで本番
ENDIF
;-------------------------------------------------
[SKIPEND]

;-------------------------------------------------
;処女・無自覚非処女に挿入する直前の口上
;RETURN 1するとコマンドをキャンセルします
;RETURN 0なら通します
;CFLAG:破瓜キャンセル口上有がオンになってないと読み込まれないので注意
;-------------------------------------------------
@M_KOJO_EVENT_K109_LOST_VIRGIN_STOP
;-------------------------------------------------
PRINTFORML
RETURN 1

;-------------------------------------------------
;CFLAG:口上内抱き寄せ判定_初回がオンになっている場合のみ有効。
;初めて押し倒した時、ここでRETURN -1すると押し倒しを強制的にキャンセルします。
;RETURN 0なら通常の判定を行い、RETURN 1すると無条件に成功させます。
;特定のイベント（デート帰りキスなど）を見るまでうふふできないようにしたいときなどにどうぞ。
;-------------------------------------------------
@M_KOJO_EVENT_K109_PERMISSION_1
;-------------------------------------------------
PRINTFORML
;RETURN -1
RETURN 0
;RETURN 1
;-------------------------------------------------

;-------------------------------------------------
;CFLAG:口上内抱き寄せ判定_通常がオンになっている場合のみ有効。
;合意付きで押し倒した時、ここでRETURN -1すると押し倒しを強制的にキャンセルします。
;RETURN 0なら通常通り成功させます。
;合意があっても何らかの理由でうふふできないようにしたいときなどにどうぞ。
;-------------------------------------------------
@M_KOJO_EVENT_K109_PERMISSION_2
;-------------------------------------------------
PRINTFORML
RETURN 0
;RETURN -1
;-------------------------------------------------

;==================================================
;夜這い関数
;==================================================
@DOREMY_YOBAI
SELECTCASE RAND:7
	CASE 0
		PRINTFORMDL 手首の痛みに%CALLNAME:MASTER%が目を覚ますと、目の前にドレミーと…%CALLNAME:MASTER%が居た
		PRINTFORMDW 混乱しながらも体を動かそうとする。すると四肢を縛る拘束具がジャラッと音を立てその動きは封じられてしまう
		PRINTFORML 「クスッ、おはようございます。%CALLNAME:MASTER%」
		PRINTFORMDW なぜもう一人の自分がそこに居るのかドレミーに問いただす
		PRINTFORML 「彼ですか？彼は夢の世界の%CALLNAME:MASTER%ですよ」
		PRINTFORMDW 目の前にいるのは間違いなくもう一人の自分自身らしい。…仲睦まじそうに話す自分の姿にどす黒い嫉妬心が募る
		PRINTFORMW 「今日はちょっとした余興というか…私と%CALLNAME:MASTER%がセックスする様子を%CALLNAME:MASTER%に見ててもらいます」
		PRINTFORMDW 今、なんと言ったのか
		CALL HPH_PRINT,@"「つまり、私が自分に寝取られる様を見ていてくださいっていうことですよHPH」","L"
		PRINTFORMDW %CALLNAME:MASTER%は頭がクラクラするのを感じた…
		PRINTFORML ………
		CALL HPH_PRINT,@"「あんっHPHきもちHPHいいっHPH」","W"
		PRINTFORMDL ドレミーは前戯もそこそこに夢世界の%CALLNAME:MASTER%と正常位で交わっている
		PRINTFORMDL パンパンと肉と肉を打ち付ける音が部屋に響き渡り、汗と体液の混ざり合った熱気が部屋を満たしていく…
		PRINTFORMDW ねっとりと舌を絡ませながら肉棒を咥え込むドレミーの姿に%CALLNAME:MASTER%は胸が苦しくなるのを感じた
		CALL HPH_PRINT,@"「あっHPHそこっHPHそこもっとしてっHPH」","L"
		PRINTFORMDL 気持ち良い所を突いたのか、ドレミーは蕩け切った表情をしながらビクビクと痙攣している
		PRINTFORMDW 夢世界の%CALLNAME:MASTER%が腰をしゃくり、Ｇスポットを擦り上げると彼女は嬌声を上げカクカクと腰を振った
		PRINTFORMDL %CALLNAME:MASTER%はその様をただ見ている事しかできない
		PRINTFORMDW 悔しさに発狂しそうになりながらも、眼前の交わりに%CALLNAME:MASTER%の肉棒は痛いほど勃起し先走りの涙を垂れ流していた…
		PRINTFORML ………
		CALL HPH_PRINT,@"「ふ、ぅうHPHそろそろっHPHイきそっ…HPH」","W"
		PRINTFORMDL その言葉を聞いた夢世界の%CALLNAME:MASTER%は、腰を振る速度を上げる
		PRINTFORMDL グチャッ、グチャ、グチュッ、と混ざり合った二人の体液がカリ太のペニスによって掻き出されていく
		PRINTFORMDW 見たくもない光景だが、%CALLNAME:MASTER%は二人の交尾から目が離せない
		CALL HPH_PRINT,@"「イくっHPHイっちゃHPH～～～～～～HPH HPH HPH」","L"
		PRINTFORMDL ドレミーがビクビクと全身を震わせたのと同時に、夢世界の%CALLNAME:MASTER%が思い切り腰を突き出す
		PRINTFORMDL キュッと陰嚢が収縮し、肉棒が胎内を跳ね回りながら彼女の小さな子宮に子種汁を注ぎ込んでいく…
		PRINTFORMDW 涎を垂らしながら種付けを受け入れるドレミーの姿に%CALLNAME:MASTER%は腰が痺れるような感覚の後、情けなく射精してしまった
		PRINTFORML ………
		CALL HPH_PRINT,@"「はぁ…はぁ…HPHふふ、見てるだけで射精してしまったのですか…？HPH」","W"
		PRINTFORMDL 交わりを終えたドレミーが近付いてくる。床に飛び散った精液を指で掬うと、それを口に含みながら艶っぽく笑う
		PRINTFORMDW 情けない姿を晒す%CALLNAME:MASTER%の拘束具を外すと、ドレミーは優しく抱き着いてきた
		CALL HPH_PRINT,@"「少し戯れが過ぎてしまったようですね……あっHPH」","L"
		PRINTFORMDL %CALLNAME:MASTER%はドレミーを押し倒すと、赤黒く勃起した肉棒をドレミーの秘所に突き入れた
		PRINTFORMDW 全て自分で上書きし直すという強い意志の元、ドレミーの全身を愛撫し、口内を貪り、蜜壺から精液を掻き出す
		CALL HPH_PRINT,@"「おッHPHんぅう゛ッHPHすごッHPHやっぱりあんな紛い物じゃなくてHPH本物が一番すごいッHPH HPH HPH」","L"
		PRINTFORMDW …ドレミーを犯し倒しながらチラリと視線を向けると、いつの間にか夢世界の%CALLNAME:MASTER%は消えていた…
		PRINTFORML ………
		PRINTFORML ……
		PRINTFORML …
		PRINTFORMW 「素敵でしたよ…%CALLNAME:MASTER%」
		PRINTFORMDL 事が終わり、%CALLNAME:MASTER%はドレミーに膝枕されながら頭を撫でられている
		PRINTFORML 「ここであったことは全て夢の中での出来事…泡沫の夢というわけです」
		PRINTFORML 「私が%CALLNAME:MASTER%を捨てるなどとという可能性は万が一にも存在しないのですよ」
		PRINTFORML 「だから%CALLNAME:MASTER%も…私を捨てないでくださいね？」
		PRINTFORMDW ドレミーにお休みのキスをされると、%CALLNAME:MASTER%の意識は闇に落ちていった……
		CALL ADD_SAMEN_V(109, BASE:MASTER:精力)
		EXP:109:精液経験 += 5
		EXP:109:膣射経験 += 5
		EXP:109:Ｖ性交経験 += 5
		EXP:109:絶頂経験 += 4
		EXP:MASTER:絶頂経験 += 4
		EXP:MASTER:射精経験 += 5
		EXP:MASTER:挿入経験 += 5
		TALENT:MASTER:120 = 0
		CFLAG:MASTER:徹夜 = 1
	CASE 1
		PRINTFORMDL %CALLNAME:MASTER%が目を覚ますと、知らない天井が目に映った
		PRINTFORMDW ここはどこだろう。そう思い見回していると部屋のドアが開く
		CALL HPH_PRINT,@"「ハーイHPH%CALLNAME:MASTER%」","L"
		PRINTFORMDL なんと、そこにはスケスケのネグリジェを身に纏ったドレミーが立っていた
		PRINTFORMDW 艶めいた笑みを浮かべながら近付いてくる姿に身の危険を感じる…
		PRINTFORML 「ふふ、あまり怖がらないでください。元はと言えば%CALLNAME:MASTER%が悪いのですよ」
		CALL HPH_PRINT,@"「こんなになるまで放って置かれたら…ねぇ？HPH」","W"
		PRINTFORMDW ドレミーが%CALLNAME:MASTER%の手を取って自らの秘所に導くと、とめどなく溢れる淫汁が指に触れた
		CALL HPH_PRINT,@"「…抱いて…くれますよね？HPH」","L"
		PRINTFORMDW 耳元でそう囁かれ我を失った%CALLNAME:MASTER%はドレミーをベッドに放り投げると、その上に覆いかぶさった
		PRINTFORML ………
		CALL HPH_PRINT,@"「んんっHPHはやくHPHはやくっHPH」","L"
		PRINTFORMDL 挿入を前に、先走りをダラダラ滴らせる肉棒をドレミーの陰唇に擦り付ける
		PRINTFORMDW 陰核に触れる度にビクッと腰を震わせるドレミーを優しく抱き締め耳元で愛を囁く
		CALL HPH_PRINT,@"「ぁあ…すきっHPH…あんっHPHはいってくる…っHPH」","L"
		PRINTFORMDW 肉棒に十分過ぎるほど愛液を塗り付けると、期待からかパクパクと開閉する膣口へゆっくりと挿入していった…
		PRINTFORML ………
		CALL HPH_PRINT,@"「あっHPH…ふぅっHPHちゅっHPH」","W"
		PRINTFORMDL %CALLNAME:MASTER%はゆっくりと腰をストロークさせながら蜜壺を味わっている
		PRINTFORMDL 優しくキスを繰り返しながらプルプルと震える胸をゆっくり揉みしだくと、ドレミーは熱い吐息を漏らしながら身体をくねらせた
		PRINTFORMDW 膣肉がほぐれてきたところで、%CALLNAME:MASTER%はピストンのペースを上げ膣奥をトントンと小突く
		CALL HPH_PRINT,@"「すごっHPHんぅうっHPHすごいっHPHそこ、いいっHPH」","L"
		PRINTFORMDW 一突きする度にギュウッと締め付け愛液の涙を溢れさせる蜜壺を躾けるように腰を打ち込み続けた…
		PRINTFORML ………
		CALL HPH_PRINT,@"「ふぅっHPHかおっHPH近っHPH」","L"
		PRINTFORMDL お互いの額を合わせ、快楽に蕩けたドレミーの表情を目に焼き付けながらスパートを掛ける
		PRINTFORMDL %CALLNAME:MASTER%が舌を出しディープキスを促すと、ドレミーは同じように舌を突き出し唇を合わせた
		PRINTFORMDW 口内で情熱的に舌を絡ませながらギュッとドレミーを抱き締めると、彼女の媚肉はキュウッと締まり悦びを伝えてくる
		CALL HPH_PRINT,@"「あっHPHおっHPHひゅごっHPHひゅごいっHPH%CALLNAME:MASTER%HPH%CALLNAME:MASTER%っHPH」","L"
		PRINTFORMDL ぐちゅっ、ぐちゃっ、と剛直が激しく出入りする度にドレミーは何度も軽い絶頂に達しているようだ
		PRINTFORMDW 限界が近付き真っ赤に膨張した亀頭をドレミーの子宮に突き入れると、彼女は甲高い嬌声を上げながら深いアクメに達した…
		CALL HPH_PRINT,@"「～～～～～っHPHぉ゛っHPHお゛ぉ゛お゛オ゛っHPH HPH HPH」","W"
		PRINTFORML ………
		PRINTFORMDW 眼前の雌に種付けを終えると、%CALLNAME:MASTER%は休む間もなく再び腰を動かし始めた
		CALL HPH_PRINT,@"「あっHPHすごいっHPH絶倫ですね…HPH」","L"
		PRINTFORMDL ぬちゃぬちゃと粘っこい蜜音が響きお互いの官能を高める
		PRINTFORMDW 肉棒が充血した秘所を往復する度に、精液と混ざり合った白濁液が掻き出されていく
		CALL HPH_PRINT,@"「…これは…もしかするかもしれませんね…あんっHPH」","L"
		PRINTFORMDL 不意に綻んだ子宮口を突くと、ドレミーはビクンと身体を弾ませ膣肉を締め付けてくる
		PRINTFORMDW 結局、%CALLNAME:MASTER%とドレミーは休むことなく体力の限界まで求め合った…
		PRINTFORML ………
		PRINTFORML ……
		PRINTFORML …
		PRINTFORMW 「素敵でしたよ…%CALLNAME:MASTER%」
		PRINTFORMDL 事が終わり、%CALLNAME:MASTER%はドレミーに膝枕されながら頭を撫でられている
		PRINTFORML 「ここであったことは全て夢の中での出来事…泡沫の夢というわけです」
		PRINTFORML 「さあ、眠りなさい。%CALLNAME:MASTER%が目覚める時まで私が見守ってあげますよ」
		PRINTFORMDW ドレミーにお休みのキスをされると、%CALLNAME:MASTER%の意識は闇に落ちていった……
		CALL ADD_SAMEN_V(109, BASE:MASTER:精力)
		EXP:109:精液経験 += 5
		EXP:109:膣射経験 += 5
		EXP:109:Ｖ性交経験 += 5
		EXP:109:絶頂経験 += 4
		EXP:MASTER:絶頂経験 += 4
		EXP:MASTER:射精経験 += 5
		EXP:MASTER:挿入経験 += 5
		TALENT:MASTER:120 = 0
		CFLAG:MASTER:徹夜 = 1
	CASE 2
		PRINTFORMDL %CALLNAME:MASTER%が痛みに目を覚ますと、目の前にドレミーの顔があった
		PRINTFORMDW ビクッとして飛び起きようとする%CALLNAME:MASTER%。しかしその両手足は縄で縛られていた
		PRINTFORML 「ハーイ%CALLNAME:MASTER%。意外と起きるのが早かったですねぇ」
		PRINTFORMDL 片手に空の注射器を手にしたドレミーがニヤニヤと妖しい笑みを浮かべている
		PRINTFORMDW もしや、先ほどの痛みは注射が原因だろうか…
		PRINTFORML 「この注射が気になりますか？…ふふ、元はと言えば%CALLNAME:MASTER%が悪いのですからね」
		CALL HPH_PRINT,@"「ずっと放って置かれるから、私…こんなになってしまって…HPH」","L"
		PRINTFORMDW ドレミーがスカートをたくし上げる。下着は履いておらず丸見えになった秘所からは愛液がとめどなく滴っていた
		CALL HPH_PRINT,@"「先ほどの注射の中身は媚薬ですよ…ほら、体が熱くなってきたでしょう？HPH」","L"
		PRINTFORMDL ドレミーは%CALLNAME:MASTER%の縄を解くと、こちらに尻を向け扇情的に誘ってくる
		PRINTFORMDW 身体に渦巻く熱を抑えきれなくなった%CALLNAME:MASTER%は、欲望のままドレミーを押し倒した…
		PRINTFORML ………
		PRINTFORMDL 前戯の必要もないほどに股を濡らしたドレミーに遠慮はいらないだろう
		PRINTFORMDW うつぶせに寝かせた彼女の尻肉をかき分け、ガチガチに勃起した肉棒を女陰にあてがうと一気に奥まで挿入した
		CALL HPH_PRINT,@"「おッHPHはぁあぁ…ッHPHふか、ぃっHPH」","L"
		PRINTFORMDW 挿入の衝撃で身体を痙攣させるドレミーをしっかりと押さえつけ、征服するように犯していく
		CALL HPH_PRINT,@"「ぅあっHPHこれっHPHこれが欲しかったのッHPHあんっHPH」","L"
		PRINTFORMDW 無遠慮に膣奥を小突いてやると、ドレミーの媚肉は待っていましたとばかりに締め付け、嘗めしゃぶってくる…
		PRINTFORML ………
		PRINTFORMDL ドレミーの腰をガッシリと掴み獣のように犯し倒す
		PRINTFORMDL パンパンとリズミカルに腰を打ち付けながら、いやらしく揺れる尻を叩いてやるとキュウッと蜜壺が締め付けてくる
		CALL HPH_PRINT,@"「あぁあっHPH交尾すごいっHPH本気の交尾HPHすごっHPHひぁあっHPH尻尾だめぇッHPH」","L"
		PRINTFORMDW ふと好奇心が湧き尻尾を掴みながら腰を揺すってやると、ドレミーは嬌声を上げ激しく見悶えた
		PRINTFORMDL 時には優しく尻尾を擦り、時には手綱を握るように強く引っ張る…
		PRINTFORMDW %CALLNAME:MASTER%にスパンキングされながら好き放題に犯されるドレミーは自分が弱い雌であると魂の底から理解し絶頂した
		PRINTFORML ………
		PRINTFORMDW 射精が近くなると、%CALLNAME:MASTER%はドレミーを組み伏せ種を付けるべく何度も子宮口を突き上げる
		CALL HPH_PRINT,@"「あHPHこれっHPH孕むっHPH排卵してっHPHッッ～～～HPH HPH HPH」","L"
		PRINTFORMDW %CALLNAME:MASTER%が低く唸りながら子宮口を貫き大量射精すると、ドレミーは屈服した雌そのものの表情で気を遣った…
		PRINTFORML ………
		PRINTFORMDW 女陰からゴポッと溢れるほど精を放った%CALLNAME:MASTER%だが、薬の効果はまだまだ切れる様子を見せない
		CALL HPH_PRINT,@"「ぁ、はっ…HPH…もっと、もっとしてださい…っHPH」","L"
		PRINTFORMDL お互いに汗だくになりながら濃厚な交尾を繰り返す
		PRINTFORMDW 効果が切れる頃には、ドレミーのお腹は精液で妊婦のように膨らんでいた…
		PRINTFORML ………
		PRINTFORML ……
		PRINTFORML …
		PRINTFORMW 「素敵でしたよ…%CALLNAME:MASTER%」
		PRINTFORMDL 事が終わり、%CALLNAME:MASTER%はドレミーに膝枕されながら頭を撫でられている
		PRINTFORML 「ここであったことは全て夢の中での出来事…泡沫の夢というわけです」
		PRINTFORML 「さあ、眠りなさい。%CALLNAME:MASTER%が目覚める時まで私が見守ってあげますよ」
		PRINTFORMDW ドレミーにお休みのキスをされると、%CALLNAME:MASTER%の意識は闇に落ちていった……
		CALL ADD_SAMEN_V(109, BASE:MASTER:精力)
		EXP:109:精液経験 += 5
		EXP:109:膣射経験 += 5
		EXP:109:Ｖ性交経験 += 5
		EXP:109:絶頂経験 += 4
		EXP:109:苦痛快楽経験 += 3
		EXP:MASTER:絶頂経験 += 4
		EXP:MASTER:射精経験 += 5
		EXP:MASTER:挿入経験 += 5
		TALENT:MASTER:120 = 0
		CFLAG:MASTER:徹夜 = 1
	CASE 3
		PRINTFORMDL ふと目が覚めると、%CALLNAME:MASTER%はなぜか駅のベンチに座っていた
		PRINTFORMDW いつの間にこんな場所に…そう思いながら視線を彷徨わせていると突然背後から肩を叩かれる
		PRINTFORML 「待った？…ふふっ、一度言ってみたかったんですよね」
		PRINTFORMDW 驚いて振り返ると、そこには学生服に身を包んだドレミーが笑みを浮かべながら立っていた
		PRINTFORML 「この恰好、似合ってますか？セーラー服というものですが…」
		PRINTFORMDW 普段と違うドレミーの姿に股間が熱くなるのを感じる。だが今はそれどころではない
		PRINTFORMW 「%CALLNAME:MASTER%の言いたいことは分かります。ですが今それは置いておいて…」
		PRINTFORML
		PRINTFORML 「%CALLNAME:MASTER%…私と痴漢電車ごっこをしませんか？」
		PRINTFORMW
		PRINTFORML ………
		PRINTFORMDL スーツ姿に着替えさせられた%CALLNAME:MASTER%はドレミーと満員電車に乗っている
		PRINTFORMDW ちょうどその身体をドアに押し付けるような形で、彼女の姿は周りから死角となっている
		CALL HPH_PRINT,@"「ん…HPH」","L"
		PRINTFORMDL %CALLNAME:MASTER%が痴漢のように尻を撫でると、ドレミーは真面目な女学生さながらの演技で見悶える
		PRINTFORMDL 次に学生服の上から形の良い胸を撫でるように揉む。素直な乳首はすぐに制服を押し上げピンッと勃起した
		PRINTFORMDW もっと反応を見たくなった%CALLNAME:MASTER%は、鞄をドレミーの股の間に差し入れグイグイと動かす
		PRINTFORMDL 周りに注目されるのを恐れてか、彼女は俯きながら只々耐えることを選択したようだ…
		PRINTFORMDW 異常な状況に興奮を覚えた%CALLNAME:MASTER%は、さらなる責めを与えるべくドレミーの下着に指を滑り込ませた
		PRINTFORML ………
		CALL HPH_PRINT,@"「ふっHPH…ぅっHPH、んぅう…HPH」","L"
		PRINTFORMDL 期待からか既に濡れている秘所を指でほじくり、陰核を弄ぶ
		PRINTFORMDW ドレミーは声を我慢しながらも、強い快感に腰が砕けそうになっている
		CALL HPH_PRINT,@"「…ぁっHPH…やめて、ください…HPH」","L"
		PRINTFORMDL 快楽に蕩けた表情で弱々しく抵抗の言葉を吐くドレミーに説得力は皆無だ
		PRINTFORMDL 堪え切れなくなった%CALLNAME:MASTER%はガチガチに勃起した肉棒を取り出すと、ドレミーの下着をずらし太腿の間に挟んだ
		PRINTFORMDW 腰を動かす度にニチュッ、ニチッ、と粘膜同士の擦れる淫音が鳴り響く
		CALL HPH_PRINT,@"「…んっHPH…はっHPH…ッ！？HPH～～～HPH HPH」","L"
		PRINTFORMDL …突然ガタッと電車が揺れる
		PRINTFORMDL バランスを崩し思わず腰を突き出すと、ドレミーのしとどに濡れた秘所はすんなりと肉棒を受け入れてしまう
		PRINTFORMDW 急な快感に嬌声を上げるドレミーの口を慌てて塞ぐと、%CALLNAME:MASTER%は好都合だとばかりにピストンを再開した…
		PRINTFORML ………
		CALL HPH_PRINT,@"「ぅっHPHうっHPHんっHPHんんんっHPH」","L"
		PRINTFORMDL 愛液を湛える蜜壺は待望のペニスをずっぷりと咥え込み、愛し気にしゃぶっている
		PRINTFORMDL キュウキュウと射精を促すような膣肉の動きに我慢などできるはずもなく、%CALLNAME:MASTER%は激しく腰を打ち付けた
		PRINTFORMDW もはや周りの視線など気にせずに、腰砕けになったドレミーを支えながらスパートをかけていく
		CALL HPH_PRINT,@"「はっHPHあっHPHはげしっHPH電車のっHPH中なのにっHPH子作りHPHセックスしてるッHPH」","L"
		PRINTFORMDL ついに本性を現したドレミーは演技も忘れセックスの快楽に溺れている
		PRINTFORMDL 欲望が解き放たれる瞬間、腰を突き上げパクパクと吸い付いてくる子宮口へと鈴口を密着させた
		CALL HPH_PRINT,@"「やっHPHいくッHPHイクイクイクッッHPH～～～ッッッHPH」","L"
		PRINTFORMDL ビュルルルッと勢い良く発射された孕ませ汁がドレミーの子袋を満たしていく…
		PRINTFORMDW 最後の一滴まで注ぎ込み終えズルッと肉棒を引き抜くと、支えを失ったドレミーは息を荒げながらペタンと座り込んだ
		PRINTFORML ………
		PRINTFORML ……
		PRINTFORML …
		PRINTFORMW 「楽しかったですか？%CALLNAME:MASTER%」
		PRINTFORMDL 気が付くと二人は最初のホームに戻っていた
		PRINTFORMDW あの後、ドレミーを多目的トイレに連れ込み性行為の続きをしていた筈だったが…
		PRINTFORML 「ここであったことは全て夢の中での出来事…泡沫の夢というわけです」
		PRINTFORML 「……私はけっこう楽しかったので、またやってみるのもいいかもしれませんね」
		PRINTFORMDW 口を開こうとすると急に視界が暗くなっていく。%CALLNAME:MASTER%の意識はそのまま闇の中へと落ちていった……
		CALL ADD_SAMEN_V(109, BASE:MASTER:精力)
		EXP:109:精液経験 += 5
		EXP:109:膣射経験 += 5
		EXP:109:Ｖ性交経験 += 5
		EXP:109:絶頂経験 += 4
		EXP:MASTER:絶頂経験 += 4
		EXP:MASTER:射精経験 += 5
		EXP:MASTER:挿入経験 += 5
		TALENT:MASTER:120 = 0
		CFLAG:MASTER:徹夜 = 1
	CASE 4
		PRINTFORMDL %CALLNAME:MASTER%が目を覚ますと、サイケデリックな色彩が視界一杯に広がる
		PRINTFORMDW 今日の夢はとても奇妙だ。そう思いながら上体を起こすと、安楽椅子に座ってくつろいでいるドレミーの姿が目に映った
		PRINTFORML 「気が付きましたか。ずっと待っていましたよ、%CALLNAME:MASTER%」
		PRINTFORMDW 椅子から身体を起こしたドレミーが近付いてくる。いつもの彼女だがどこか様子がおかしいような…
		PRINTFORML 「突然ですが…これ、分かりますか？」
		PRINTFORMDL ドレミーが白い粉の入った小袋をヒラヒラと動かす
		PRINTFORMDW ……つまり、そういう代物だろう
		PRINTFORML 「ふふふっ、もちろんアレですよ。……キメてみたくありませんか？」
		PRINTFORMDW グイッっとドレミーが顔を寄せてくる。可愛らしい顔が今はとても恐ろしく見えた
		PRINTFORML 「迷ってますね？そんな道に吐き捨てられたガムほどの価値もない迷い…捨ててしまいましょう」
		PRINTFORMDW ドレミーの危険な誘惑に、%CALLNAME:MASTER%は抗うほどの倫理観を持っていなかった…
		PRINTFORML ………
		CALL HPH_PRINT,@"「おッHPHすごッHPHおくすりすごいッHPH」","L"
		PRINTFORMDL バチュッ、バチュッ、と蜜音を響かせながら%CALLNAME:MASTER%は騎乗位でドレミーと交わっている
		PRINTFORMDL 吸い込んだ際に傷付いたのか、ドレミーは鼻孔から鼻血を垂らしながらも猛烈な勢いで腰を振り続ける
		PRINTFORMDW 何倍にも増幅された快感に、二人は全身が溶けているかのような錯覚を味わう…
		CALL HPH_PRINT,@"「ん～HPHじゅるっHPHじゅるるるるっHPH」","L"
		PRINTFORMDL ドレミーは腰を振りながら%CALLNAME:MASTER%と濃厚な口付けを交わしている
		PRINTFORMDL 喉を通り越して食道まで舌を突っ込まれるが、不思議と苦しさは感じない
		PRINTFORMDW 強い多幸感に脳をやられそうになりながらも、%CALLNAME:MASTER%はドレミーの動きに合わせ肉棒を打ち込んでいった
		PRINTFORML ………
		PRINTFORMDL いったいどれほどの時間が経ったのか
		PRINTFORMDW 一組のつがいは休むことなく、汗だくになりながら交尾に耽っていた
		CALL HPH_PRINT,@"「ほ、ぉッHPHオッHPHオッHPHオォオッッHPH」","L"
		PRINTFORMDL 獣のような呻きを上げながら、ドレミーは焦点の定まらぬ瞳で宙を見つめている
		PRINTFORMDW %CALLNAME:MASTER%がもう何発目かも分からない精を放つと、ドレミーは涎を垂らしながら身体を震わせ絶頂に至った
		CALL HPH_PRINT,@"「く、ふッHPHふっHPHフッHPHぃうウッHPHイひッHPH」","L"
		PRINTFORMDL はやく次を寄こせとばかりにドレミーが腰を振りたくる。未だ萎えることを知らない肉棒はただひたすらに精液を献上していく…
		PRINTFORMDL 正常な判断のできなくなった獏は粉の入った袋を破ると、%CALLNAME:MASTER%の顔にぶちまけた
		PRINTFORMDW このまま死んでも構わない。%CALLNAME:MASTER%は魔法の粉を一息に吸い込むと、完全にトリップした…
		PRINTFORMW ………
		CALL HPH_PRINT,@"ビュルルルルッHPH HPH HPH","W"
		PRINTFORMDW ドレミーの穴に射精する。腰を振る
		CALL HPH_PRINT,@"「………ぅ…ぉ…ほっHPH…HPH」","L"
		PRINTFORMDW きもちいい。射精する。腰を振る。射精する。腰を振る
		CALL HPH_PRINT,@"「…HPH…HPH…HPH…HPH…HPH…HPH」","L"
		PRINTFORMDL きもちいい。きもちいい。きもちいい。きもちいい。きもちいい
		PRINTFORMDW 動かなくなったドレミーをレイプする。きもちいい
		PRINTFORMDW ビュルッっと最後の射精を行った後、%CALLNAME:MASTER%は意識を飛ばした
		PRINTFORML ………
		PRINTFORML ……
		PRINTFORML …
		PRINTFORMW 「大丈夫ですか？%CALLNAME:MASTER%」
		PRINTFORMDL 気が付くと、%CALLNAME:MASTER%はドレミーに膝枕され頭を撫でられていた
		PRINTFORMDL 冷静になった頭で考えると、実はとんでもないことをしてしまったのではないか…
		PRINTFORMDW 一度は流された身ながら、ドレミーに薬なんて止めるべきだと訴える
		PRINTFORML 「…ああ、これですか？ただの砂糖ですよ」
		PRINTFORMW 「プラセボというのは凄いですねぇ…%CALLNAME:MASTER%ったら面白いようにトリップしてしまって」
		PRINTFORMDL …ということは、ドレミーのあれは全て演技だったということなのか…
		PRINTFORML 「まあ、仮にあれが本物だったとしても案ずることはありません」
		PRINTFORML 「ここであったことは全て夢の中での出来事…泡沫の夢なのですから…」
		PRINTFORMDW 安心からかセックスの疲れからか、強い疲労感に襲われた%CALLNAME:MASTER%はそのままドレミーの膝枕で眠りへと落ちていった…
		CALL ADD_SAMEN_V(109, BASE:MASTER:精力)
		EXP:109:精液経験 += 10
		EXP:109:膣射経験 += 10
		EXP:109:Ｖ性交経験 += 10
		EXP:109:絶頂経験 += 9
		EXP:MASTER:絶頂経験 += 9
		EXP:MASTER:射精経験 += 10
		EXP:MASTER:挿入経験 += 10
		TALENT:MASTER:120 = 0
		CFLAG:MASTER:徹夜 = 1
	CASE 5
		PRINTFORMDL 冷たい床の感触に目を覚ますと、しゃがんでこちらを見下ろすドレミーの姿が目に映った
		PRINTFORMDW いくら何でも寝相が悪すぎだろう。そう思いながら起き上がろうとすると、首に違和感を感じる…
		PRINTFORML 「ぐっすり寝てましたねぇ…まあ犬は一日の半分を寝て過ごすらしいですから？仕方ありませんよね」
		PRINTFORMDW なんと、%CALLNAME:MASTER%の首には犬用の首輪がはめられていた
		PRINTFORML 「さあ、%CALLNAME:MASTER%。散歩の時間ですよ」
		PRINTFORMDW 何が何だか分からない。ドレミーに首輪を外すように頼もうとするが…声が出ない
		PRINTFORML 「ほら、犬なんですから畜生のように這いつくばってワンワン言いなさいな」
		PRINTFORMW 「バカ犬ですねぇ本当に…」
		PRINTFORMDL 散々な言われようだ…だが、どうやらドレミーの様子を見る限り本気のようだ
		PRINTFORMDW 時間を止めようとするが、なぜか発動しない…現状、ただの『犬』でしかない%CALLNAME:MASTER%は渋々従った
		PRINTFORML ………
		PRINTFORMDW ドレミーは%CALLNAME:MASTER%の首輪にリードを取り付け、散歩の準備をしている
		CALL HPH_PRINT,@"「あ、何か足りないと思ったら…HPH」","W"
		PRINTFORMDL 大事な事を忘れていたとばかりにポンと手を打つと、ドレミーはどこからか尻尾の形をしたアナルプラグを取り出してきた
		CALL HPH_PRINT,@"「犬なんですから、尻尾がなきゃいけませんよねHPH」","W"
		PRINTFORMDL 冗談ではない。%CALLNAME:MASTER%が抵抗しようとするが、リードをグイッと引っ張られると途端に力が抜ける
		PRINTFORMDW 地面に倒れ込んでしまった%CALLNAME:MASTER%の腰をドレミーがグッと掴むと、菊座に顔を近付けていく
		CALL HPH_PRINT,@"「いきなりは痛いと思いますから、ほぐしてあげますよ……れろっHPHずるるるっHPH」","W"
		PRINTFORMDL %CALLNAME:MASTER%は戦慄した。ドレミーは%CALLNAME:MASTER%のアナルを丹念に嘗め回し、舌を突っ込み、吸い上げている
		PRINTFORMDL 舌が往復する度に背筋が凍るような感覚が全身を駆け巡り、思わず情けない声を上げながら呻いてしまう
		PRINTFORMDW 腸液を啜り、鼻息を荒くしながら直腸ヒダの一枚一枚まで味わい尽くすドレミーの表情は見えない
		CALL HPH_PRINT,@"「じゅずるるっHPH…ふぅ…こんなものですかね」","L"
		PRINTFORMDL 当初の目的を忘れたかのように肛門にむしゃぶりついていたドレミーが満足気に口を離す…
		PRINTFORMDW プライドをズタズタにされ放心状態の%CALLNAME:MASTER%は差し込まれるアナルプラグを茫然と受け入れた
		PRINTFORML ………
		PRINTFORMW 「今日も良い天気で、絶好の散歩日和ねぇ…」
		PRINTFORMDL ここが現実なのかどうかも分からない
		PRINTFORMDW 肛門の違和感に顔を顰めながらも、『犬』はドレミーに引っ張られるがままに散歩をする
		PRINTFORML 「おや、あんな所で羊が跳ねてますよ」
		PRINTFORMDW ワンと気怠げに『犬』が返事をする
		PRINTFORML 「嬉しそうじゃないわね…媚びの売り方を忘れてしまったのかしら？」
		PRINTFORMDL そう言うとドレミーは『尻尾』を左右にグイグイと動かす
		PRINTFORMDW 『犬』は苦しそうに呻きながら、ワンッワンッっと精一杯演技をした
		PRINTFORMDL 従順なペットとして振舞う姿に『飼い主』は満足そうに微笑むと、『犬』の顎の下を撫ぜる
		CALL HPH_PRINT,@"「良い子に出来たご褒美をあげないといけませんねHPH」","W"
		PRINTFORML ………
		CALL HPH_PRINT,@"「あんっHPHそうっHPH上手いですよ…HPH」","W"
		PRINTFORMDL ぺちゃぺちゃと愛液を嘗める音が辺りに響く
		PRINTFORMDW まるでバター犬のように扱われながら、『犬』は『飼い主』の自慰に付き合わされていた
		CALL HPH_PRINT,@"「んんっHPHそこもっと嘗めてHPH」","L"
		PRINTFORMDL 女陰を嘗めほぐしながら陰核の皮を剥くように舌を動かすと、『飼い主』は恍惚の表情でブルっと身体を震わせた
		PRINTFORMDL 『犬』はとめどなく溢れてくる甘美な蜜を味わいながら、彼女のすらりと伸びた脚に勃起した肉棒を擦り付ける
		PRINTFORMDW 『飼い主』に奉仕する『犬』は腰を左右に振り喜びを表し、精一杯媚びを売っていく…
		CALL HPH_PRINT,@"「ふふっHPHエッチなワンちゃんですねぇHPH」","L"
		PRINTFORMDL 『飼い主』は体勢を変えると、媚びる雌犬のように尻をこちらに向け揺らす
		PRINTFORMDW 本能に忠実な『犬』は目の前の『雌』を孕ませるべく、愛液を滴らせる蜜壺に剛直を打ち込んだ
		PRINTFORML ………
		CALL HPH_PRINT,@"「あっHPHオッHPHもっと犬みたいに腰振ってッHPH～～～ッHPH HPH HPH」","W"
		PRINTFORMDL 遠慮など欠片も考えていないかのような腰使いで『犬』は『雌』を犯す
		PRINTFORMDW ここに来て、主従は完全に逆転していた
		CALL HPH_PRINT,@"「ふぅうっHPHくぅんッHPHワンッHPH」","L"
		PRINTFORMDL 自らの種族を忘れた『雌』はひたすらに喘ぎ歓喜に吠える
		PRINTFORMDL ごちゅっ、ぼちゅっ、と重い水音が響く度に泡立った女陰から本気汁が掻き出される
		PRINTFORMDW 締まりの良い蜜壺にあっという間に限界が来た『犬』は、『雌』の開き切った子宮口に腰を打ち込み精を注ぎ込んだ
		CALL HPH_PRINT,@"「はぉ゛ッHPHオ゛ぉッHPHオ゛ぉ゛お゛お゛オ゛ッッHPH HPH HPH」","L"
		PRINTFORMDL 獣のような咆哮を上げた『雌』が白目を向き気絶するが、『犬』は確実に孕ませるべく『雌』の腰を掴んで種付けを続行する
		PRINTFORMDW ビューーッ、ビューーッ、と長い長い射精を終え肉棒を引き抜くと、ゴボッと大量の精液が逆流してきた…
		PRINTFORML ………
		PRINTFORML ……
		PRINTFORMW …
		PRINTFORML 「その…やり過ぎました。反省します」
		PRINTFORMDW 事が終わり、%CALLNAME:MASTER%はドレミーを正座させ説教していた
		PRINTFORML 「私を放置した%CALLNAME:MASTER%も悪いのですよ」
		PRINTFORML 「%CALLNAME:MASTER%がもっと愛してくれればこのようなことをしなくても…」
		PRINTFORMDW …確かに、欲求不満のドレミーを放っておいた自分にも責任があるのかもしれない
		PRINTFORML 「ここであったことは夢の中の出来事…目を覚ませば%CALLNAME:MASTER%は忘れてしまうでしょう」
		PRINTFORML 「ですが、私が%CALLNAME:MASTER%を愛しているということだけは…忘れないでくださいね」
		PRINTFORMDW ドレミーにお休みのキスをされると、%CALLNAME:MASTER%の意識は闇に落ちていった……
		CALL ADD_SAMEN_V(109, BASE:MASTER:精力)
		EXP:109:精液経験 += 5
		EXP:109:膣射経験 += 5
		EXP:109:Ｖ性交経験 += 5
		EXP:109:絶頂経験 += 4
		EXP:MASTER:Ａ経験 += 2
		EXP:MASTER:絶頂経験 += 4
		EXP:MASTER:射精経験 += 5
		EXP:MASTER:挿入経験 += 5
		TALENT:MASTER:120 = 0
		CFLAG:MASTER:徹夜 = 1
	CASE 6
		PRINTFORMDL …ふと%CALLNAME:MASTER%が目を覚ます。だが視界は黒一色で何も見えない
		PRINTFORMDW 月明りすら入らないのはおかしい…そう思っていると、自分が目隠しをされている事に気が付いた
		PRINTFORML 「…おや、目覚めたようですね」
		PRINTFORMDW この声はドレミーだろうか。その姿を見ることはできないが、彼女はとても落ち着いているように感じる
		PRINTFORML 『なぜ自分は目隠しをされているのか…そう言いたげですねぇ？』
		PRINTFORMDL 今度は背後からドレミーの声が聞こえてくる
		PRINTFORMDW しかし、正面からドレミーが移動したといった感じではなさそうだ…
		PRINTFORMW 「「驚かせてしまったようですね。実は私、分身できるのですよ」」
		PRINTFORMDW …なるほど、と納得しかけたところで何故目隠しをされているのか答えていないことを指摘した
		PRINTFORML 「…%CALLNAME:MASTER%は射精管理というものを知っていますか？」
		PRINTFORMW 『スケベな%CALLNAME:MASTER%なら分かりますよね？今日はそれを実践してみようと思いまして』
		PRINTFORMDL 少なくとも、いつものようにセックス…というわけではないことは分かる
		CALL HPH_PRINT,@"「では、始めましょうか…HPH」","W"
		PRINTFORML ………
		PRINTFORML 「んっ、んっ、…ふふ、夢魂オナホ気持ち良い？」
		CALL HPH_PRINT,@"『んじゅっHPHじゅるるっHPHんぐっHPH』","W"
		PRINTFORMDL 手錠を掛けられ吊るされた%CALLNAME:MASTER%は、ドレミー達に夢魂で肉棒を扱かれつつ尻穴を嘗め回されている
		PRINTFORMDW 長い舌が執拗に前立腺を刺激し、%CALLNAME:MASTER%はすぐに射精しそうになるが尿道に満たされた夢魂がそれを許さない
		PRINTFORML 「腰カクカク振っちゃって…苦しいですか？でもダメですよ」
		CALL HPH_PRINT,@"『%CALLNAME:MASTER%のお尻のナカ、とっても美味しいですよ…HPHじゅぷっHPHれろっHPH』","W"
		PRINTFORMDL ドレミーの舌がＳ状結腸の先、下行結腸まで到達しヒダを一枚一枚丁寧に嘗め回す
		PRINTFORMDW 熊は生きたまま内臓を食べるというが、その被害者はこのような感覚を味わうのだろうか…獏だけど…
		PRINTFORML 「すごい、玉袋がこんなに腫れあがって…大丈夫ですか？…大丈夫そうですね」
		CALL HPH_PRINT,@"「だって、こんなに気持ち良さそうな顔をしているのですから…HPH」","W"
		PRINTFORMDL 肉棒を扱くドレミーの手が加速する。%CALLNAME:MASTER%は無意識に、存在しない子宮に向かって種を付けるかのように腰を振ってしまう
		PRINTFORMDW そんな無様な姿を、二人は軽蔑することなく寧ろ愛おしい存在を見るかのような優しさで見つめていた
		CALL HPH_PRINT,@"『んるっHPHぷはっ…%CALLNAME:MASTER%のお尻の穴、女の子みたいに蕩けてますよ…HPH』","L"
		CALL HPH_PRINT,@"『挿入れたら…きっと気持ち良いでしょうねぇ…HPH』","W"
		PRINTFORMDL 尻穴を貪っていたドレミーが口を離すと、肛門になにやら硬いものが当たる感触があった
		PRINTFORMDW まさかと思った瞬間にはもう遅く、その物体…ドレミーの肉棒が蕩けた%CALLNAME:MASTER%のアヌスに抵抗なく侵入してきた…
		CALL HPH_PRINT,@"『は、ぁぁああっ♪HPH HPH HPHきもち、いぃ…っHPH』","L"
		PRINTFORMDL 腸内の熱い感触にドレミーは我を忘れ、ひたすらに腰を振りたくっている
		PRINTFORMDW パンパンと腰が打ち付けられる度に、否応にもアナルセックスの悦びを教えられてしまう…
		CALL HPH_PRINT,@"「そんなにヨガって…お尻の穴犯されるのがそんなに気持ち良いのですか？HPH」","L"
		PRINTFORMDL ドレミーはなんとも嬉しそうな表情を浮かべながら、まるで変態を調教するかのように夢魂オナホを動かしている
		PRINTFORMDW とうに限界を超えた肉棒ははち切れんばかりに膨張し、決壊寸前のダムのように精液を尿道に留めている…
		CALL HPH_PRINT,@"『ん、っふふHPHびゅるびゅるって、射精したいですか…？HPHぉっ…HPHでも、私が出すまでダメですよ…HPH』","L"
		CALL HPH_PRINT,@"「そういうことなので、頑張ってください…ちゅっHPH」","W"
		PRINTFORMDL ドレミーは手を上下させながら、%CALLNAME:MASTER%に寄り添いキスをしている
		PRINTFORMDL 背後では発情した獣が子宮口代わりだとでも言うかのように前立腺を小突いてくる…
		PRINTFORMDW 狂いそうな快楽の波に、ついに%CALLNAME:MASTER%は理性を投げ捨て無様にメスイキすることを選択した…
		CALL HPH_PRINT,@"『い、っくHPHふぁ、あぁあああっ♪HPH HPH HPH』","L"
		CALL HPH_PRINT,@"「あ、すごっ…HPH夢魂を押し上げて…HPH」","L"
		PRINTFORMDL 背後のドレミーが腰を押し付け、腸内に子種を流し込んでくる…
		PRINTFORMDL それと同時に、肉棒から決壊した白濁流が夢魂を突き破り噴火のように噴出し辺り一面を真っ白に染め上げる
		CALL HPH_PRINT,@"「ふふ、頑張りましたね…HPHほら、ぴゅっぴゅって射精し切っちゃいましょうHPH」","W"
		PRINTFORMDW …永遠に続くかと思われた射精が終わり、精魂尽き果てた%CALLNAME:MASTER%の拘束をドレミーが外す
		CALL HPH_PRINT,@"「最後は…もちろん膣内ですよHPH」","W"
		PRINTFORMDL ドレミー達はベッドに寝転がると、秘所を開き雄を誘う
		PRINTFORMDW あれだけ射精したというのに未だ足りぬ様子の%CALLNAME:MASTER%は、眼前の雌に獣欲のまま襲い掛かった…
		PRINTFORML ………
		CALL HPH_PRINT,@"「もうっ許してっHPHゆるしっHPHん゛ぉ゛お゛お゛ッッHPH HPH HPH」","W"
		PRINTFORMDL %CALLNAME:MASTER%は涙を流し懇願するドレミーに構うことなく、ただ尽きぬ欲望を吐き出すために目の前の雌をレイプする
		PRINTFORMDW 傍らには、散々両穴を犯し倒され穴という穴から精液を垂らし失神した分身のドレミーが横たわっていた
		CALL HPH_PRINT,@"「お゛ッHPHほ、ぉ゛お゛ッHPHし、しんじゃっHPHあ゛ぁ゛ッHPH」","L"
		PRINTFORMDL ドレミーは見誤っていた。%CALLNAME:MASTER%の性欲を
		PRINTFORMDL すでに子宮から逆流した精液が床まで滴るほどの量を放っている。だが今だに眼前の雄は萎える気配を見せない
		PRINTFORMDW 散々獣欲を受け止め真っ赤に充血し腫れあがっている女陰は、隙間から精液を溢れさせながらも健気に肉棒を頬張っている
		CALL HPH_PRINT,@"「でもっHPHこれっHPHきもち、よすぎッッHPH死んでも、いいかもっHPH HPH HPH」","L"
		PRINTFORMDL 夢の世界で死んでしまっても、結局のところ問題ない。なぜなら全て夢なのだから
		PRINTFORMDL 結果として、欲求不満は解消されたのだからここは良しとしよう…
		PRINTFORMDW 卑しい雌の本懐を果たしたドレミーは、じき考えることを止め肉欲の宴に狂っていった
		PRINTFORML ………
		PRINTFORML ……
		PRINTFORMW …
		PRINTFORML 「はぁ…ふぅ…気持ち、良かったですか…？」
		PRINTFORMDW 肉欲の宴が終わり、%CALLNAME:MASTER%はドレミーに膝枕され休んでいる
		PRINTFORML 「普通が一番？…まぁ、そうですね。今日みたいなことが続くと…」
		CALL HPH_PRINT,@"「……でも、偶にはいいですよねHPH」","W"
		PRINTFORMDL つぎは普通に３Ｐがしたい。そう言うとドレミーに額を弾かれた
		PRINTFORML 「今日は特別でしたが、私はあまり気乗りしませんねぇ…自分の分身といえど、あまり%CALLNAME:MASTER%に触れてほしくありませんから」
		PRINTFORMDW かわいい嫉妬心を向けられ、悪い気はしない
		PRINTFORML 「何にせよ…ここであったことは全て夢の中での出来事。泡沫の夢というわけです」
		PRINTFORML 「さあ、眠りなさい。%CALLNAME:MASTER%が目覚める時まで私が見守ってあげますよ」
		PRINTFORMDW ドレミーにお休みのキスをされると、%CALLNAME:MASTER%の意識は闇に落ちていった……
		CALL ADD_SAMEN_V(109, BASE:MASTER:精力)
		EXP:109:挿入経験 += 5
		EXP:109:精液経験 += 10
		EXP:109:膣射経験 += 10
		EXP:109:Ｖ性交経験 += 10
		EXP:109:絶頂経験 += 9
		EXP:MASTER:Ａ経験 += 5
		EXP:MASTER:Ａ性交経験 += 5
		EXP:MASTER:絶頂経験 += 9
		EXP:MASTER:射精経験 += 10
		EXP:MASTER:挿入経験 += 10
		TALENT:MASTER:120 = 0
		CFLAG:MASTER:徹夜 = 1
ENDSELECT

;-------------------------------------------------
;名前を教えるイベント（関数）
;ナズーリン口上からお借りしました
;-------------------------------------------------
@NAME_SET_K109
PRINTL 名前を入力してください(敬称を付けたい場合はそれ込みで入力してください)
IF NAME:MASTER != "あなた"
	LOCALS = %CALLNAME:MASTER%
ELSE
	LOCALS = %NAME:MASTER%
ENDIF
PRINTBUTTON @"[%LOCALS%で決定]", @"%LOCALS%"
PRINTL
;名前を入力するループ
$INPUT_LOOP_ONAMAE
INPUTS
; 行頭行尾の空白文字削除
LOCALS = %RESULTS%
REPLACE LOCALS, "\(\^\\s\+\|\\s\+\$)", ""
;10文字以上は受け付けない
IF STRLENS(LOCALS) > 10
	CLEARLINE 1
	REUSELASTLINE 名前が長すぎます
	GOTO INPUT_LOOP_ONAMAE
;空白は受け付けない
ELSEIF RESULTS == ""
	PRINTL 名前を入力してください
	GOTO INPUT_LOOP_ONAMAE
ELSE
	PRINTFORML %RESULTS%で決定しますか？
	PRINTL [0] はい
	PRINTL [1] いいえ
	;入力した名前を確定するループ
	$INPUT_LOOP_KAKUTEI_1
	INPUT
	IF RESULT == 0
		;あなたの名前を%MASTERNAME:109%に格納
		MASTERNAME:109 = %RESULTS%
		PRINTFORML
	ELSEIF RESULT == 1
		PRINTL 名前を入力してください
		GOTO INPUT_LOOP_ONAMAE
	ELSE
		PRINTL 名前を入力してください
		GOTO INPUT_LOOP_ONAMAE
	ENDIF
ENDIF

path: 原版+前人整合等各种readme/パッチ/eraTW4.810用 修正パッチ/ERB/口上・メッセージ関連/個人口上/ドレミー/M_KOJO_K109_イベント.ERB