code:
[SKIPSTART]
eraTheWorld proto4.733用 さとりん口上
あなたの能力も行為も全バレ状態の、ある意味一番難しい人
本来は[プライド高い][一線越えない]の効果なんだろうけど、信頼が非常に上がりにくいのも内心を悟ってるからという事にしてみる
心読めてるのに弱味を握れないのは、心を読んだだけだと回りが納得しないから弱味になり得ないので
人の嘘があまりにも簡単に読めちゃうさとりんは、嘘はつかない子だよ、ただ何も言わない事で結果的にウソをつくことはあるよ
服従が導入されたら、凄いドＭロ少女になる、かもしれない？
現在、愛欲当は恋慕と同じ扱い……てか、ぶっちゃけその辺まで書き分けようとすると地獄見そうなんで、後々の課題にしておく
なりきり対応しようとして地獄みる,ので諦めた
妊娠対策のピルは、ずっとしてないと意味がない？　ので、時姦とは関係なしに飲みっぱなしに変更
システム的にさとりは完全な生解禁までは、妊娠ほぼ出来ないってことになりそう？
ピル飲みっぱなしだと永久に生解禁は発生しないので、それに変わる手段としてゆかりんに話を通してみた
生解禁までは妊娠出来なくしたぞー
すごい勝手な改変として、思慕以上の陥落素質(合意含む)が着くまでor恋慕以上の陥落素質がない状態で時止めで家族に手を出してる場合は、酔いません。泥酔するわけには行きませんもの
引っ越しパッチに対応しようとして地獄見る(2回目
よっぱらいもーどをイベントに対応させようとして地獄見る（3回目
酔っ払いモードかいててなんとなく気づく、行動や言動が素面のこいしっぽい(ぇ
CFLAG:清い交際がついた状態で恋人になると、甘えんぼさとりにヘンシン！
ただでさえ、終わりが見えないのにさらにハードルを上げてどうする……orz
そして、甘えんぼさとりんOFF条件の一つだった家族への時姦有りは無くすことに、時止めバリアントで口上キャラはともかく、関係あるとは言え他のキャラにまで派生させるのは問題な気がしてきたので
存在しなくなったイベントorなりきりを別TXTファイルに移動
[SKIPEND]
;-------------------------------------------------
;※※※※※※他者による修正、加筆、改変についての但し書き※※※※※
;前提としてオリジナル作者以外が手を入れる場合は、オリジナル作者の許可を求めること
;オリジナル作者とコンタクトが取れない場合には以下の但し書きに従ってUPできるかどうか判断してください。

;**** FlagManagement **********************************************************
;本口上にて使用しているCFLAG・TCVAR等
[SKIPSTART]
本口上にて使用しているCFLAG・TCVAR等
CFLAG:1490 bit0,お燐おくうこいしに時姦をしたことがある・bit1,一度でも弱味が付いたことがある・bit2,ナマ出し拒否・bit3,薬入りお茶使用有無・bit4,住み込みお願い二回以上・bit5,遠距離オナニー実況有無・bit6,甘えんぼさとりん制御・bit7～10,甘えんぼさとりん終了関係・bit11,愚痴聞き怒り判定・bit12,服脱がし特殊判定
CFLAG:1491 bit0,時姦・bit1,処女喪失
CFLAG:1492 bit0,目覚めの挨拶多重表示抑制・bit1,お出かけお誘い後の表示抑制・bit2,眠そうにしてる場合の表示抑制
CFLAG:1493 逢えなかった日数
CFLAG:1494 無自覚射精多重時表示抑制
CFLAG:1495 眠たがってるさとりの口上制御
CFLAG:1496 新地底MAPにて、PETと怨霊と鬼に対する反応を変えるテスト
IF FLAG:70
	CALL STOP49
ELSEIF CFLAG:TARGET:睡眠
	CALL SLEEP49
ELSEIF CFLAG:うふふ == 2
	CALL UFUFUTO49()
ELSEIF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
	CALL DRUNKER49()
ELSEIF 陥落状態() >= 4
	IF 陥落状態() == 5
	ELSE
	ENDIF
ELSEIF 陥落状態() == 3
ELSEIF 陥落状態() == 2
ELSEIF 陥落状態() == 1
ELSE
ENDIF

\@ 陥落状態() >= 4 ? 主様 # %CALLNAME:MASTER% \@
\@ FLAG:なりきり == 38 ? おねえちゃん # さとり様 \@
[SKIPEND]
;
;
;
;******************************************************************************

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

;RESULTS = _TEST_

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

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

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

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

;一度でも弱味が付くと、優しくなくなるよ
SIF CFLAG:49:10
	SETBIT CFLAG:49:1490,1

;時姦される可能性を考慮して、生解禁までは紫に頭を下げて体内にスキマを仕込んでもらってるよ
IF (CFLAG:49:生解禁 == 1 && ESTRUS_CYCLE(49) == 150) || !CFLAG:49:生解禁
	EX:膣内精液 = 0
ENDIF

;時止めでお燐おくうこいしに手を出されると怒るよ
FOR LOCAL,36,39
	IF EXP:LOCAL:60 || EXP:LOCAL:61 || EXP:LOCAL:62 || EXP:LOCAL:63
		SETBIT CFLAG:49:1490,0
	ENDIF
NEXT

;家族に手出して怒ってる場合or思慕以上がつくまでは、五帝の一人・舜が使った呑んでも絶対酔わない薬を使ってます(アイテムの酔い止め薬とは関係ありません
IF 陥落状態(49) == 2 || !陥落状態(49)
	BASE:酒気 = 0
ENDIF

;眠たがってるさとりんをいじめないでください
SIF CFLAG:49:1495 && ((DAY:3 <= 31 && CFLAG:49:1495 < DAY:3) || (CFLAG:49:1495 == 31 && DAY:3 == 1))
	CFLAG:49:1495 = 0

;時間停止バレ地の文が存在するので、勝手に使用してみた。なぜか時間停止無しでやってる人が多いらしいけど
CFLAG:49:345 = 1

CFLAG:49:1496 = 0
IF (CFLAG:MASTER:現在位置 == 950 || WITH_MOB() == 9)
	IF CHK_FOCUS(927,CFLAG:MASTER:現在位置,930)
		CFLAG:49:1496 = 1
	ELSEIF CHK_FOCUS(931,CFLAG:MASTER:現在位置,948)
		CFLAG:49:1496 = 0
	ELSE
		CFLAG:49:1496 = 2
	ENDIF
ENDIF

[SKIPSTART]
SIF BASE:49:怒り = MAXBASE:49:怒り
	SETBIT CFLAG:49:1490,11
[SKIPEND]

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

CFLAG:49:眠姦口上有 = 1
CFLAG:49:時間停止口上有 = 1
;CFLAG:X:なりきり口上有 = 0
;CFLAG:X:破瓜キャンセル口上有 = 0
;CFLAG:X:口上内抱き寄せ判定_初回 = 0
;CFLAG:X:口上内抱き寄せ判定_通常 = 0

;CFLAG:押し倒し禁止に1を入れると自分から押し倒してこなくなります
;以下は恋慕かセフレがつくまで押し倒してこなくなる使用例
;IF !TALENT:X:恋慕 && !TALENT:X:セフレ
;	CFLAG:X:押し倒し禁止 = 1
;ELSE
;	CFLAG:X:押し倒し禁止 = 0
;ENDIF

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

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

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

IF FIRSTTIME("UP01",0,49) && !GETBIT (CFLAG:49:1490,0)
	PRINTL 一回限りの質問です
	PRINTL キャラ崩壊あまえんぼさとりんモードは必要ですか？
	PRINTL なお、この選択肢を取り消すことは出来ません、ご注意ください
	CALL ASK_YN
	IF !RESULT
		PRINTL 特定条件下において、キャラ崩壊あまえんぼさとりんモードが発動します
		PRINTL とある条件に置いて、甘えんぼさとりんモードは強制終了します
		SETBIT CFLAG:49:1490,6
	ENDIF
	PRINTW
ENDIF
PRINTL
IF FIRSTTIME("UP02",0,49)
	PRINTL さとりと恋人になってる場合、素質が変動します
	IF TALENT:49:恋人
		IF CFLAG:49:清い交際 && GETBIT (CFLAG:49:1490,6)
			PRINTL 甘えんぼさとりんの際は、さらに素質が変動します
			PRINTL 注意、甘えんぼさとりん終了時には、下記二種の素質は元の状態に復帰します
			PRINTL
			PRINTL さとりは、[素直]を得た
			TALENT:49:態度 = -1
			PRINTL さとりは、[サド]を失った
			TALENT:49:サド = 0
		ENDIF
		PRINTL
		PRINTL さとりは、[プライド高い]を失った
		TALENT:49:プライド = 0
		PRINT さとりは、
		IF TALENT:MASTER:性別 == 2
			TALENT:49:性別嗜好 = 0
			PRINTL [男嫌い]を失った
		ELSE
			TALENT:49:性別嗜好 = -1
			PRINTL [両刀]を得た
		ENDIF
	ENDIF
	PRINTW
ENDIF
RESETCOLOR
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K49
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
;経験の変更は齟齬が出る場合がありますので、CSVを修正し同梱する事を推奨します
PRINTL
IF FIRSTTIME("UP01",0,49)
	PRINTFORMDL 『一回限りの質問です』
	PRINTFORMDL 『キャラ崩壊あまえんぼさとりんモードは必要ですか？』
	PRINTFORMDL 『なお、この選択肢を取り消すことは出来ません、ご注意ください』
	CALL ASK_YN
	IF !RESULT
		PRINTFORMDL 『特定条件下において、キャラ崩壊あまえんぼさとりんモードが発動します』
		PRINTFORMDL 『それと、とある条件に置いて、甘えんぼさとりんモードは強制終了します』
		SETBIT CFLAG:49:1490,6
	ENDIF
ENDIF
PRINTL
PRINTL
PRINTL
PRINTL
PRINTW
;周回用特殊（他のイベントとかでは基本触れない方向で
IF FLAG:周回数
	PRINTFORML 「……待ちなさい」
	PRINTFORMDL 不意にかけられた声に、にやりと笑い振り返る
	PRINTFORML 「『やっと会えた』？　……なぜ、そんな事を考えるんです」
	PRINTFORMDL さとりの不審そうな問いかけに、”前回”の事をわざと脳裏に浮かべる
	IF GETBIT(CFLAG:引き継ぎ, 1)
		PRINTFORMD 主様と呼んでなついていたあの愛くるしい笑顔
	ELSEIF GETBIT(CFLAG:引き継ぎ, 0)
		PRINTFORMD 楽しそうに笑っていたあの姿
	ELSE
		PRINTFORMD さとりと時々出会って過ごした日々
	ENDIF
	PRINTFORMDL を思い浮かべると同時、
	PRINTFORML 「……そんな、まさか……あり得ません、いくらなんでもあり得るはずが」
	PRINTFORMDL 呆然とした表情で、こちらを見つめてくる
	PRINTFORM 「同じ事を
	SIF FLAG:周回数 > 1
		PRINTFORM {FLAG:周回数}回も
	PRINTFORML 繰り返すなんて、何がしたいんですか」
	PRINTFORMDL ぽつりと呟くさとりが、なぜかわずかに怒りを浮かべて見つめてくる
	PRINTFORML 「前の事を無かったことにして、やり直して何が楽しいんですか」
	PRINTFORML 「前の私が、%CALLNAME:MASTER%に向けた感情は、無くなっても良い程度のものだったんですか」
	PRINTFORMDL その言葉に、同じ感情をもう一度向け合う事になるのだから、問題ないと答える%CALLNAME:MASTER%
	PRINTFORML 「たしかに、以前の私は%CALLNAME:MASTER%に意を向けたかも知れません」
	PRINTFORML 「けれど、今回もそうなるとは思わないことですね」
	PRINTFORMDW そう言って顔を背けるさとりに、ソレはソレで楽しそうだと笑う%CALLNAME:MASTER%だった
;地底以外には、千客万来か願掛けで来る筈？　願掛けで呼んだ場合のことは考えない
;神社に住んでてさとりが来た場合
ELSEIF GET_MAPID(CFLAG:MASTER:現在位置) == MAIN_MAP && MAIN_MAP == 0
	PRINTFORML 「こんにちは」
	PRINTFORMDL 新たな訪問客の姿に、%CALLNAME:MASTER%は霊夢の人気の高さに苦笑を浮かべる
	PRINTFORML 「私は古明地さとり。最近、このあたりが面白いことになってると聞いて来たのですが……」
	PRINTFORMDL そう告げる少女の、せっかくの可愛い顔立ちに、どこか冷めた表情が似合ってない
	PRINTFORMDL その表情のまま時間を凍らせて、体をいらってやるのも面白そうだとそんなことを考え、
	PRINTFORML 「なるほどそう言うことですか。まあ、好きにしたら良いでしょう」
	PRINTFORML 「わざわざ触れ回るつもりまではありませんが、程ほどにしておいた方が良いでしょうね」
	PRINTFORMDL 冷めた表情から、軽蔑するような表情へと変えるさとり
	PRINTFORMDL 能力を見破られた事を悟った%CALLNAME:MASTER%は、脇の下に冷や汗をかいてしまう
	PRINTFORML 「これからは、しばしばこちらを訪なうことにさせて頂くとしましょうか」
	PRINTFORMW 「お燐やおくうやこいしの為にも」
;命蓮寺に住んでてさとりが来た場合
ELSEIF GET_MAPID(CFLAG:MASTER:現在位置) == MAIN_MAP && MAIN_MAP == 1
	IF GETBIT (TALENT:MASTER:性別,0)
		PRINTFORML 「人間と妖怪を分け隔てしないとは聞いていましたが……」
	ELSE
		PRINTFORML 「……尼寺ではないとは言え、女性ばかりのところに男性がいて良い物なのかしら」
	ENDIF
	PRINTFORMDL 背後から聞こえてきた声に訝りながら振り返る
	PRINTFORMDL 麗しいというよりは、可愛いと言う形容が似合う少女が立っていた
	PRINTFORMDL もっとも、その顔に浮かぶどこか冷めた表情にもったいなさを覚えて
	PRINTFORMDL 時止めで嬲りたおして、また動かし始めたときの、だらしない顔で悦鳴をあげるところを見てみたい
	PRINTFORMDL そんな思いが脳裏を過ぎる
	PRINTFORML 「初めまして、私は古明地さとり。妹が世話になったと聞いて訪れたのですが」
	PRINTFORMDL その名乗りに、すこしだけイヤな汗が浮かんだことを自覚する
	PRINTFORML 「ええ、ここに住んでいるならこいしを知っているでしょうし」
	PRINTFORML 「こいしを知っているなら、私のことも『知って』いますよね」
	PRINTFORMDL その言葉にうなずきを返す、位しか出来ない
	PRINTFORML 「時を止められる、面白い能力ですし、能力を使うなと言っても無駄だとわかっています」
	PRINTFORML 「……けれど、私の家族にその力を向けたら、許しませんから」
	PRINTFORMDW 返す言葉は見つからなかった
;人里に住んでてさとりと出会った場合
ELSEIF GET_MAPID(CFLAG:MASTER:現在位置) == MAIN_MAP && MAIN_MAP == 2
	PRINTFORML 「すこし、待ってください」
	PRINTFORMDL 人里の路地からかけられた声に訝りながら、視線を向ける%CALLNAME:MASTER%
	PRINTFORMDL 不機嫌そうな少女が、じろっとこちらを睨んでくる
	PRINTFORMDL 愛らしい顔立ちとは裏腹の表情に、僅かな苛立ちを覚え時止めで嬲ろうかと思うと同時
	PRINTFORML 「不機嫌そうな表情で悪かったですね。少し用事があって上がってきましたが、来て良かった」
	PRINTFORMDL 内心を言い当てられ、冷や汗が浮かんだ。
	PRINTFORML 「『そういえば、覚という妖怪がいるとか』そのとおりですよ、私の名前は古明地さとり」
	PRINTFORML 「ああ、別にその不埒な所業や心情を曝け出したりしないからその点は安心してください」
	PRINTFORMDL 普通なら、信じられないであろうその言葉が、なぜか不思議と腑に落ちた
	PRINTFORML 「妖怪の言葉を信じるとか、奇妙な人ですね」
	PRINTFORML 「ただし、私の家族に手を出した場合は容赦しませんから」
	PRINTFORMDL さとりという妖怪には妹とペットがいる、そんな言葉をどこかで聞いたことを思い出す
	PRINTFORML 「では、失礼します」
	PRINTFORMDW すっと、頭をさげ、こちらの隣を通って歩み去るさとり、その残り香に邪な想いが湧いた
;紅魔館に住んでてさとりと出会った場合
ELSEIF GET_MAPID(CFLAG:MASTER:現在位置) == MAIN_MAP && MAIN_MAP == 3
	PRINTFORML 「……吸血鬼の館に、彼女以外の人間がいるなんて思いもしませんでしたね」
	PRINTFORMDL 背後からかけられた館の住人以外の声に、訝りながら振り返る%CALLNAME:MASTER%
	PRINTFORML 「『無表情のくせに可愛い顔だ、このまま時止めで嬲ろうか』？」
	PRINTFORMDL 思ったことをそのままオウム返しに口に出され、冷や汗が浮かぶ
	PRINTFORML 「こいしが時折遊びに来ると言うので、謝意を献じに来ただけですが、来て良かったです」
	PRINTFORML 「私の名前は古明地さとり、こいしの姉です」
	PRINTFORMDL 心を読み取る少女の言葉に、ただ冷や汗を浮かべつつ頷きを返す
	PRINTFORML 「ああ、別にその能力をどう使おうと勝手にすれば良いと思いますよ」
	PRINTFORML 「私の家族に手を出さなければ、の話ですが」
	PRINTFORMDL 冷たい古明地さとりの表情に、冷汗三斗とはまさにこのことと思えるほど、冷や汗をかきながら頷きを返す
	PRINTFORMDW 他の場所ならともかく、紅魔館（ここ）では咲夜に知られればなすすべがないのだから
;迷いの竹林に住んでてさとりと出会った場合
ELSEIF GET_MAPID(CFLAG:MASTER:現在位置) == MAIN_MAP && MAIN_MAP == 4
	PRINTFORML 「はぁ……、こんなことなら案内人を頼めば良かったかしら」
	PRINTFORMDL すこし離れた場所から聞こえてきた声に、訝りながら%CALLNAME:MASTER%は近づいていく
	PRINTFORM 「ああ、ちょうど良かった。
	IF CFLAG:現在位置 > 430
		PRINTFORM 永遠亭に用事があった
	ELSE
		PRINTFORM ここから帰りたい
	ENDIF
	PRINTFORML ので、案内してもらえませんか？」
	PRINTFORMDL うっそうと茂る竹林の中から出てきた不審人物に、平然と声を掛けてくる少女
	PRINTFORMDL その余裕が鬱陶しくて、時止めで嬲るつもりになったと同時、
	PRINTFORML 「生憎、私の体なんかを嬲ったところで、楽しくはありませんよ」
	PRINTFORML 「『そんなことはない』？　たかが肉体を嬲るより、心を労る方が楽しいでしょう」
	PRINTFORMDL 平然とそんな事を言い出す少女に、思考が読まれたことに、驚く%CALLNAME:MASTER%
	PRINTFORML 「あら、時を止める程度の能力があれば、心が読める程度の能力に驚く事でも無いでしょうに」
	PRINTFORMDL 淡々と呟くさとりに、自然とイヤな汗が湧く
	PRINTFORML 「ああ、別に吹聴するつもりはありませんから、それだけはご心配なく」
	PRINTFORML 「……ただし、私の家族に手を出せば、容赦はしませんので」
	PRINTFORML 「では、
	IF CFLAG:現在位置 > 430
		PRINTFORM 永遠亭
	ELSE
		PRINTFORM 竹林の入り口
	ENDIF
	PRINTFORML まで案内を頼めますか？」
	PRINTFORMDW 冷や汗をかきながら、%CALLNAME:MASTER%はさとりを永遠亭に案内した
;魔法の森に住んでてさとりと出会った場合
ELSEIF GET_MAPID(CFLAG:MASTER:現在位置) == MAIN_MAP && MAIN_MAP == 5
	PRINTFORMDL %CALLNAME:MASTER%は木陰から、魔法の森の住人には見えない少女を見咎めた
	PRINTFORMDL 表情の乏しさこそ惜しいモノの、整った顔立ちも少女と女の境目の体型は嬲るにはよさそうで
	PRINTFORML 「……何を見ているのですか」
	PRINTFORMDL 不意に、全くこちらに視線を向けずに、少女が声を投げかけてきた
	PRINTFORMDL 見つかっていない筈だと思い、時止めで嬲ろうかと考えると同時、
	PRINTFORML 「見えてはいませんが、視えていますよ」
	PRINTFORML 「時を止める能力ですか、使うなとは言いませんが、せめて顔くらい出したらどうです」
	PRINTFORMDL 心を読まれた驚きを隠しながら%CALLNAME:MASTER%は少女の前に立ちはだかった
	PRINTFORML 「私の名は、古明地さとり、人の心を読む妖怪覚ですよ」
	PRINTFORML 「ああ、別にあなたが何をしようが、周りに喧伝はしませんのでご安心を」
	PRINTFORMDL そこまでいったあと、じろりと睨んでくるさとり
	PRINTFORML 「ただし、私の家族に手をだせば、後悔しますよ」
	PRINTFORMDW どう後悔させるのか、僅かな興味を覚えつつ、%CALLNAME:MASTER%はさとりの言葉に頷きを返した
;妖怪の山（山麓）に住んでてさとりと出会った場合
ELSEIF GET_MAPID(CFLAG:MASTER:現在位置) == MAIN_MAP && MAIN_MAP == 7
	PRINTFORML 「天狗は縄張りに厳しいと聞きましたが……」
	PRINTFORMDL 背後から聞こえてきた声に、訝りながら振り返る%CALLNAME:MASTER%
	PRINTFORMDL 可愛い顔立ちに不似合いな冷たい表情を浮かべる少女が立っていた
	PRINTFORMDL このあたりでは見かけない顔に、時を止めて嬲り倒す気になった
	PRINTFORML 「なるほど、時間を止められるのなら、危難に遭うこともないのですか」
	PRINTFORMDL 誰にも知られていない能力を言い当てられて戸惑い、
	PRINTFORML 「『何故知られた』？　視れば解りますよ。私の名は、古明地さとり」
	PRINTFORML 「『覚がどうしてこんなところに』？　あなたに語る理由はありませんね」
	PRINTFORML 「それと、周囲に喧伝まではしませんからお好きなように」
	PRINTFORML 「ただし、私の家族に手を出した場合はその限りではありませんが」
	PRINTFORMDW 妙に迫力を感じさせるその言葉に、%CALLNAME:MASTER%は内心の焦慮を抑えて頷きを返した
;妖怪の山（山頂）に住んでてさとりと出会った場合
ELSEIF GET_MAPID(CFLAG:MASTER:現在位置) == MAIN_MAP && MAIN_MAP == 8
	PRINTFORML 「……はぁ、あなたも神社の関係者ですか」
	PRINTFORMDL 不意に目の前に現れた少女が、そんな言葉を投げかけてきた
	PRINTFORMDL 整った顔立ちに僅かなら苛立ちを浮かべて見つめてくる少女に、こちらも苛立ちを覚える
	PRINTFORML 「『時を止めて嬲り者にしようか』？」
	PRINTFORMDL 内心で思ったコトを、目の前の少女に口にされ、一瞬息を止める
	PRINTFORML 「ああ、別に周囲に吹聴する気はありませんから、その点だけはご安心を」
	PRINTFORML 「むしろ、あそこの神様とやらに…………いえ、何でもありません」
	PRINTFORMDL 何か含むところがありそうな言葉に内心首を傾げ、
	PRINTFORML 「私の名前は古明地さとり、人の内心を読む覚という妖怪です」
	PRINTFORML 「一つだけ言っておきます。私の家族に手を出せば、容赦はしませんので、そのつもりで」
	PRINTFORMDW 淡々と告げるさとりの妙な迫力に、%CALLNAME:MASTER%は頷きを返した
;地霊殿に住んでてさとりと出会った場合
ELSEIF CFLAG:MASTER:初期位置 == 916 && MAIN_MAP == 9 && GET_MAPID(CFLAG:MASTER:現在位置) == MAIN_MAP
	PRINTFORML 「……はぁ、どうして、こんな人間を置くことになったのかしら」
	PRINTFORMDL 深々とため息をつくさとりに、自分で拾っておいてなにを言うと内心で返す
	PRINTFORML 「言ったはずですよ、私は覚、内心くらい読めると」
	PRINTFORMDL 読めるのならわざわざ口にする必要は無いと、これまた内心で返し、%CALLNAME:MASTER%はさとりを見つめる
	PRINTFORML 「『綺麗な体』？　……性的な意味で言われても嬉しくありません」
	PRINTFORMDL 冷めた表情で答えられて、思わず時止めで弄り倒そうかと考える%CALLNAME:MASTER%
	PRINTFORML 「…………自身の能力を使うな、などとは言いません」
	PRINTFORMDL 不快げに眉をひそめたさとりが、じっとこちらを見ながら口を開く
	PRINTFORML 「時止めで体を嬲られる、不愉快ですが拾ったのは私です我慢もしましょう」
	PRINTFORML 「ですが」
	PRINTFORMDL 不意に体の周りの温度が数度下がった様な錯覚に、%CALLNAME:MASTER%は冷や汗をかく
	PRINTFORML 「私の大切な家族に時止めで手を出せば、容赦はしませんから」
	PRINTFORMDW 善処する、と%CALLNAME:MASTER%は答えを返した
;地底に住んでてさとりと出会った場合
ELSEIF GET_MAPID(CFLAG:MASTER:現在位置) == MAIN_MAP && MAIN_MAP == 9
	PRINTFORML 「あなたですね、地底に住まいを定めた奇矯な人間というのは」
	PRINTFORMDL 背後からかけられた声に、訝りながら振り返る%CALLNAME:MASTER%
	PRINTFORML 「……『多少背は低いし胸も小ぶりだがちゃんと腰もくびれて女らしい体型』ですか」
	PRINTFORML 「『簡単に抱き上げられる位には軽そう』？　まあ、さほど太ってるわけでもないですが」
	PRINTFORML 「『時を止めて、弄り回したら楽しそう』…………、なるほど、そんな能力があるんですか」
	PRINTFORMDL こちらの思ったことを、淡々と口舌に憑せるさとりに、苦笑が浮かぶ
	PRINTFORML 「そこは笑うところではないでしょうに」
	PRINTFORMDL そんなさとりのことばに、地底の住人達の言うとおりだからだと答える%CALLNAME:MASTER%
	PRINTFORML 「……なら、ほかの住人に倣って、どうして逃げ出さないんですか？」
	PRINTFORMDL どうせ読まれたところで実害はないと言い切る%CALLNAME:MASTER%に、さとりが呆れた表情を浮かべる
	PRINTFORML 「……他者の秘密を暴き立て吹聴するほど暇ではありませんので、勝手にしてください」
	PRINTFORML 「ただし、私とその家族に、その力でちょっかいをかけたりしたら許しません」
	PRINTFORMDW あくまで淡々と告げるさとりの姿に、%CALLNAME:MASTER%は楽しさを覚えた
;地底の地霊殿まで出掛けてさとりとであった場合
ELSEIF MAIN_MAP != 9 && CFLAG:MASTER:現在位置 == 960
	PRINTFORML 「あら、こんなところによく普通の人間が来れたものですね」
	PRINTFORMDL 地底の中でも特に壮麗な屋敷に入り込んだ%CALLNAME:MASTER%は声をかけられて振り向く
	PRINTFORMDL 愛らしい顔立ちなのに、冷めた表情を浮かべる少女が、じっとこちらを見つめている
	PRINTFORML 「私はこの屋敷の主、古明地さとり。用も無く人が地底に立ち入るものではありませんよ」
	PRINTFORMDL その高慢な言い方に苛立ちを覚え、このまま時を止めて嬲ろうかと一瞬考え
	PRINTFORML 「なるほど、時を止められるのなら、ここまで来ても危険はありませんか」
	PRINTFORML 「ここまで来ていながら、私の能力を知らないのですか？」
	PRINTFORML 「ええ、古明地さとりは、人の心を読み取れる妖怪種族覚の一人ですよ」
	PRINTFORMDL 淡々と、こちらの驚愕を読み取りながら語るさとりに、冷や汗が浮かぶ
	PRINTFORML 「別に、%CALLNAME:MASTER%の能力を周囲に知らせたりなどはしませんよ」
	PRINTFORML 「ただ、私の家族に手を出せば許しませんが」
	PRINTFORMDW どことなく軽蔑するような表情のさとりに、返す言葉は出てこなかった
;地底の地霊殿以外でさとりと出会った場合
ELSEIF MAIN_MAP == 9 || (CFLAG:MASTER:現在位置 / 100) == 9
	PRINTFORML 「おまちなさい。地上の者が地底に来て何をするつもりですか」
	PRINTFORMDL 不意に背後からかけられた声に、振り向いた%CALLNAME:MASTER%は軽く吐息を漏らす
	PRINTFORML 「『可愛い顔だ、このまま時を止めようか』？」
	PRINTFORMDL 内心で考えていた言葉を読み取られて、腋間に汗が湧いた
	PRINTFORML 「『バレると不味い』？　安心して下さい、他者に告げ口まではしませんから」
	PRINTFORML 「……ただし、私や私の家族に時止めで何かをすれば、許しはしませんが」
	PRINTFORML 「ああ、申し遅れました。私の名は古明地さとり。これからよろしくお願いします」
	PRINTFORMDW 冷めた表情のさとりに、答えを返すことは出来なかった
;それ以外
ELSE
	PRINTFORML 「そこのあなた、少し待ってください」
	PRINTFORMDL 獲物を物色していた%CALLNAME:MASTER%は、背後からの呼びかけに訝りながら振り返る
	PRINTFORMDL 冷めた表情が似合わない愛らしい顔立ちの少女が立っていた
	PRINTFORML 「……初めまして、すこし胡乱げなモノを視たので、すこし声を掛けさせていただきました」
	PRINTFORMDL 胸元の妙な物体はともかく、少女と女の境目と言った様子の青い果実に、食指が動き、
	PRINTFORML 「『時止めで嬲るには丁度良い』？　やはり、視間違いではなかったのですね」
	PRINTFORML 「時を止める程度の能力を持っていながら、心を読む程度の能力の存在には驚くのですか」
	PRINTFORML 「『周囲にばれると不味い』？　ああ、大丈夫ですよ、他者の秘密を吹聴する趣味はありませんから」
	PRINTFORMDL 淡々と告げる少女の雰囲気が、妙に硬いモノに変わる
	PRINTFORML 「私の名は古明地さとり、私にその力を使うなとは言いません」
	PRINTFORML 「が、私の家族にその力で手を出した場合、覚悟してください」
	PRINTFORMDW さとりの異様な迫力に、頷くことしか出来なかった
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;デート帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K49_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
;地の文
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
IF LOCAL
	IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
		CALL DRUNKER49(10)
	ELSEIF 陥落状態() == 2
		PRINTFORML 「まったく、自分がバカになった気分です」
		PRINTFORMDL 深々と溜め息を吐いたさとりが唇を押し付けてきた
		PRINTFORML 「体だけを望んで好き勝手するような者に、自分からこんなことをするなんて」
		PRINTFORMW 「そもそも時を止めて弄ぶだけなら、デートに誘ったりしないでも良いでしょうに」
		PRINTFORMDL そんなことを呟きながら、嬉しそうな笑顔を浮かべるさとりにしばし見取れる
		PRINTFORML 「……時を止めて弄んでるときよりは、まだ良い気分でしょう」
		PRINTFORMDW さとりの言葉に、%CALLNAME:MASTER%はただ頷くことしか出来なかった
	ELSE
		PRINTFORML 「ふふ、頂きます」
		PRINTFORMDL さとりが笑みをうかべたまま唇を重ねてきた
		PRINTFORMW 「どうです、時間を止めて弄ぶだけの少女達は、こんな事をしてくれましたか？」
		PRINTFORMDL 時間が止まってる最中に、相手からされるはずがない
		PRINTFORML 「そういうことです。ああ、別に玩弄をやめなさいと言う気は有りませんよ」
		PRINTFORMW 「時を止める能力があるのなら、性欲の発散に使うのはしょうがないことでしょうから」
		PRINTFORML 「ただ、出来れば、ですが」
		PRINTFORMDL ふと顔を赤らめたさとりが、おずおずと上目遣いでこちらを見つめてくる
		PRINTFORML 「これからも、私には時止めによる玩弄はしないでほしいのです」
		PRINTFORMW 「%CALLNAME:MASTER%が気持ち良くなる所を、私も見ていたいのですから」
	ENDIF
ENDIF
RETURN 1

;==================================================
;デート帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K49_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("SPEV2",1)
			IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
				CALL DRUNKER49(11)
			ELSEIF 陥落状態() == 2
				PRINTFORML 「女というモノは愚かなものですね」
				PRINTFORML 「%CALLNAME:MASTER%が心より体を望んでいることも解っているのですが」
				PRINTFORML 「それでも、%CALLNAME:MASTER%の隣を望んでいます」
				PRINTFORMD そこまで口にしたさとりが
				IF !EXP:60 && !EXP:61 && !EXP:62 && !EXP:63
					PRINTFORMDL ジト目で見つめて来る
					PRINTFORML 「大事な家族に手を出している相手なのに」
				ELSE
					PRINTFORMDL 僅かに頬を赤らめる
					PRINTFORML 「本当に、愚かというか、馬鹿馬鹿しいというか」
				ENDIF
				PRINTFORML 「%CALLNAME:MASTER%は、どうですか？」
			ELSEIF CFLAG:清い交際 && GETBIT (CFLAG:1490,6)
				PRINTFORML 「…………%CALLNAME:MASTER%は、本当に変な人です」
				PRINTFORMDL ぽつりと呟いたさとりが、じっとこちらを見つめてくる
				PRINTFORML 「私の能力を知っているからと言っても、本当に私と家族に時止めをしないなんて」
				PRINTFORMDL その言葉に、タダの気まぐれだと応える%CALLNAME:MASTER%
				PRINTFORML 「ええ、ええそうですね、%CALLNAME:MASTER%がそう思っているのはわかっています」
				PRINTFORMDL そう呟いたさとりが、朗らかな笑顔を向けてきた
				PRINTFORML 「たとえ気まぐれでも、大事にしてくれている、ソレは伝わってくるんですよ」
				PRINTFORML 「そんな%CALLNAME:MASTER%の隣に、ずっといたい。%CALLNAME:MASTER%のモノにシテほしい」
				PRINTFORML 「どうです？　私を恋人にしてくれませんか？」
			ELSE
				PRINTFORML 「人の心が読めるのに、自分の心が止められない。愚かの限りですね」
				PRINTFORMDL 呟いたさとりがこちらを見つめてくる
				PRINTFORML 「正直、%CALLNAME:MASTER%の行為には言いたいことが幾つかあります」
				PRINTFORML 「ですが、身についた能力を使ってしまうのはしかたが無いことです」
				PRINTFORML 「それに、私だけで無く、私の家族にも手を出さないでいてくれる」
				PRINTFORML 「だから、私は%CALLNAME:MASTER%と同じ時を過ごしたいと思っています」
				PRINTFORML 「どう、ですか？」
			ENDIF
			PRINTFORML
			RETURN 1
		ELSE
			IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
				CALL DRUNKER49(11)
			ELSEIF 陥落状態() == 2
				PRINTFORML 「……Ｈな人は好きじゃありません」
				PRINTFORMDL 開口一番そんな事を口にしたさとりが、潤んだ瞳で見つめてくる
				PRINTFORML 「能力でただ体を貪るような%CALLNAME:MASTER%はＨな人」
				PRINTFORML 「なのに、隣にいたいと思ってしまう、自分が嫌になります」
				PRINTFORML 「どうして、私から何度もこんなことを言わせるんです」
				PRINTFORMDL 唇をとがらせたさとりがじっとこちらを見つめてくる
				PRINTFORML 「恋人に、してください」
			ELSEIF CFLAG:清い交際 && GETBIT (CFLAG:1490,6)
				PRINTFORML 「……はぁ、いぢわる」
				PRINTFORMDL いきなり不機嫌そうなむくれ面でそんな事を言われて凍り付く%CALLNAME:MASTER%
				PRINTFORML 「%CALLNAME:MASTER%はこの前フッてくれたくせになんでまたこんな風に誘うんですか」
				PRINTFORML 「告白拒否されて、傷ついたんですからね。本当にいぢわるな人です」
				PRINTFORMDL そう良いながらすり寄ってきたさとりが、じっと見つめてくる
				PRINTFORML 「ねえ、そんなに私が隣に立つことはおいやですか？　私なんか、必要ない、ですか？」
			ELSE
				PRINTFORML 「はぁ……、本当に%CALLNAME:MASTER%は身勝手な人です」
				PRINTFORMDL ぽつりと呟いたさとりが、ジト目で睨んでくる
				PRINTFORML 「この前の告白を受け入れてくれなかったのに、こうして引っ張り出して」
				PRINTFORML 「そんなに私に告白されるのは嬉しいですか？」
				PRINTFORMDL 可愛い少女に言われるのだからイヤではない、内心で答えつつ視線をそらす
				PRINTFORML 「でも、答える気にはなれないと？　いい加減はっきりしてください」
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(12)
		ELSEIF CFLAG:清い交際 && GETBIT (CFLAG:1490,6)
			PRINTFORMDL 受け入れる、と言葉にするよりも早く、さとりがぎゅっと抱きついてきた
			PRINTFORMDL そのまま胸元にぐりぐりと頭を押しつけてくる
			PRINTFORMDL らしくない甘えた様子に苦笑しながらかるく頭を撫でてやる%CALLNAME:MASTER%
			PRINTFORML 「受け入れてくれて、ありがとうございます」
			PRINTFORMDL 瞳を潤ませ、頬を朱に染めて、うっとりとした表情で見つめてくるさとり
			PRINTFORML 「大好きです、私の、主（ぬし）様」
			PRINTFORMDL 今までと違う呼び方に、そう呼びかけたさとりの朗らかな笑顔に、らしくなく胸がときめく
			PRINTFORML 「うふふ、主様でも、そう思ってくださるんですね、嬉しいです」
			PRINTFORMDL そう言って顔を寄せてくるさとり
			PRINTFORMDL ちゅっと唇を触れあわせて、また胸元に頭を押しつけてくる
			PRINTFORML 「『そろそろ離れて欲しい』？　やーですよーだ」
			PRINTFORMDL 明らかに今までとは違う様子に、少し戸惑う%CALLNAME:MASTER%
			PRINTFORML 「コレが、誰にも見せたことのない本当の私ですよー」
			PRINTFORML 「こいしが居るから、ペットたちが居るから、旧都の面々と対峙する必要があるから」
			PRINTFORML 「だから、普段はああいう言動を取ってますけど、主様の前では、もう隠さなくてもいいですし」
			PRINTFORMDL そういいながら、抱きついたままじっと見つめてくる
			PRINTFORML 「うふふ、主様、だーいすき」
			PRINTL
			PRINTL
			PRINTL
			PRINTL
			PRINTL
			PRINTL
			PRINTL さとりは、[素直]を得た
			TALENT:態度 = -1
			PRINTL さとりは、[サド]を失った
			TALENT:サド = 0
		ELSE
			PRINTFORML 「……ふふ、ありがとうございます」
			PRINTFORMDL 受け入れる、と口を開くよりも早く、さとりが笑みを浮かべて頭を下げてきた
			PRINTFORML 「正直、幻想郷ですら忌まれるバケモノを受け入れてくれるとは思ってませんでした」
			PRINTFORMDL 可愛い少女なら、べつにどんな能力を持っていようが関係ない
			PRINTFORML 「……そう言う言われ方をするとは、流石に思っていませんでしたね」
			PRINTFORML 「でも、これからはよろしくお願いしますね。……主（ぬし）様」
			PRINTFORMDL 妙に古くさい言葉を持ち出すさとりに、なんとなくらしさを感じて苦笑が浮かんだ
			PRINTL
			PRINTL
			PRINTL
			PRINTL
			PRINTL
			PRINTL
		ENDIF
		PRINTL さとりは、[プライド高い]を失った
		TALENT:プライド = 0
		PRINT さとりは、
		IF TALENT:MASTER:性別 == 2
			TALENT:性別嗜好 = 0
			PRINTL [男嫌い]を失った
		ELSE
			TALENT:性別嗜好 = -1
			PRINTL [両刀]を得た
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF FIRSTTIME("SPEV2",1)
			IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
				CALL DRUNKER49(13)
			ELSE
				PRINTFORML 「ふふ、そう、ですよね。私のようなバケモノは必要ないのですね」
				PRINTFORMDL バケモノなどと思っていない
				PRINTFORMDL 真剣な表情で見つめてくるさとりにその言葉を投げつけることは出来なくて
				PRINTFORML 「……では、女としての魅力に乏しいと言うことですか？」
				PRINTFORMDL 単に今は恋人なんて要らないだけ、と口にするよりも早く、さとりが苦笑を浮かべた
				PRINTFORML 「体だけを貪る事の方が、心を繋ぐより大事であると？」
				PRINTFORML 「それは、少し寂しい人生ですね……」
				PRINTFORML 「ふふ、地霊殿に閉じこもっていた私が言えることではありませんでしたね」
			ENDIF
		ELSE
			PRINTFORMDL 恋人にする気はない、そう答えるよりも早く、さとりがふかぶかとため息をついた
			PRINTFORML 「本当に身勝手な人ですね」
			PRINTFORML 「そんなに私を恋人にする気が無いんでしたら、いい加減別の人を恋人にしてください」
			PRINTFORML 「それか、こうして連れ出さないでください」
			PRINTFORML 「私は、きっとこれからも諦めきれませんから」
			PRINTFORMDL さとりの正面からの言葉に、答えることは出来なかった
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;デート帰り
;==================================================
@M_KOJO_SPEVENT_K49_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 (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(14)
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「やーです、まだ帰りたくないです」
				PRINTFORMDL ぎゅっと抱きついて、頭をぐりぐりと押しつけてきながら、さとりが呟く
				PRINTFORML 「主様ともっと一緒にお出かけ続けたいです。主様との時間を楽しみたいです」
				PRINTFORMDL 涙目になりながら顔を上げて見つめてくるさとり
				PRINTFORML 「『またこんど来れば良い』？　ホントですね、絶対ですからね」
				PRINTFORMDL 念押しするさとりに苦笑しながら頷きを返した
			ELSE
				PRINTFORML 「もう帰る時間ですか、残念です」
				PRINTFORMDL 心底残念そうに呟くさとりに、自然と苦笑が浮かぶ
				PRINTFORML 「人から恐れられる身ですが、それでも主様と共に居られる時間は楽しいモノですから」
				PRINTFORMDL そう言ってから、柔らかな微笑みを浮かべるさとり
				PRINTFORML 「ふふ、でも、何時でも来ることは出来ますからね」
				PRINTFORMDL 嬉しげに呟くさとりがじっとこちらを見つめてきた
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「ふふ、また来たい物ですね。%CALLNAME:MASTER%と一緒なら、どう思われようと気になりませんし」
			PRINTFORMDL いやそうにしながらもどこか羨ましそうにこちらを見てきた有象無象を思い出す
			PRINTFORML 「怖がられるのは慣れていますが、私の立ち位置を羨ましがる人が出てくるとは、思いませんでしたよ」
			PRINTFORMDL クスクス笑いながら、さとりがぴたりとくっついてきた
		ELSEIF 陥落状態() == 2
			PRINTFORML 「……やっと終わりました」
			PRINTFORMDL 不機嫌そうに呟くさとりに、デート中の楽しげだった様子を思い浮かべる
			PRINTFORML 「っっ！　アレはっっ！　……単なる、気まぐれ、です」
			PRINTFORMDL どこか弱々しい声で呟くさとりに、自然と笑みが浮かんだ
		ELSEIF 陥落状態() == 1
			PRINTFORML 「ふふ、たまにはこう言うのも良いものですね」
			PRINTFORMDL どことなく楽しげにさとりが呟いている
		ELSE
			PRINTFORML 「……ふぅ」
			PRINTFORMDL 気疲れした様子のさとりが、こちらの後を歩いている
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(15)
		ELSEIF 陥落状態() == 2
			PRINTFORML 「しょうがない人です、本当に……」
			PRINTFORMDL 口内で言葉を転がしつつ、さとりが渋々隣へ来た
		ELSE
			PRINTFORML 「……もう仕方ない人ですね、全く」
			PRINTFORMDL 深々と溜め息を吐いたさとりが、何時ものように隣に来た
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(15)
		ELSEIF 陥落状態() == 2
			PRINTFORML 「全く、本当に不愉快な人ですね」
			PRINTFORMDL そう言いながらも、どことなく雰囲気が和らいでいる
		ELSE
			PRINTFORML 「……はぁ、これでチャラになったとか、思わないように」
			PRINTFORMDL 呟きながらも、さとりが口元に僅かな笑みを浮かべている
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印3>2レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(15)
		ELSEIF 陥落状態() == 2
			PRINTFORML 「不愉快です、本当に、不愉快です」
			PRINTFORMDL そう言いながらも、目の端に浮かんでいた険が僅かに緩んでいる
		ELSE
			PRINTFORML 「……全く、こんなことで懐柔されると思わないで下さい」
			PRINTFORMDL 不機嫌そうな呟きは聞こえないふりをした
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_EVENT_K49_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF GETBIT(CFLAG:1492,1) && TCVAR:今日会ったか
	LOCAL = 0
	CLEARBIT CFLAG:1492,1
ENDIF
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		CFLAG:1496 = 0
		IF (CFLAG:MASTER:現在位置 == 950 || WITH_MOB() == 9)
			IF CHK_FOCUS(927,CFLAG:MASTER:現在位置,930)
				CFLAG:1496 = 1
			ELSEIF CHK_FOCUS(931,CFLAG:MASTER:現在位置,948)
				CFLAG:1496 = 0
			ELSE
				CFLAG:1496 = 2
			ENDIF
		ENDIF
		IF CFLAG:1496 == 2
			IF GROUPMATCH(TIME:2,1,6,7)
				PRINTFORMD 眠っている
			ELSE
				PRINTFORMD 近くにいる
			ENDIF
			PRINTFORMDL %ANIMALNAME()%を、さとりが優しい表情で撫でている
			PRINTFORMD %CALLNAME:MASTER%に気づいたさとりが
			IF GETBIT (CFLAG:1492,1) || GETBIT(CFLAG:1491,0) || CFLAG:1493 > 7
				IF 陥落状態() >= 4
					PRINTFORMD 唇をとがらせ
				ELSE
					PRINTFORMD 目に怒りを浮かべ
				ENDIF
			ELSEIF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORMD 満面に笑みを浮かべ
				ELSE
					PRINTFORMD 嬉しそうにほほえみ
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORMD 心地よさげに笑って
			ELSEIF 陥落状態() == 2
				PRINTFORMD いやそうな顔をして
			ELSEIF 陥落状態() == 1
				PRINTFORMD 少しだけ楽しそうに
			ELSE
				PRINTFORMD 冷めた表情で
			ENDIF
			PRINTFORMDL 、%ANIMALNAME()%から離れて近寄ってきた
		ENDIF
		PRINTL
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(20)
		ELSEIF CFLAG:弱み握られ && !GETBIT (CFLAG:1490,5)
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「主様ぁ、なにを考えてるんですかナニを」
					PRINTFORMDL そう言いながらすり寄ってきたさとりが、%CALLNAME:MASTER%の懐から道具をかすめ取る
					PRINTFORML 「もしもし、聞こえますか？　そんなにＨなことさせたいですか？」
					PRINTFORMDL 目の前にいるさとりが、わざわざ道具を使って話しかけてくる
					PRINTFORML 「『させたい』って、直球ですねー、うふふ、いいですよ。主様のおねだりですもの」
					PRINTFORMDL 余りにもあっけなく受け入れるさとりに、なんとなく冷や汗が浮かぶ
					PRINTFORML 「うふふ、テレホンセックスでしたっけ？　主様も一緒にオナニー実況してくださいね」
					PRINTFORMDL 満面の笑みで紡がれた言葉に、逆らえる余地は無かった
				ELSE
					PRINTFORML 「……あ、主様」
					PRINTFORMDL 顔を赤くしたさとりを見ながら、懐に呑んでいる道具を探る%CALLNAME:MASTER%
					PRINTFORML 「『面白いモノをやる』？　……こいしがこの前遊んでいた道具に似てますけど」
					PRINTFORML 「遠距離通話の道具、ですか？　っ！　あ、あれは、その忘れて欲しいんですが」
					PRINTFORMDL 焦りを浮かべるさとりに、内心に浮かべた言葉をもう一度口にする
					PRINTFORML 「お、オナニーの、実況が、聞きたいなんて変態です」
					PRINTFORML 「……本当に、変態なんですから」
					PRINTFORMDL ぽつりと呟いたさとりが、渋々道具を受け取った
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORMDL 恥ずかしげに視線をそらすさとりを招き寄せ、手にしたモノを押しつける
				PRINTFORML 「『遠距離通話の道具だ』？　……なななな、何を考えているんですか！」
				PRINTFORML 「じじじじ、自慰の実況なんて……」
				PRINTFORMDL どうしても聞きたい、その言葉に、顔を赤くしていたさとりが、深々とため息をついた
				PRINTFORML 「……わかりました、ｺﾉﾍﾝﾀｲ」
				PRINTFORMDL 涙目で睨んでくるさとりだが、そのことは当然無視した
			ELSEIF 陥落状態() == 2
				PRINTFORMDL 顔を合わせた瞬間、背中を向けようとするさとりに、手にしたモノを投げた
				PRINTFORMDL 振り返りながら受け取ったさとりが、胡乱げにこちらを向いてから、顔を真っ赤にする
				PRINTFORML 「だだだ、誰がそんな事をするものですか！」
				PRINTFORMDL 小声で怒鳴るさとりに、周りにオナニー狂いだとバラして良いのかと、笑いかける
				PRINTFORML 「っっっ！！　……この、この変態っっ！」
				PRINTFORML 「み、見えもしないのに、実況させて、何が楽しいんですか、この色情魔っ！」
			ELSEIF 陥落状態() == 1
				PRINTFORML 「……あ、%CALLNAME:MASTER%。……って、何を考えてるんですか」
				PRINTFORMDL 自慰中のさとりが可愛かったと、内心で呟きつつ手にした道具を渡す
				PRINTFORML 「遠距離通話の道具？　……自慰の実況って、ヘンタイ」
				PRINTFORMDL 涙目のさとりが、それをしまい込む
			ELSE
				PRINTFORML 「……っ！　……このスケベ、ヘンタイ、色情狂」
				PRINTFORMDL 涙目で睨んでくるさとりに、自慰実況用の遠距離通話道具を押しつけた
			ENDIF
			SETBIT CFLAG:1490,5
		ELSEIF GETBIT (CFLAG:1491,1)
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「主様の馬鹿、なんであんなことするんですか」
					PRINTFORMDL 唇をとがらせたさとりが詰め寄ってくる
					PRINTFORML 「なんで今まで時止めでしなかったのに、時止めで奪ったんです」
					PRINTFORMDL そこまで言った途端、ぼろぼろと唐突に涙をこぼし始めるさとり
					PRINTFORML 「ぐす、えぐ、ひどい、です。ひくっ、ぬしさましんじてたのに、こんなの、こんなの」
					PRINTFORML 「ハジメテ、ハジメテだったのに、どうして、どうしてなんですか」
					PRINTFORMDL 嗚咽混じりの問い詰めに、答えを返せない
					PRINTFORML 「ぐすひぐ、ぬしさまのばかぁ、わ～～んっっ！！」
					PRINTFORMDL そのまま号泣するさとりに、今まで無かったはずの罪悪感が胸を苛んできた
				ELSE
					PRINTFORML 「主様、酷いです」
					PRINTFORMDL 涙目で見つめてくるさとりの傍に歩み寄る
					PRINTFORML 「どうして、時止めで奪ったんですか？　初めては、自分の意志で捧げたかったのに」
					PRINTFORMDL ……考えを取り繕う暇も無く、さとりが唇を押し付けてきた
					PRINTFORML 「ん、ちゅ……れろ……、本当に、ひどいお方です、主様は」
				ENDIF
			ELSE
				PRINTFORMDL つかつかと、%CALLNAME:MASTER%に近寄ってきたさとりが、いきなり頬を張ってきた
				PRINTFORML 「……最低」
				PRINTFORMDL 涙目で呟いたさとりが背中を向けた
			ENDIF
			CALL GET_ANGRY(TARGET, 0)
			CLEARBIT CFLAG:1491,1
		ELSEIF CFLAG:1493 >= 7 && 陥落状態() >= 2
			IF CFLAG:1493 >= 30
				IF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORMDL いきなりさとりが胸元に飛び込んできた
						PRINTFORML 「主様主様主様主様、やっと逢えたやっと逢えた」
						PRINTFORMDL そう言ってボロボロと涙をこぼして見つめてくるさとり
						PRINTFORML 「寂しかったです、哀しかったです」
						PRINTFORML 「主様に嫌われたとおもって、それでそれで」
						PRINTFORMDL 嗚咽で言葉を失ったさとりに、ちりちりと胸の奥に痛みが走った
					ELSE
						PRINTFORML 「主様……、恋人を放置するにも限度というモノがありますよ」
						PRINTFORMDL 冷たい目で睨んでくるさとりに、他にも相手がいると考えると同時、サードアイの触手で喉を締め付けられた
						PRINTFORML 「側女に手を出すな、とは言いません。が、本妻を放っておくのはヒドいですよ」
						PRINTFORMDL 窒息するほどではないけれど、それでもゆるゆると喉を締め付けられる苦しさに喘ぐ%CALLNAME:MASTER%
						PRINTFORML 「無理心中なんて、流行りませんしね」
						PRINTFORMDL 同時に死ぬならそれはそれで、と考える%CALLNAME:MASTER%にさとりが呆れた表情を浮かべた
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「久しぶりですね。ふふ、やはり%CALLNAME:MASTER%と会えると気分が良くなります」
					PRINTFORMDL 朗らかに笑うさとりだが、目だけは獲物を狙う肉食獣のように爛々としている
					PRINTFORML 「『怒っているのか』……、いえ、釣った魚に餌をやらない人間が多々いるとは聞いていましたので」
					PRINTFORMDL 明らかに拗ねているさとりの頭を撫でて、宥める%CALLNAME:MASTER%
				ELSEIF 陥落状態() == 2
					PRINTFORML 「あら、生きていたんですか。死んでくれてても良かったのですが」
					PRINTFORMDL 辛辣な言葉を口にして睨んでくるさとりだが、どこか機嫌がよさそうに見えた
					PRINTFORML 「『頬が緩んで』なななななにばかなことを」
					PRINTFORMDL 考えを読み取ったさとりが顔を紅くして、視線を逸らしている
				ENDIF
			ELSEIF CFLAG:1493 >= 7
				IF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 「主様ぁ、愛しの恋人を放っておいて、どこをほっつき歩いていたんですか？」
						PRINTFORMDL いろいろだと答える%CALLNAME:MASTER%にさとりが頬を膨らませる
						PRINTFORML 「ホントに、主様は勝手です。でも、今日はこうして顔を見ることが出来たから許してあげます」
						PRINTFORMDL そう言ってほおずりしてくるさとり
						PRINTFORML 「『相変わらず可愛い』？　そう思うなら、もっと頻繁に逢ってくださいね」
						PRINTFORMDL ちゅ、と頬に唇を押しつけてくるさとりに、%CALLNAME:MASTER%は善処すると答えた
					ELSE
						PRINTFORML 「主様、{CFLAG:1493 / 7}週間も恋人を放置して楽しかったですか？」
						PRINTFORMDL 別段楽しくも辛くもないと答える%CALLNAME:MASTER%に、さとりが唇を尖らせる
						PRINTFORML 「私は、とても辛かったです。いくらでも相手がいる主様とは違って」
						PRINTFORMDL 険のある視線を向けてくるさとりに、思わず苦笑を浮かべてしまう
						PRINTFORML 「『可愛い奴』？　……妬心を抱くのが可愛いと言われても」
						PRINTFORMDL 苦笑と共にさとりの表情から険が取れ、いつもの優しい笑みが戻ってきた
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「{CFLAG:1493 / 7}週間ぶりですね」
					PRINTFORMDL そうするのが当然と言う様に、こちらの腕を自身の胸元に抱え込むさとり
					PRINTFORML 「ちょっとした気まぐれ、ですよ」
					PRINTFORMDL そういって、嬉しそうな笑顔を向けてきた
				ELSEIF 陥落状態() == 2
					PRINTFORML 「あら、生きていたんですか。残念です」
					PRINTFORMDL 素っ気ないさとりの言葉に、自然と苦笑が浮かぶ
					PRINTFORML 「『嬉しそう』……%CALLNAME:MASTER%の目は節穴ですか？」
					PRINTFORMDL 呆れた様な表情で深々とため息をつくさとりだが、その口元がほんの僅か緩んでいた
				ENDIF
			ENDIF
		ELSEIF 陥落状態() >= 4
			IF GETBIT (CFLAG:49:1490,9) && !GETBIT (CFLAG:49:1490,10)
				PRINTFORML 「ああ、主様、こんにちは」
				PRINTFORMDL そう言いながら近寄ってくるさとりの表情に、いつもの朗らかさとは違う穏やかな笑みが浮かんでいる
				PRINTFORML 「『雰囲気が変わった』？　変えたのは主様ですよ」
				PRINTFORMDL 嬉しげな表情に、%CALLNAME:MASTER%は小首をかしげた
				SETBIT CFLAG:49:1490,10
			ELSEIF 陥落状態() == 5
				IF GETBIT(CFLAG:1491,0)
					PRINTFORML 「……主様、主様は私の事嫌いですか？」
					PRINTFORMDL 唐突にそんなコトを言い出すさとりに首を傾げる
					PRINTFORML 「『この前の時止めか』？　そう、です」
					PRINTFORMDL さとりの目尻に涙が溜まっていく様子に、言葉が見つからない
					PRINTFORML 「主様、恋人になるまでしなかったのに、どうして、どうしてなんですか、ぐす、どうして」
					PRINTFORMDL ぼろぼろと涙をこぼすさとりに、ない筈の罪悪感を刺激される%CALLNAME:MASTER%
					PRINTFORMDL さとりの嗚咽が止まるまで、%CALLNAME:MASTER%はそっと抱きしめ続けた
					CLEARBIT CFLAG:1491,0
				ELSE
					PRINTFORML 「あ、主様。主様主様、今日はなにをします？」
					PRINTFORMDL 満面の笑顔で問いかけてきたさとりが、そのまま抱きついてくる
					PRINTFORML 「うふふ、主様に会えるだけで、すごく嬉しい気分になれます」
					PRINTFORMDL すりすりとこちらの胸元にほおずりするさとり
					PRINTFORML 「今日はこのままお相手してくれますよね？　あ、Ｈのお相手でもいーですよ？」
					PRINTFORMDL 目をきらきらさせるさとりに、それはイヤだとわざと考えて、さとりのふくれっ面を堪能した
				ENDIF
			ELSE
				IF GETBIT(CFLAG:1491,0)
					PRINTFORML 「……主様は、意地悪ですね」
					PRINTFORMDL こちらを見つめるさとりが、ぽつりと呟く
					PRINTFORML 「時を止めて、声も表情も心も凍らせた私を犯すのはそんなに楽しいですか」
					PRINTFORMDL さとりの問いかけに、楽しいと答えつつ妙な違和感を覚えた
					PRINTFORML 「その違和感の理由、私が口にしなければ解りませんか？」
					PRINTFORMDL 答えを返そうとしてなぜか口が開けない%CALLNAME:MASTER%
					PRINTFORML 「『罪悪感か』？　多少は自覚があったんですね。できれば時止めなしで睦み合いたいです」
					CLEARBIT CFLAG:1491,0
				ELSE
					PRINTFORML 「ふふ、こんにちは、主様」
					PRINTFORMDL 嬉しげな表情ですり寄ってくるさとりの、胸や股間のあたりに視線が行く
					PRINTFORML 「また、そうやって、Ｈな事ばかり考えるんですから」
					PRINTFORMDL さとりが可愛いんだから仕方がないと、%CALLNAME:MASTER%が考えると同時
					PRINTFORML 「……はずかしい、です」
					PRINTFORMDL 頬を赤らめて、さとりが視線を逸らした
				ENDIF
			ENDIF
		ELSEIF 陥落状態() == 3
			IF FIRSTTIME("恋慕遭遇")
				PRINTFORMDL ……なぜかうっとりとした表情で、さとりがこちらを見つめてくる
				PRINTFORML 「あ、ああ、%CALLNAME:MASTER%ですか、どうしました」
				PRINTFORMDL そう呟くさとりは、どことなく頬を赤らめていつもより柔らかい笑みを浮かべている
				PRINTFORML 「ああ、別に他意はありませんよ。ただ、%CALLNAME:MASTER%を見るのが楽しいだけです」
				PRINTFORMDL その言葉もさとりらしくない、内心でそう思った途端、くすりとさとりが相好を崩す
				PRINTFORML 「ふふ、%CALLNAME:MASTER%の考えている事もわからないではないですが」
				PRINTFORML 「私は元々こういう性分ですよ。ただ嫌いな相手や好きでもない相手には見せないだけで」
				PRINTFORMDL その言葉に、さとりの心情を慮ってみる
				PRINTFORML 「『好きになったのか』？　ふふ、さあどうでしょうね」
				PRINTFORMDL それ以上、問いかけるのはやめた
			ELSE
				IF GETBIT(CFLAG:1491,0)
					PRINTFORML 「……はぁ、自分を嫌いになりそうです」
					PRINTFORMDL こちらを睨みながらの呟きに、小首を傾げる%CALLNAME:MASTER%
					PRINTFORML 「『理由は』？　時止めで嬲るような%CALLNAME:MASTER%を嫌いになれないからです」
					PRINTFORML 「……時止めで一方的にされるより、私の方から気持ち良くしたいのですが」
					PRINTFORMDL ジト目で睨んでくるさとりに、答える言葉は出てこなかった
					CLEARBIT CFLAG:1491,0
				ELSE
					PRINTFORML 「ああ、%CALLNAME:MASTER%ですか」
					PRINTFORMDL 音も無く身近に侍ったさとりが、まぶしげな表情でこちらを見つめてくる
					PRINTFORML 「ふふ、気にしないで下さい。%CALLNAME:MASTER%を見ていると愉しいだけですから」
					PRINTFORMDL そう呟くさとりの笑顔に、なんとなく毒気が抜かれてしまった
				ENDIF
			ENDIF
		ELSEIF GETBIT (CFLAG:1491,0)
			PRINTFORML 「不愉快ですね。身動きできない相手を嬲って満足ですか」
			PRINTFORMDL 近寄ってきたさとりが、耳元で囁いて身を離した
			CLEARBIT CFLAG:1491,0
		ELSEIF 陥落状態() == 2
			IF FIRSTTIME("家族手出し遭遇")
				PRINTFORML 「……家族には手を出すな、と言っていたはずですが」
				PRINTFORMDL 開口一番そんなことを言われて冷や汗が浮かぶ
				PRINTFORML 「もしかして、ばれないとか思っていたのですか？」
				PRINTFORML 「私の目は、能動的な思考を見るだけでは無く、蓄積された受動的な思考も」
				PRINTFORML 「言い換えれば記憶を見ることもできるのですよ」
				PRINTFORMDL その言葉に思わず、聞いてない、と呟いてしまう
				PRINTFORML 「ええ、言っていませんから」
				PRINTFORMDL さらりとそうのたまったさとりが、冷たい目をこちらに向けてくる
				PRINTFORML 「……これ以上、私の家族を嬲るのは許しませんから」
				PRINTFORMDL なら、さとりを代わりにする、その思考を読み取ったのだろう、さとりがにらみつけてきた
				CALL GET_ANGRY(TARGET, 0)
			ELSE
				PRINTFORML 「……あまり、調子に乗らない方が良いですよ」
				PRINTFORMDL じろりと睨み付けられ、%CALLNAME:MASTER%は言葉を失う
				PRINTFORML 「嫌うほどの関心を向けるつもりはありませんが、覚悟はしておくべきですね」
				PRINTFORMDL そう言ったさとりの、冷めた瞳に自然と汗が浮いた
			ENDIF
		ELSEIF 陥落状態() == 1
			PRINTFORML 「あら、%CALLNAME:MASTER%ですか、こんにちは」
			PRINTFORMDL どことなく柔らかさを感じさせる表情で、さとりが声をかけてきた
		ELSE
			PRINTFORML 「……」
			PRINTFORMDL 冷めた表情のさとりに、ただ頭を下げた
		ENDIF
		CFLAG:1493 = 0
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		CFLAG:1496 = 0
		IF (CFLAG:MASTER:現在位置 == 950 || WITH_MOB() == 9)
			IF CHK_FOCUS(927,CFLAG:MASTER:現在位置,930)
				CFLAG:1496 = 1
			ELSEIF CHK_FOCUS(931,CFLAG:MASTER:現在位置,948)
				CFLAG:1496 = 0
			ELSE
				CFLAG:1496 = 2
			ENDIF
		ENDIF
		IF CFLAG:1496 == 2
			IF GROUPMATCH(TIME:2,1,6,7)
				PRINTFORMD 眠っている
			ELSE
				PRINTFORMD 近くにいる
			ENDIF
			PRINTFORMDL %ANIMALNAME()%に近寄ったさとりが、優しい表情でかるく撫でる
			PRINTFORMD %CALLNAME:MASTER%に向かって、
			IF GETBIT (CFLAG:1492,1)
				IF 陥落状態() >= 4
					PRINTFORMD 唇をとがらせ
				ELSE
					PRINTFORMD 目に怒りを浮かべ
				ENDIF
			ELSEIF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORMD 満面に笑みを浮かべ
				ELSE
					PRINTFORMD 嬉しそうにほほえみ
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORMD 心地よさげな笑顔を
			ELSEIF 陥落状態() == 2
				PRINTFORMD いやそうな顔を
			ELSEIF 陥落状態() == 1
				PRINTFORMD 楽しげな表情を
			ELSE
				PRINTFORMD 冷めた表情を
			ENDIF
			PRINTFORMDL 向けて、名残惜しげに%ANIMALNAME()%から離れた
		ENDIF
		PRINTL
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(21)
		ELSEIF CFLAG:弱み握られ && !GETBIT (CFLAG:1490,5)
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「主様ぁ、なにを考えてるんですかナニを」
					PRINTFORMDL そう言いながらすり寄ってきたさとりが、%CALLNAME:MASTER%の懐から道具をかすめ取る
					PRINTFORML 「もしもし、聞こえますか？　そんなにＨなことさせたいですか？」
					PRINTFORMDL 目の前にいるさとりが、わざわざ道具を使って話しかけてくる
					PRINTFORML 「『させたい』って、直球ですねー、うふふ、いいですよ。主様のおねだりですもの」
					PRINTFORMDL 余りにもあっけなく受け入れるさとりに、なんとなく冷や汗が浮かぶ
					PRINTFORML 「うふふ、テレホンセックスでしたっけ？　主様も一緒にオナニー実況してくださいね」
					PRINTFORMDL 満面の笑みで紡がれた言葉に、逆らえる余地は無かった
				ELSE
					PRINTFORML 「……あ、主様」
					PRINTFORMDL 顔を赤くしたさとりを見ながら、懐に呑んでいる道具を探る%CALLNAME:MASTER%
					PRINTFORML 「『面白いモノをやる』？　……こいしがこの前遊んでいた道具に似てますけど」
					PRINTFORML 「遠距離通話の道具、ですか？　っ！　あ、あれは、その忘れて欲しいんですが」
					PRINTFORMDL 焦りを浮かべるさとりに、内心に浮かべた言葉をもう一度口にする
					PRINTFORML 「お、オナニーの、実況が、聞きたいなんて変態です」
					PRINTFORML 「……本当に、変態なんですから」
					PRINTFORMDL ぽつりと呟いたさとりが、渋々道具を受け取った
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORMDL 恥ずかしげに視線をそらすさとりを招き寄せ、手にしたモノを押しつける
				PRINTFORML 「『遠距離通話の道具だ』？　……なななな、何を考えているんですか！」
				PRINTFORML 「じじじじ、自慰の実況なんて……」
				PRINTFORMDL どうしても聞きたい、その言葉に、顔を赤くしていたさとりが、深々とため息をついた
				PRINTFORML 「……わかりました、ｺﾉﾍﾝﾀｲ」
				PRINTFORMDL 涙目で睨んでくるさとりだが、そのことは当然無視した
			ELSEIF 陥落状態() == 2
				PRINTFORMDL 顔を合わせた瞬間、背中を向けようとするさとりに、手にしたモノを投げた
				PRINTFORMDL 振り返りながら受け取ったさとりが、胡乱げにこちらを向いてから、顔を真っ赤にする
				PRINTFORML 「だだだ、誰がそんな事をするものですか！」
				PRINTFORMDL 小声で怒鳴るさとりに、周りにオナニー狂いだとバラして良いのかと、笑いかける
				PRINTFORML 「っっっ！！　……この、この変態っっ！」
				PRINTFORML 「み、見えもしないのに、実況させて、何が楽しいんですか、この色情魔っ！」
			ELSEIF 陥落状態() == 1
				PRINTFORML 「……あ、%CALLNAME:MASTER%って、何を考えてるんですか」
				PRINTFORMDL 自慰中のさとりが可愛かったと、内心で呟きつつ手にした道具を渡す
				PRINTFORML 「遠距離通話の道具？　……自慰の実況って、ヘンタイ」
				PRINTFORMDL 涙目のさとりが、それをしまい込む
			ELSE
				PRINTFORML 「……っ！　……このスケベ、ヘンタイ、色情狂」
				PRINTFORMDL 涙目で睨んでくるさとりに、自慰実況用の遠距離通話道具を押しつけた
			ENDIF
			SETBIT CFLAG:1490,5
		ELSEIF GETBIT (CFLAG:1491,1)
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「主様の馬鹿、なんであんなことするんですか」
					PRINTFORMDL 唇をとがらせたさとりが詰め寄ってくる
					PRINTFORML 「なんで今まで時止めでしなかったのに、時止めで奪ったんです」
					PRINTFORMDL そこまで言った途端、ぼろぼろと唐突に涙をこぼし始めるさとり
					PRINTFORML 「ぐす、えぐ、ひどい、です。ひくっ、ぬしさましんじてたのに、こんなの、こんなのぉ」
					PRINTFORML 「ハジメテ、ハジメテだったのに、どうして、どうしてなんですか」
					PRINTFORMDL 嗚咽混じりの問い詰めに、答えを返せない
					PRINTFORML 「ぐすひぐ、ぬしさまのばかぁ、わ～～んっっ！！」
					PRINTFORMDL そのまま号泣するさとりに、無かったはずの罪悪感が胸を苛んできた
				ELSE
					PRINTFORML 「……こんなところにいたのですね、主様」
					PRINTFORMDL 姿を現したさとりが、目尻に涙を浮かべて近寄ってくる
					PRINTFORML 「どうして時止めなんかを使って奪ったのですか」
					PRINTFORMDL すり寄ってきたさとりのその言葉に、答えが返せない
					PRINTFORML 「……どうして、初めてを自ら捧げさせてくれなかったのですか」
					PRINTFORMDL そう問い掛けるさとりに、やはり返す言葉は見つからなかった
				ENDIF
			ELSE
				PRINTFORMDL つかつかと、%CALLNAME:MASTER%に近寄ってきたさとりが、いきなり頬を張ってきた
				PRINTFORML 「……変態」
				PRINTFORMDL 涙目で呟いたさとりが背中を向けた
			ENDIF
			CALL GET_ANGRY(TARGET, 0)
			CLEARBIT CFLAG:1491,1
		ELSEIF CFLAG:1493 >= 7 && 陥落状態() >= 2
			IF CFLAG:1493 >= 30
				IF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORMDL いきなりさとりが胸元に飛び込んできた
						PRINTFORML 「主様主様主様主様、やっと逢えたやっと逢えた」
						PRINTFORMDL そう言って顔をボロボロと涙をこぼして見つめてくるさとり
						PRINTFORML 「寂しかったです、哀しかったです」
						PRINTFORML 「主様に嫌われたとおもって、それでそれで」
						PRINTFORMDL 嗚咽で言葉を失ったさとりに、ちりちりと胸の奥に痛みが走った
					ELSE
						PRINTFORML 「主様……、恋人を放置するにも限度というモノがありますよ」
						PRINTFORMDL 冷たい目で睨んでくるさとりに、他にも相手がいると考えると同時、サードアイの触手で喉を締め付けられた
						PRINTFORML 「側女に手を出すな、とは言いません。が、本妻を放っておくのはヒドいですよ」
						PRINTFORMDL 窒息するほどではないけれど、それでもゆるゆると喉を締め付けられる苦しさに喘ぐ%CALLNAME:MASTER%
						PRINTFORML 「無理心中なんて、流行りませんしね」
						PRINTFORMDL 同時に死ぬならそれはそれで、と考える%CALLNAME:MASTER%にさとりが呆れた表情を浮かべた
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「久しぶりですね。ふふ、やはり%CALLNAME:MASTER%と会えると気分が良くなります」
					PRINTFORMDL 朗らかに笑うさとりだが、目だけは獲物を狙う肉食獣のように爛々としている
					PRINTFORML 「『怒っているのか』……、いえ、釣った魚に餌をやらない人間が多々いるとは聞いていましたので」
					PRINTFORMDL 明らかに拗ねているさとりの頭を撫でて、宥める%CALLNAME:MASTER%だった
				ELSEIF 陥落状態() == 2
					PRINTFORML 「あら、生きていたんですか。死んでくれてても良かったのですが」
					PRINTFORMDL 辛辣な言葉を口にして睨んでくるさとりだが、どこか機嫌がよさそうに見えた
					PRINTFORML 「『頬が緩んで』なななななにばかなことを」
					PRINTFORMDL 考えを読み取ったさとりが顔を紅くして、視線を逸らしている
				ENDIF
			ELSEIF CFLAG:1493 >= 7
				IF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 「主様ぁ、愛しの恋人を放っておいて、どこをほっつき歩いていたんですか？」
						PRINTFORMDL いろいろだと答える%CALLNAME:MASTER%にさとりが頬を膨らませる
						PRINTFORML 「ホントに、主様は勝手です。でも、今日はこうして顔を見ることが出来たから許してあげます」
						PRINTFORMDL そう言ってほおずりしてくるさとり
						PRINTFORML 「『相変わらず可愛い』？　そう思うなら、もっと頻繁に逢ってくださいね」
						PRINTFORMDL ちゅ、と頬に唇を押しつけてくるさとりに、%CALLNAME:MASTER%は善処すると答えた
					ELSE
						PRINTFORML 「主様、{CFLAG:1493 / 7}週間も恋人を放置して楽しかったですか？」
						PRINTFORMDL 別段楽しくも辛くもないと答え%CALLNAME:MASTER%に、さとりが唇を尖らせる
						PRINTFORML 「私は、とても辛かったです。いくらでも相手がいる主様とは違って」
						PRINTFORMDL 険のある視線を向けてくるさとりに、思わず苦笑を浮かべてしまう
						PRINTFORML 「『可愛い奴』？　……妬心を抱くのが可愛いと言われても」
						PRINTFORMDL 苦笑と共にさとりの表情から険が取れ、いつもの優しい笑みが戻ってきた
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「{CFLAG:1493 / 7}週間ぶりですね」
					PRINTFORMDL そうするのが当然と言う様に、こちらの腕を自身の胸元に抱え込むさとり
					PRINTFORML 「ちょっとした気まぐれ、ですよ」
					PRINTFORMDL そういって、嬉しそうな笑顔を向けてきた
				ELSEIF 陥落状態() == 2
					PRINTFORML 「あら、生きていたんですか。残念です」
					PRINTFORMDL 素っ気ないさとりの言葉に、自然と苦笑が浮かぶ
					PRINTFORML 「『嬉しそう』……%CALLNAME:MASTER%の目は節穴ですか？」
					PRINTFORMDL 呆れた様な表情で深々とため息をつくさとりだが、その口元がほんの僅か緩んでいた
				ENDIF
			ENDIF
		ELSEIF 陥落状態() >= 4
			IF GETBIT (CFLAG:49:1490,9) && !GETBIT (CFLAG:49:1490,10)
				PRINTFORML 「ああ、主様、こんにちは」
				PRINTFORMDL そう言いながら近寄ってくるさとりの表情に、いつもの朗らかさとは違う穏やかな笑みが浮かんでいる
				PRINTFORML 「『雰囲気が変わった』？　変えたのは主様ですよ」
				PRINTFORMDL 嬉しげな表情に、%CALLNAME:MASTER%は小首をかしげた
				SETBIT CFLAG:49:1490,10
			ELSEIF 陥落状態() == 5
				IF GETBIT(CFLAG:1491,0)
					PRINTFORML 「……主様、主様は私の事嫌いですか？」
					PRINTFORMDL 唐突にそんなコトを言い出すさとりに首を傾げる
					PRINTFORML 「『この前の時止めか』？　そう、です」
					PRINTFORMDL さとりの目尻に涙が溜まっていく様子に、言葉が見つからない
					PRINTFORML 「主様、恋人になるまでしなかったのに、どうして、どうしてなんですか、ぐす、どうして」
					PRINTFORMDL ぼろぼろと涙をこぼすさとりに、ない筈の罪悪感を刺激される%CALLNAME:MASTER%
					PRINTFORMDL さとりの嗚咽が止まるまで、%CALLNAME:MASTER%はそっと抱きしめ続けた
					CLEARBIT CFLAG:1491,0
				ELSE
					PRINTFORML 「あ、主様」
					PRINTFORMDL 入ってきたさとりが、そのまま胸元に飛び込んできた
					PRINTFORML 「うふふ、主様はなにをしてたんですか？　『あいかわらずおっぱいやわらかい』、すけべ」
					PRINTFORMDL 口で咎めながら、さとりがさらに強く抱きつき乳房を押しつけてくる
					PRINTFORML 「ねぇ主様、このままいますぐＨします？　それともいちゃいちゃちゅっちゅします？」
					PRINTFORMDL 朗らかな笑顔でそんな言葉を口にして、下腹部も押しつけてきた
				ENDIF
			ELSE
				IF GETBIT(CFLAG:1491,0)
					PRINTFORML 「……主様は、意地悪ですね」
					PRINTFORMDL こちらを見つめるさとりが、ぽつりと呟く
					PRINTFORML 「時を止めて、声も表情も心も凍らせた私を犯すのはそんなに楽しいですか」
					PRINTFORMDL さとりの問いかけに、楽しいと答えつつ妙な違和感を覚えた
					PRINTFORML 「その違和感の理由、私が口にしなければ解りませんか？」
					PRINTFORMDL 答えを返そうとしてなぜか口が開けない%CALLNAME:MASTER%
					PRINTFORML 「『罪悪感か』？　多少は自覚があったんですね。できれば時止めなしで睦み合いたいです」
					CLEARBIT CFLAG:1491,0
				ELSE
					PRINTFORML 「主様、こんなところにいたのですね」
					PRINTFORMDL 嬉しげに囁くさとりのスカートの裾がふわりと揺れた
					PRINTFORML 「ふふ、中を覗きたいのですか？　仰れば、いくらでもお見せしてもよろしいのですが」
					PRINTFORMDL 見たいのであって見せて欲しいわけではない、そう言葉にしようとして
					PRINTFORML 「あら、残念です」
					PRINTFORMDL 苦笑を浮かべたさとりが、じっと見つめてきた
				ENDIF
			ENDIF
		ELSEIF 陥落状態() == 3
			IF FIRSTTIME("恋慕遭遇")
				PRINTFORML 「あら、こんなところにいたのですか」
				PRINTFORMDL 入ってきたさとりが、そのままこちらの隣に来る
				PRINTFORMDL そのまま、じっとこちらを見つめてくるさとりに、妙な違和感を覚えた
				PRINTFORML 「ふふ、気にしないでください。%CALLNAME:MASTER%的に言えば、単なる気まぐれです」
				PRINTFORMDL とてもそうは見えない、熱っぽい目と赤い頬に風邪でも引いたかと問いかける
				PRINTFORML 「ふふ、あれほど好き勝手する%CALLNAME:MASTER%が人の心配ですか？　大丈夫ですよ」
				PRINTFORML 「でも、そうやって心配していただけるのは嬉しいです」
				PRINTFORMDL そのどこか馴れ馴れしささえ見える態度に、好意を感じて小首をかしげる
				PRINTFORML 「%CALLNAME:MASTER%も嫌われている自覚はあったんですね」
				PRINTFORML 「実際のところは、どうでしょうかね？」
			ELSE
				IF GETBIT(CFLAG:1491,0)
					PRINTFORML 「……はぁ、自分を嫌いになりそうです」
					PRINTFORMDL こちらを睨みながらの呟きに、小首を傾げる%CALLNAME:MASTER%
					PRINTFORML 「『理由は』？　時止めで嬲るような%CALLNAME:MASTER%を嫌いになれないからです」
					PRINTFORML 「……時止めで一方的にされるより、私の方から気持ち良くしたいのですが」
					PRINTFORMDL ジト目で睨んでくるさとりに、答える言葉は出てこなかった
					CLEARBIT CFLAG:1491,0
				ELSE
					PRINTFORML 「ああ、%CALLNAME:MASTER%ですか」
					PRINTFORMDL ちらりとこちらを見てきたさとりが、そのまま隣に侍った
					PRINTFORML 「不審な態度、ですか？　さあ、実際はどうでしょうね？」
					PRINTFORMDL くすりと愉しげに笑うさとりに、反論の言葉は見つからなかった
				ENDIF
			ENDIF
		ELSEIF GETBIT (CFLAG:1491,0)
			PRINTFORML 「……そんなに時を止めて、女体を貪るのは愉しいですか？」
			PRINTFORMDL 不快感の籠もる声音に内心で頷き、じろりと睨まれてしまった
			CLEARBIT CFLAG:1491,0
		ELSEIF 陥落状態() == 2
			IF FIRSTTIME("家族手出し遭遇")
				PRINTFORML 「……こんなところにいたんですね」
				PRINTFORMDL 目に険を浮かべて、さとりが近寄ってくる
				PRINTFORML 「私の家族に手を出すな、と、言ったはずですが」
				PRINTFORMDL 抑えた声音が逆にさとりの怒りを感じさせる、がそのことは考えていなかったはずと思考する
				PRINTFORML 「私の目は、能動的な思考だけでなく、受動的な思考の蓄積・記憶を読むことも出来ますから」
				PRINTFORML 「特に何らかの感情と強く結びついているモノに関しては読みやすい」
				PRINTFORMDL そう告げてきたあと、さとりが冷たい目で睨んでくる
				PRINTFORML 「覚悟は、出来ていますね。……今後、私の家族に手を出さないでください」
				PRINTFORMDL さとりに従ういわれはない、内心でそう考えた瞬間、目の前すれすれをサードアイの触手が奔った
				PRINTFORML 「…………%CALLNAME:MASTER%は、不味そうですね」
				PRINTFORMDL 感情を感じさせない声音に、背筋を冷や汗が伝い降りた
				CALL GET_ANGRY(TARGET, 0)
			ELSE
				PRINTFORML 「……ああ、丁度良いところに」
				PRINTFORMDL 入ってきたさとりがつかつかと近寄ってくる
				PRINTFORML 「私の家族に手を出しているのですから、覚悟は良いのですよね」
				PRINTFORMDL じろりと睨み付けてくるさとりに、冷や汗が浮かんだ
			ENDIF
		ELSEIF 陥落状態() == 1
			PRINTFORML 「あら、こんなところに居たんですか」
			PRINTFORMDL どことなく柔らかさを感じさせる表情で、さとりが声をかけてきた
		ELSE
			PRINTFORML 「……」
			PRINTFORMDL 冷めた表情のさとりに、ただ頭を下げた
		ENDIF
		CFLAG:1493 = 0
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて一緒に入る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(22)
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORMD 満面に笑みを浮かべ
			ELSE
				PRINTFORMD 嬉しげな表情で
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORMD どことなく楽しげに
		ENDIF
		PRINTFORMDL 、さとりがこちらに顔を向けてくる
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて出て行った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(23)
		ELSEIF 陥落状態() == 2
			PRINTFORMD 忌々しげに舌を鳴
		ELSE
			PRINTFORMD 恥ずかしげに視線を逸
		ENDIF
		PRINTFORMDL らして、さとりが出て行った
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(24)
		ELSEIF 陥落状態() == 2
			PRINTFORML 「……さっさと出て行きなさい」
			PRINTFORMDL さとりの言葉を無視して、じろじろと上から下まで嬲るように眺める
			PRINTFORML 「…………死にたいんですか？」
			PRINTFORMDL その声に、本気の気配を感じて、渋々%CALLNAME:MASTER%は、脱衣所に戻った
		ELSE
			PRINTFORML 「出て行ってくれませんか？」
			PRINTFORMDL 裸身を隠そうともしないさとりの言葉に、渋々その場を後にした
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で遭遇した
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		IF CFLAG:MASTER:現在位置 == 950
			IF GROUPMATCH(TIME:2,1,6,7)
				PRINTFORMD 眠っている
			ELSE
				PRINTFORMD 近くにいる
			ENDIF
			PRINTFORMDL %ANIMALNAME()%を、さとりが優しい表情で撫でている
			PRINTFORMD %CALLNAME:MASTER%に気づいたさとりが
			IF GETBIT (CFLAG:1492,1)
				IF 陥落状態() >= 4
					PRINTFORMD 唇をとがらせ
				ELSE
					PRINTFORMD 目に怒りを浮かべ
				ENDIF
			ELSEIF 陥落状態() >= 4
				PRINTFORMD 嬉しそうにほほえみ
			ELSEIF 陥落状態() == 3
				PRINTFORMD 心地よさげに笑って
			ELSEIF 陥落状態() == 2
				PRINTFORMD いやそうな顔をして
			ELSEIF 陥落状態() == 1
				PRINTFORMD 少しだけ楽しそうに
			ELSE
				PRINTFORMD 冷めた表情で
			ENDIF
			PRINTFORMDL 、%ANIMALNAME()%から離れて近寄ってきた
		ENDIF
		PRINTL
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(25)
		ELSEIF GETBIT (CFLAG:1492,1)
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「主様の馬鹿、なんであんなことするんですか」
					PRINTFORMDL 唇をとがらせたさとりが詰め寄ってくる
					PRINTFORML 「なんで今まで時止めでしなかったのに、時止めで奪ったんです」
					PRINTFORMDL そこまで言った途端、ぼろぼろと唐突に涙をこぼし始めるさとり
					PRINTFORML 「ぐす、えぐ、ひどい、です。ひくっ、ぬしさましんじてたのに、こんなの、こんなの」
					PRINTFORML 「ハジメテ、ハジメテだったのに、どうして、どうしてなんですか」
					PRINTFORMDL 嗚咽混じりの問い詰めに、答えを返せない
					PRINTFORML 「ぐすひぐ、ぬしさまのばかぁ、わ～～んっっ！！」
					PRINTFORMDL そのまま号泣するさとりに、今まで無かったはずの罪悪感が胸を苛んできた
				ELSE
					PRINTFORML 「主様、酷いです」
					PRINTFORMDL 涙目で見つめてくるさとりの傍に歩み寄る
					PRINTFORML 「どうして、時止めで奪ったんですか？　初めては、自分の意志で捧げたかったのに」
					PRINTFORMDL ……考えを取り繕う暇も無く、さとりが唇を押し付けてきた
					PRINTFORML 「ん、ちゅ……れろ……、本当に、ひどいお方です、主様は」
				ENDIF
			ELSE
				PRINTFORMDL つかつかと、%CALLNAME:MASTER%に近寄ってきたさとりが、いきなり頬を張ってきた
				PRINTFORML 「……最低」
				PRINTFORMDL 涙目で呟いたさとりが背中を向けた
			ENDIF
			CALL GET_ANGRY(TARGET, 0)
			CLEARBIT CFLAG:1491,1
		ELSEIF 陥落状態() >= 4
			IF GETBIT (CFLAG:49:1490,9) && !GETBIT (CFLAG:49:1490,10)
				PRINTFORML 「ああ、主様、こんにちは」
				PRINTFORMDL そう言いながら近寄ってくるさとりの表情に、いつもの朗らかさとは違う穏やかな笑みが浮かんでいる
				PRINTFORML 「『雰囲気が変わった』？　変えたのは主様ですよ」
				PRINTFORMDL 嬉しげな表情に、%CALLNAME:MASTER%は小首をかしげた
				SETBIT CFLAG:49:1490,10
			ELSEIF 陥落状態() == 5
				PRINTFORML 「あ、主様主様、うふふ、お会いできて嬉しーです！」
				PRINTFORMDL ひまわりのような笑顔と共に、さとりがぎゅっと抱きついてくる
				PRINTFORML 「『甘い匂い』？　うふふ、主様のために毎日磨き抜いていますからねー」
				PRINTFORMDL そういいながら全身をこすり合わせてくるさとり
				PRINTFORML 「『気持ちいい』？　うふふ、このままＨします？」
				PRINTFORMDL さとりのお誘いにたぎるものを感じつつ、苦笑を浮かべる%CALLNAME:MASTER%だった
			ELSE
				PRINTFORML 「あ、主様。どうしてこちらに？」
				PRINTFORMDL 単なる気まぐれだと答えると同時、さとりが身をすり寄せてきた
				PRINTFORML 「ふふ、それならそれでかまいません。よければこのまま睦み合いでもなさいますか？」
				PRINTFORMDL さとりの問いかけに考えておくと答える
				PRINTFORML 「残念です、主様ならすぐに襲いかかってくるものと」
				PRINTFORMDL そう言いながら、こちらの手を取って自身の胸へと導くさとりに苦笑が浮かんだ
			ENDIF
		ELSEIF 陥落状態() == 3
			IF FIRSTTIME("恋慕遭遇")
				PRINTFORML 「ふふ、まさかここで%CALLNAME:MASTER%と会えるとは思いませんでした」
				PRINTFORMDL 嬉しそうに呟くさとりがすっと身を寄せてくる
				PRINTFORMDL その頬の赤さと口元の緩みに、妙な違和感が湧いてくる
				PRINTFORML 「今の方が、素の私に近いんですけどね」
				PRINTFORML 「こいしやおくう、お燐を相手にしている時の私に」
				PRINTFORML 「コレが、嫌いな相手や好きでもない相手には見せない私です」
				PRINTFORMDL その言葉に、惚れた腫れたは興味が無いと呟く%CALLNAME:MASTER%
				PRINTFORML 「ふふ、別に%CALLNAME:MASTER%に変わってもらいたいとは思っていません」
				PRINTFORML 「ただ、こういう心持ちも楽しいのだと、気づいたモノですから」
				PRINTFORMDL そう言いながら、媚びる様な笑みを浮かべるさとりに、なぜか胸の奥が奇妙に弾んだ
			ELSE
				PRINTFORML 「ああ、%CALLNAME:MASTER%ですか。わざわざこちらに来るなんて珍しい」
				PRINTFORMDL 単なる気まぐれだと答える%CALLNAME:MASTER%
				PRINTFORML 「そこで、私に会いに来た、と言わないところが、らしいですね」
				PRINTFORMDL 心にも無いことを言われたいかと、内心で問いかける%CALLNAME:MASTER%に、苦笑が返ってきた
			ENDIF
		ELSEIF 陥落状態() == 2
			IF FIRSTTIME("家族手出し遭遇")
				PRINTFORML 「……私の家族に、手を出さないようにと、伝えたはずですが」
				PRINTFORMDL 顔を合わせた瞬間、考えていなかった事を読み取られ、冷や汗が浮かんだ
				PRINTFORML 「私の能力が、思考を読むだけのモノだとでも思っていたのですか？」
				PRINTFORML 「私は、相手のトラウマを掘り起こせる……、すなわち記憶を読み取ることも可能ということ」
				PRINTFORMDL 思わず、そんなこと聞いてないと思うと同時、呆れた表情でさとりが見つめてくる
				PRINTFORML 「脅威となり得る相手に、すべての能力を曝け出す愚か者などいるわけがないでしょう」
				PRINTFORML 「あなたの庇護者と敵対してまで、家族を汚した恨みを晴らすことはできません、が……」
				PRINTFORMDL その無言こそが、雄弁にさとりの怒りをあらわにしていて
				PRINTFORML 「今度こそ、家族に手を出さない様に」
				PRINTFORMDL その言葉にうなずきを返しつつ、内心で舌を出しにらみつけられた
				CALL GET_ANGRY(TARGET, 0)
			ELSE
				PRINTFORML 「……何のようですか」
				PRINTFORMDL 警戒心をあらわにするさとりに、気まぐれだと答える%CALLNAME:MASTER%
				PRINTFORML 「私の家族に手を出すのは許しませんから」
				PRINTFORMDL そんなのはこちらの勝手だと答える%CALLNAME:MASTER%を、悔しげな表情で睨んできた
			ENDIF
		ELSEIF 陥落状態() == 1
			PRINTFORML 「あら、わざわざこんなところに来たんですか？　珍しい」
			PRINTFORMDL 単なる気まぐれだと答える%CALLNAME:MASTER%に、笑みを浮かべたさとりがそばに寄ってきた
		ELSE
			PRINTFORML 「……あら、何のようです？」
			PRINTFORMDL 特に用は無い、そう答えながらなんとなく立ち止まった
		ENDIF
		CFLAG:1493 = 0
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;他キャラとデート中に遭遇した
	;ARG:1にデート相手
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		IF CFLAG:MASTER:現在位置 == 950
			IF GROUPMATCH(TIME:2,1,6,7)
				PRINTFORMD 眠っている
			ELSE
				PRINTFORMD 近くにいる
			ENDIF
			PRINTFORMDL %ANIMALNAME()%を、さとりが優しい表情で撫でている
			PRINTFORMD %CALLNAME:MASTER%に気づいたさとりが
			IF GETBIT (CFLAG:1492,1)
				IF 陥落状態() >= 4
					PRINTFORMD 唇をとがらせ
				ELSE
					PRINTFORMD 目に怒りを浮かべ
				ENDIF
			ELSEIF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORMD 頬を膨らませ
				ELSE
					PRINTFORMD 嬉しそうにほほえみ
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORMD 心地よさげに笑って
			ELSEIF 陥落状態() == 2
				PRINTFORMD いやそうな顔をして
			ELSEIF 陥落状態() == 1
				PRINTFORMD 少しだけ楽しそうに
			ELSE
				PRINTFORMD 冷めた表情で
			ENDIF
			PRINTFORMDL 、%ANIMALNAME()%から離れて近寄ってきた
		ENDIF
		PRINTL
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(26,ARG:1)
		ELSEIF GETBIT (CFLAG:1492,1)
			IF 陥落状態() >= 4
				PRINTFORMDL 袖を引っ張られ、%CALLNAME:(ARG:1)%から離れたところに誘導される%CALLNAME:MASTER%
				IF 陥落状態() == 5
					PRINTFORML 「主様の馬鹿、なんであんなことするんですか」
					PRINTFORMDL 唇をとがらせたさとりが詰め寄ってくる
					PRINTFORML 「なんで今まで時止めでしなかったのに、時止めで奪ったんです」
					PRINTFORMDL そこまで言った途端、ぼろぼろと唐突に涙をこぼし始めるさとり
					PRINTFORML 「ぐす、えぐ、ひどい、です。ひくっ、ぬしさましんじてたのに、こんなの、こんなの」
					PRINTFORML 「ハジメテ、ハジメテだったのに、どうして、どうしてなんですか」
					PRINTFORMDL 嗚咽混じりの問い詰めに、答えを返せない
					PRINTFORML 「ぐすひぐ、ぬしさまのばかぁ、わ～～んっっ！！」
					PRINTFORMDL そのまま号泣するさとりに、今まで無かったはずの罪悪感が胸を苛んできた
				ELSE
					PRINTFORML 「主様、酷いです」
					PRINTFORMDL 涙目で見つめてくるさとりの傍に歩み寄る
					PRINTFORML 「どうして、時止めで奪ったんですか？　初めては、自分の意志で捧げたかったのに」
					PRINTFORMDL ……考えを取り繕う暇も無く、さとりが唇を押し付けてきた
					PRINTFORML 「ん、ちゅ……れろ……、本当に、ひどいお方です、主様は」
				ENDIF
			ELSE
				PRINTFORMDL つかつかと、%CALLNAME:MASTER%に近寄ってきたさとりが、いきなり頬を張ってきた
				PRINTFORML 「……最低」
				PRINTFORMDL 涙目で呟いたさとりが背中を向けた
			ENDIF
			CLEARBIT CFLAG:1491,1
			CALL GET_ANGRY(TARGET, 0)
		ELSEIF 陥落状態() >= 4
			IF GETBIT (CFLAG:49:1490,9) && !GETBIT (CFLAG:49:1490,10)
				PRINTFORML 「ああ、主様、こんにちは」
				PRINTFORMDL そう言いながら近寄ってくるさとりの表情に、いつもの朗らかさとは違う穏やかな笑みが浮かんでいる
				PRINTFORML 「『雰囲気が変わった』？　変えたのは主様ですよ」
				PRINTFORMDL 嬉しげな表情に、%CALLNAME:MASTER%は小首をかしげた
				SETBIT CFLAG:49:1490,10
			ELSEIF 陥落状態() == 5
				PRINTFORML 「主様のバカ、イヂワル、スケベ、Ｈ、ヘンタイ！」
				PRINTFORMDL 唇をとがらせながら抱きついてくるさとりを、%CALLNAME:(ARG:1)%が驚きの表情で見つめている
				PRINTFORML 「ああ、\@ ARG:1 >= 36 && ARG:1 <= 38 ? %CALLNAME:(ARG:1)% # 貴方 \@には一切関係\@ ARG:1 >= 36 && ARG:1 <= 38 ? ない # ありません \@から。主様、主様、主様、なんで他の女とデートなんてしてるんです！」
				PRINTFORMDL ちらりと%CALLNAME:(ARG:1)%に\@ ARG:1 >= 36 && ARG:1 <= 38 ? 困ったような表情 # 冷めた視線 \@を向けた後、さとりが涙目で睨んでくる
				PRINTFORML 「私は主様だけのモノなのに、主様は私だけのモノにはなってくれないなんて、ヒドいです！」
				PRINTFORMDL %CALLNAME:(ARG:1)%に頭を下げてから、唇をとがらせるさとりを抱き寄せ頭を撫でてやった
			ELSEIF ARG:1 >= 36 && ARG:1 <= 38
				PRINTFORML 「……主様、あまり家族に手を出さないで欲しいのですが」
				PRINTFORMDL 苦笑を浮かべるさとりの言葉に、どう答えようかと頭をひねる
				PRINTFORML 「『怒ってる』？　いいえ、%CALLNAME:(ARG:1)%には怒ってないわよ」
				PRINTFORMDL そう言いながら、%CALLNAME:(ARG:1)%に微笑みを向けるさとり
				PRINTFORML 「……まあ、すべては勘違いさせている主様が悪いのですが」
				PRINTFORMDL そう言ったさとりがサードアイのひもを腕に巻き付けてきて、強引に引き寄せられた
			ELSE
				PRINTFORML 「……主様、恋人の前にほかの女を連れてくるのはどうかと思いますけど」
				PRINTFORMDL 苦笑を浮かべるさとりの言葉に、どう答えようかと頭をひねる
				PRINTFORML 「『覚になんて負けない』？　残念ですが、もう主様は私のモノですので」
				PRINTFORMDL そう言いながら、%CALLNAME:(ARG:1)%に哀れみの視線を向けるさとり
				PRINTFORML 「……まあ、すべては勘違いさせている主様が悪いのですが」
				PRINTFORMDL そう言ったさとりがサードアイのひもを腕に巻き付けてきて、強引に引き寄せられた
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「相変わらず、女を侍らせて喜んでいるんですね」
			PRINTFORMD さとりを見たとたん、%CALLNAME:(ARG:1)%が
			IF ARG:1 >= 36 && ARG:1 <= 38
				PRINTFORMD 嬉しげな
			ELSEIF 素質計算(ARG:1) == 1
				PRINTFORMD おびえた
			ELSEIF 素質計算(ARG:1) == 2
				PRINTFORMD 不快そうな
			ELSEIF 素質計算(ARG:1) == 3
				PRINTFORMD いやそうな
			ELSEIF 素質計算(ARG:1) >= 4 || 素質計算(ARG:1) == 5
				PRINTFORMD 取り繕った
			ENDIF
			PRINTFORMDL 表情を浮かべる
			IF ARG:1 >= 36 && ARG:1 <= 38
				PRINTFORML 「はぁ……、私の家族に何をするつもりです？」
				PRINTFORMDL 親睦を深めているという言葉にうなずく%CALLNAME:(ARG:1)%に、さとりがこめかみを押さえてため息をついた
			ELSE
				PRINTFORML 「『なんでここに』？　あら、私がどこにいようと私の勝手でしょう」
				PRINTFORMDL そう言いながら、やけに挑戦的な視線を%CALLNAME:(ARG:1)%に向けるさとりだった
			ENDIF
		ELSEIF 陥落状態() == 2
			IF ARG:1 >= 36 && ARG:1 <= 38
				PRINTFORML 「%CALLNAME:(ARG:1)%、こっちに来なさい」
				PRINTFORMDL さとりの言葉に、%CALLNAME:(ARG:1)%はただぎゅっとこちらの腕をつかんでくる
				PRINTFORMDL 『\@ ARG:1 == 38 ? お姉ちゃん # さとり様 \@怒ってる\@ ARG:1 == 38 ?  # んですか \@？』とおずおずと問いかける%CALLNAME:(ARG:1)%
				PRINTFORML 「別に怒ってないから、早くこちらに」
				PRINTFORMDL そう言いながら不愉快そうににらみつけてくるさとりに、内心で舌を出した
			ELSE
				PRINTFORML 「あら、仲がよくて結構ですね」
				PRINTFORMDL にやりと笑うさとりに、%CALLNAME:(ARG:1)%が
				IF 素質計算(ARG:1) == 1
					PRINTFORMD おびえた
				ELSEIF 素質計算(ARG:1) == 2
					PRINTFORMD 不快そうな
				ELSEIF 素質計算(ARG:1) == 3
					PRINTFORMD いやそうな
				ELSEIF 素質計算(ARG:1) >= 4 || 素質計算(ARG:1) == 5
					PRINTFORMD 取り繕った
				ENDIF
				PRINTFORMDL 様子で、%CALLNAME:MASTER%にしがみついてくる
				PRINTFORML 「ふふ、別に他意は無いですよ」
				PRINTFORMDL そう言いながらも浮かべる笑みに、背筋を冷たい汗が伝い落ちた
			ENDIF
		ELSEIF 陥落状態() == 1
			PRINTFORML 「相変わらずおさかんですね。まあ、私も混ざりたいところですが」
			PRINTFORMDL そんなさとりの言葉に、%CALLNAME:(ARG:1)%が何か言いたげにこちらを見つめてきた
		ELSE
			PRINTFORML 「……仲がよくて結構ですね」
			PRINTFORMDL それだけを告げて、わずかに下がるさとりに、%CALLNAME:(ARG:1)%がほっとした表情を浮かべた
		ENDIF
		CFLAG:1493 = 0
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MAIN_MAP上で一日最初の挨拶
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		IF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「あ、主様！」
				PRINTFORMDL 嬉しそうな声を上げ、さとりがこちらに駆け寄ってきた
			ELSE
				PRINTFORML 「ああ、主様」
				PRINTFORMDL うっとりした表情で、さとりがしずしずと近寄ってきた
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「%CALLNAME:MASTER%ですか」
			PRINTFORMDL どことなく嬉しげにさとりが寄ってくる
		ELSEIF 陥落状態() == 2
			PRINTFORML 「……はぁ」
			PRINTFORMDL 深々とため息をつくさとりの側に行く%CALLNAME:MASTER%
		ELSEIF 陥落状態() == 1
			PRINTFORML 「あら、%CALLNAME:MASTER%ですか」
			PRINTFORMDL 僅かに口元を緩めたさとりに近寄った
		ELSE
			PRINTFORML 「……どうも」
			PRINTFORMDL 冷めた表情のさとりに近づく%CALLNAME:MASTER%
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で一日最初の挨拶
	;ARG:1にデート相手
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		IF ARG:1 >= 36 && ARG:1 <= 38
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「主様、私より%CALLNAME:(ARG:1)%の方が良いんですか」
					PRINTFORMDL 恨みがましいさとりの表情に%CALLNAME:(ARG:1)%が驚いている
				ELSE
					PRINTFORML 「主様、%CALLNAME:(ARG:1)%ばかりかわいがるのはどうかと」
					PRINTFORMDL 珍しく、妬心を露わにするさとりに、%CALLNAME:(ARG:1)%が小首を傾げている
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「……まったく、ウチの子達にも困ったものです」
				PRINTFORMDL 額を抑えるさとりに、%CALLNAME:(ARG:1)%が戸惑いを浮かべている
			ELSEIF 陥落状態() == 2
				PRINTFORML 「…………%CALLNAME:MASTER%と言う人は」
				PRINTFORMDL ふるふると怒りに震えるさとりに、%CALLNAME:(ARG:1)%は首を傾げている
			ELSEIF 陥落状態() == 1
				PRINTFORML 「……はぁ困ったものです」
				PRINTFORMDL そう呟くさとりに、%CALLNAME:(ARG:1)%が何か言いたそうにしている
			ELSE
				PRINTFORML 「……あまり、ウチの子を困らせないでください」
				PRINTFORMDL さとりの言葉に、%CALLNAME:(ARG:1)%が不思議そうな顔をする
			ENDIF
		ELSEIF ARG:1
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「……そんなに、妾のほうが大事ですか」
					PRINTFORMDL 頬を膨らませるさとりに、冷や汗が浮かぶ
				ELSE
					PRINTFORML 「主様、相変わらずおさかんですね」
					PRINTFORMDL くすりと笑うさとりの目は、冷徹なままだ
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「%CALLNAME:MASTER%の様な人を好き者と言うんでしょうね」
				PRINTFORMDL さとりがどことなく不機嫌そうな表情を浮かべている
			ELSEIF 陥落状態() == 2
				PRINTFORML 「%CALLNAME:MASTER%と言う人は……」
				PRINTFORMDL 不快そうにさとりが顔を蹙めている
			ELSEIF 陥落状態() == 1
				PRINTFORML 「……はぁ」
				PRINTFORMDL 何か言いたげに、さとりが深々とため息をついた
			ELSE
				PRINTFORML 「…………どうも」
				PRINTFORMDL 冷めた表情のさとりが、%CALLNAME:MASTER%と%CALLNAME:(ARG:1)%を見比べている
			ENDIF
		ELSE
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「あ、主様、私に会いに来てくれたんですか？」
					PRINTFORMDL 満面に笑みを浮かべて、さとりが駆け寄ってくる
				ELSE
					PRINTFORML 「主様？　どうしてここに」
					PRINTFORMDL 嬉しげに頬を緩めてさとりが側に来た
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「あら、%CALLNAME:MASTER%」
				PRINTFORMDL どことなく楽しげな表情で、さとりが側に来た
			ELSEIF 陥落状態() == 2
				PRINTFORML 「…………はぁ」
				PRINTFORMDL まるでこの世の終わりを見たとでも言いたげにため息をつくさとりの側に行ってみる
			ELSEIF 陥落状態() == 1
				PRINTFORML 「あ」
				PRINTFORMDL ほんのすこし、嬉しそうな雰囲気を浮かべてさとりが寄ってきた
			ELSE
				PRINTFORML 「……」
				PRINTFORMDL 無表情のさとりを見つけた
			ENDIF
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K49_2(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
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					;MASTERに男性器有り
					IF GETBIT(TALENT:MASTER:性別,1) && !RAND:3
						PRINTFORMDL しゅにしゅにと、固く張り詰めた物をこすられる感覚に目を覚ます%CALLNAME:MASTER%
						PRINTFORML 「おはよーございます、主様ぁ」
						PRINTFORMDW 頬を赤くして目を潤ませ、発情しきったさとりが朝勃ちの逸物をさすっている
						PRINTFORML 「ね、ぬしさま、おきたんだったら、このままＨしましょ？」
						PRINTFORMDL 囁きながら、こちらの手を自身の秘処へと誘うさとりに、あとでと答えながら振り払う
						PRINTFORMW 「……むー、主様のイヂワルー」
					;MASTERに女性器あり、かつさとりんふたなり
					ELSEIF GETBIT(TALENT:性別,1) && GETBIT(TALENT:MASTER:性別,0) && !RAND:2
						PRINTFORMDL じんわりと全身に広がる熱に、うかされるように、%CALLNAME:MASTER%は目を覚まし、思わず甘い声を上げた
						PRINTFORML 「はぁはぁ、はぁ、ぬしさま、ぬしさまぁ、すき、だいすきぃ」
						PRINTFORMDL じゅぷちゅぷという音が股間から聞こえる度、秘処から這い上がってくる悦楽に肺の奥から声が出る
						PRINTFORMW 「いいです、これ、いいですぅ、ぬしさま、もっとおまんこもっとぉ……」
						PRINTDW ………………
						PRINTFORMDL 口の端からヨダレをこぼすさとりが射精して、落ち着いたのを確認してから、%CALLNAME:MASTER%は体を起こした
						PRINTFORML 「……ごめんなさい、主様、ごめんなさい、きらいにならないで、ごめんなさい」
						PRINTFORMDW ぽろぽろと涙をこぼすさとりに、気持ち良かったから構わないと答え、その頬に軽くキスをした
					ELSE
						PRINTFORML 「主様ー、あさですよー、おきてくださいー」
						PRINTFORMDL 甘ったるいさとりの声に、ゆっくりと目を開ける%CALLNAME:MASTER%
						PRINTFORMDL その眼前にさとりの顔があった
						PRINTFORMW 「ちゅっれろ、じゅるちゅぱ……れろ……」
						PRINTFORML 「んーーー、ぷはっっ……、主様のお口おいしーです。おはようございます」
						PRINTFORMDL こちらも美味しかったと答えながら身を起こす%CALLNAME:MASTER%
						PRINTFORMDW こんどは、こちらからさとりを抱きしめて唇を思う存分堪能した
					ENDIF
				ELSE
					PRINTFORML 「ふふ、おはようございます主様、よく眠れました？」
					PRINTFORMDL 真横からかけられた声とぬくもりに小首を傾げつつ、隣に横になっているさとりを見つめる
					PRINTFORMW 「『良い匂いの柔らかい抱き枕がいたからよく眠れた』？　ふふ、恋人冥利に尽きますね」
					PRINTFORMDL そう言いながらうっとりした表情で、さとりが見つめてくる
					PRINTFORML 「私も主様という抱き枕のおかげでよく眠れました、でも、そろそろ起きてくださいね」
					PRINTFORMDW 名残惜しそうなさとりの唇を奪い、堪能してから%CALLNAME:MASTER%は身を起こした
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「おはようございます。可愛い寝顔ですね」
				PRINTFORMDW 目を覚ますなりかけられた言葉に、可愛いは心外だと答えつつ身を起こす%CALLNAME:MASTER%
				PRINTFORML 「ふふ、%CALLNAME:MASTER%らしい物言いですね」
				PRINTFORMDW 楽しげに笑うさとりには答えず、%CALLNAME:MASTER%は身支度を調えた
			ENDIF
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					;MASTERに男性器有り
					IF GETBIT(TALENT:MASTER:性別,1) && !RAND:3
						PRINTFORMDL ちゅるれろと卑猥な粘着音が聞こえ、同時に股間から快感が這い上がって来た
						PRINTFORML 「ん、美味しい、主様のおちんちん、おいひい……れろじゅるちゅるちゅぱ」
						PRINTFORML 「おはようございます、主様。れろちゅぽ、んふふ、朝から元気ですね」
						PRINTFORMDL クスクスと笑うさとりに、生理現象だと答える%CALLNAME:MASTER%
						PRINTFORML 「それじゃ、スッキリしましょうね、れろちゅぷ」
						PRINTFORMDL 嬉しそうに美味しそうにほおばるさとりに、我慢出来ずに口内に精液を吐き出した
					;MASTERに女性器あり、かつさとりんふたなり（ただしアナルセックス
					ELSEIF GETBIT(TALENT:性別,1) && GETBIT(TALENT:MASTER:性別,0) && !RAND:2
						PRINTFORMDL ずぬりと、肛口を広げられる感触に、%CALLNAME:MASTER%は思わず目覚めた
						PRINTFORML 「はー、はー、ぬしさま、ぬしさまぁ……」
						PRINTFORMDL 俯せになった自分の上に、さとりがのしかかっていて、ずにゅんと擬根が抜ける感覚に嬌声を上げる
						PRINTFORML 「あはぁ、ぬしさまおきたんですかぁ、このままおしりでじゅぽじゅぽしましゅね」
						PRINTFORMDL ……………………
						PRINTFORML 「ごめん、なさい」
						PRINTFORMDL 肛内に存分に精を吐き出して、我に返ったらしいさとりが涙目になりながら呟く
						PRINTFORML 「私、こんな、こんなの……」
						PRINTFORMDL 気持ち良かったから構わない、そう呟いて、唇を重ねてさとりの悔言を止めさせた
					ELSE
						PRINTFORMDL 唇に何かが触れる感触と体にかかる重みが、%CALLNAME:MASTER%の意識をはっきりさせる
						PRINTFORML 「んー、ちゅっ、うふふ、おはようございます、主様」
						PRINTFORMDL 満面の笑みを浮かべるさとりが、のしかかっていた
						PRINTFORML 「『朝駆けか？』　はい、そーですよー。主様、Ｈしましょ？」
						PRINTFORMDL 楽しそうなさとりに、気が向いたらと答えつつ、%CALLNAME:MASTER%は身を起こした
						PRINTFORML 「むー、せっかくのお誘いを断るなんて、主様はいぢわるです」
					ENDIF
				ELSE
					PRINTFORML 「おはようございます、主様」
					PRINTFORMDL さとりが、僅かに頬を赤らめてこちらを見つめてくる
					PRINTFORML 「……その、夢の中の様なことをしたいんですか」
					PRINTFORMDL その言葉に、さっきまでの夢を鮮明に思い出す
					PRINTFORMDL さとりを身動きできないように縛り、触れること無く心の中で嬲り続ける夢
					PRINTFORML 「想像だけで犯される。散々されてきましたが、主様にされるならそれも良いですね」
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「おはようございます。ふふ、なんとなく来たかったんですよ」
				PRINTFORMDL さとりのいる理由を考えようとして、笑顔で返された答えに、多少訝る
				PRINTFORML 「それとも、朝駆けをされたかったんですか？」
				PRINTFORMDL どこか愉しげなさとりの言葉に、さっきまでの淫夢の相手がさとりだったことを思い出した
			ELSE
				PRINTFORML 「おはようございます。ああ、私がここにいる理由は特にありませんから」
				PRINTFORMD そう呟くさとりの顔に、
				IF 陥落状態() == 2
					PRINTFORMDL どことなく怖い笑顔が浮かんでいる
				ELSEIF 陥落状態() == 1
					PRINTFORMDL 優しげな笑みが浮かんでいる
				ELSE
					PRINTFORMDL なんの感情も浮かんではいない
				ENDIF
			ENDIF
			PRINTFORMW
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が起きている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF 陥落状態() >= 4
			IF 陥落状態() == 5
				IF GETBIT(TALENT:MASTER:性別,1) && !RAND:3
					SELECTCASE RAND:4
						;さとりんＶ騎乗位中
						CASE 0
							PRINTFORML 「おはよーございますー、はぁ、ん、ぬしさまぁ……」
							PRINTFORMDL 陽根に感じるぬめりと締め付けと熱さに、%CALLNAME:MASTER%は目を覚ます
							PRINTFORML 「はぁはぁ、きもちいい、です、ぬしさまの、おちんちん、んくっ、いいです」
						;さとりんＡ騎乗位中
						CASE 1
							PRINTFORML 「ぬしさまぁ、おはようございます……」
							PRINTFORMDL 甘ったるい声とギュッと締め付けられる感触に目を覚ます%CALLNAME:MASTER%
							PRINTFORML 「ぬしさまぁ、おちんちん素敵ぃ、おしりきもちいい……」
						;さとりんフェラ中
						CASE 2
							PRINTFORML 「じゅるれろ、……ぬひはは、……はふ、れろ」
							PRINTFORMDL 股間から這い上がってくる悦楽に、%CALLNAME:MASTER%の目は自然と覚めた
							PRINTFORML 「あ、おはようございます……、ん、じゅるる」
						;さとりん手淫中
						CASE 3
							PRINTFORML 「うふふ、ぬしさまのおちんちんかたぁい……あ」
							PRINTFORMDL しゅにしゅにと逸物をこすられる感覚に目を覚まし、しばし%CALLNAME:MASTER%はさとりと見つめ合う
							PRINTFORML 「おはようございます、ぬしさま、うふふ、おちんちんかたいからイタズラしたくなりました」
					ENDSELECT
					PRINTFORMDL うっとりした表情のさとりに%CALLNAME:MASTER%はしばし身を任せた
					PRINTFORMW ……………………
					PRINTFORML 「……あ、あう、その、あの、おはよう、ございます」
					PRINTFORMDW 顔を真っ赤にして恥じらうさとりの頭を撫でてやった
				ELSEIF GETBIT(TALENT:性別,1) && GETBIT(TALENT:MASTER:性別,0) && !RAND:2
					PRINTFORML 「はぁはぁ、きもちいい、これ、きもちいいです」
					PRINTFORMDL 甘ったるい声が耳朶を刺激し、じんわりとした熱が下腹から這い上がってくる
					PRINTFORMW 「主様、すき、だいすきぃ……はぁはぁ、きもちいいです」
					PRINTFORMDL ごりごりと膣腔を擬根でこすり立てられる感触に、%CALLNAME:MASTER%ははっきりと目を覚ました
					PRINTFORML 「ぬしさま、ぬしさまぁ、っっ！？　や、こ、これはひぁんっ！」
					PRINTFORMDW 目が合うと同時、一瞬固まったさとりを抱きしめ、今度はこちらからさとりの擬根を貪った
				ELSE
					PRINTFORML 「ん、ふふ、おはようございます主様」
					PRINTFORMDL ギュッと抱きついていたさとりの挨拶に苦笑しながら返答する%CALLNAME:MASTER%
					PRINTFORMW 「主様の寝顔かわいーです、うふふ、もうちょっと見ていたかったなー」
					PRINTFORMDL すりすりと頬を寄せてくるさとりに、さとりの方が可愛いと返す
					PRINTFORML 「っっ！　や、もう、主様のばかぁ」
					PRINTFORMDW さとりが嬉しそうに笑いながら、起き上がった%CALLNAME:MASTER%を着替えさせていく
				ENDIF
			ELSE
				PRINTFORML 「主様、おはようございます。起きる時間ですよ」
				PRINTFORMDL やわらかな声に導かれるように、%CALLNAME:MASTER%は目を覚ました
				PRINTFORMW 「ふふ、相変わらず、可愛い寝顔ですね」
				PRINTFORMDL そういいながら、不意に顔を寄せてきたさとりが、唇を重ねてくる
				PRINTFORML 「ん……、はい、続きはちゃんと起きてから、してくださいね」
				PRINTFORMDW そんな可愛いおねだりに、苦笑しながら身を起こした
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「おはようございます。いつまで寝ているつもりですか」
			PRINTFORMDW さとりの言葉に、このまま一日中寝ていたいと内心で返す
			PRINTFORML 「それだと、私とイイコトはできませんよ？」
			PRINTFORMDW それは勿体ないと言葉で返し、%CALLNAME:MASTER%は身を起こした
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が寝ている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF 陥落状態() >= 4
			PRINTFORML 「……ん、主、……様ぁ……」
		ELSEIF 陥落状態() == 3
			PRINTFORML 「んぅ…………ふ……」
		ENDIF
		PRINTFORMDL 可愛らしい寝息を立てるさとりに、目を覚ます気配は見られない
		PRINTFORMDL ふと思いついて、あらん限りにさとりを責め立てる妄想をしてみる%CALLNAME:MASTER%
		PRINTFORMDL 途端、さとりが僅かに頬を赤らめ、体を痙攣させる
		PRINTFORMDL 腰をひくんひくんと上下に揺らす様に満足を覚えて、%CALLNAME:MASTER%はさとりから離れた
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERが起きていて、相手が起きてきた
	;添い寝時TARGET起床はこちら（TARGET衰弱or添い寝中TARGET睡魔負け後そのままMASTERが起き続けた上で相手が起床した場合限定
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;-------------------------------------------------
		;非同棲
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「ふぁ……、あ、ぬしさまだ……、んー、ちゅっ」
					PRINTFORMDL 半眼のさとりが、そのままこちらに抱きついて唇を重ねてくる
					PRINTFORMDL 一拍の間をおいて、さとりの目がしっかりと開き、そのまま舌を差し込んできた
					PRINTFORML 「ん、れろちゅる、おいひいもっと、れろちゅぱじゅる……」
					PRINTFORML 「……ん、ごちそうさま、主様。ふふ、Ｈなキスで目覚めるのって素敵」
					PRINTFORMDL その嬉しそうな笑顔に、苦笑を向けながら挨拶を返した
				ELSE
					PRINTFORML 「おはようございます、主様」
					PRINTFORMDL 含羞の紅を頬に乗せて、さとりがこちらを見つめてくる
					PRINTFORML 「その、寝顔を見られるのは、非常に恥ずかしいのですが……」
					PRINTFORMDL 寝顔は可愛いから問題ない、そんな事を考えると同時、ジト目でさとりに見つめられた
					PRINTFORML 「『は』？　まるで普段は可愛くないみたいな物言いですね」
					PRINTFORMDL 普段は綺麗な方だと、口を開いた瞬間、耳まで赤くなったさとりが視線を逸らした
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「おおお、おはよう、ごじあ、ございます」
				PRINTFORMDL なぜか慌てふためくさとりに、自然と首を傾げてしまう%CALLNAME:MASTER%
				PRINTFORML 「え、えと、その……、夢の中で%CALLNAME:MASTER%と逢っていましたので」
				PRINTFORMDL エロい夢でも見ていたのか？　そう内心で思った瞬間、枕を投げつけられた
			ENDIF
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;同棲中
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					IF !RAND:2
						PRINTFORML 「ふにゅ、ぬしさまぁ……？　うふふ、だいすきー」
						PRINTFORMDL 寝ぼけ眼のさとりがぎゅっと抱きついてくる
						PRINTFORML 「この抱き枕、さいこうです。このまま二度寝していーですか？」
						PRINTFORMDL うにうにと抱きついたまま、頭を押しつけるさとりに、ため息をつく
						PRINTFORML 「『眠姦してやる』？　Ｈされるのは嬉しーけど怒りますよ？」
						PRINTFORMDL 矛盾した返答に小首をかしげる%CALLNAME:MASTER%に、さとりが渋々身を起こした
					ELSE
						PRINTFORML 「ふぁ～、あ、ぬしさまぁ？」
						PRINTFORMDL 寝ぼけ眼のさとりが、ぎゅっと抱きしめてくる
						PRINTFORML 「うふふ、ぬしさま、だーいすき」
						PRINTFORMDL そう言いながらさとりがキスしてきた
						PRINTFORML 「……ん？　んー、あれ夢じゃないんですか？」
						PRINTFORMDL 一拍おいてちゃんと目を覚ましたさとりが、嬉しそうな笑顔を浮かべた
					ENDIF
				ELSE
					IF RAND:2
						PRINTFORML 「あふ……、あ、おはようございます、主様」
						PRINTFORMDL 嬉しげな微笑みを浮かべたさとりがゆっくりと起き上がってくる
						PRINTFORML 「ふふ、なんだか不思議ですね」
						PRINTFORMDL さとりの言葉に%CALLNAME:MASTER%は小首をかしげる
						PRINTFORML 「目覚めたときに傍にいてくれる人がいる。そんな時間を自分が持てるなんて思ってませんでしたから」
						PRINTFORMDL 常にいるとは限らない、%CALLNAME:MASTER%の言葉に、さとりはただ苦笑を浮かべている
					ELSE
						PRINTFORML 「おはようございます、主様」
						PRINTFORMDL 目線を合わせて呟くさとりに、頷きを返しそのまま抱き締める
						PRINTFORML 「ふふ、このままなさりたいのですね、私はかまいませんが」
						PRINTFORMDL それはそれで物足りないと内心で曰う%CALLNAME:MASTER%
						PRINTFORML 「中々複雑なんですね。主様らしいですが」
						PRINTFORMDL さとりが言う以上はそうなのだろうと受け入れて、%CALLNAME:MASTER%はあくびをした
					ENDIF
				ENDIF
			ELSEIF 陥落状態() == 3
				IF RAND:2
					PRINTFORML 「おはようございます……、起きたそうそう、Ｈな妄想を見せないでください」
					PRINTFORMDL そんな扇情的な格好をしているさとりが悪いと、内心で呟く%CALLNAME:MASTER%
					PRINTFORML 「単に寝やすい格好をしてるだけなんですけどね」
					PRINTFORMDL ネグリジェ越しにうっすら覗く乳首をガン見する%CALLNAME:MASTER%にさとりが苦笑を浮かべている
				ELSE
					PRINTFORML 「おはようございます。ふふ、こういうのも良いものですね」
					PRINTFORMDL どこか愉しげな様子で、さとりがこちらを見つめてくる
					PRINTFORML 「ああ、家族とは違うものが、起きたときに傍にいて安心できるのが良いという事です」
					PRINTFORMDL 小首を傾げるより早く説明されて、苦笑が浮かんだ
				ENDIF
			ENDIF
			PRINTFORMW
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;自室に帰る（定時になって寝る）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;地底以外
		IF MAIN_MAP != 9
			;さとり住み込み中かつ部屋は別（非衰弱
			IF CFLAG:神社在住 && CFLAG:MASTER:311 != CFLAG:311
				IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
					CALL DRUNKER49(30)
				ELSEIF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 「……ふぁ、そろそろ寝る時間です」
						PRINTFORMDL そう呟いたさとりがぎゅっとしがみついてくる
						PRINTFORML 「主様、一緒にいきましょ？　お互いだっこして寝ましょ？」
						PRINTFORMDL うにうにとほおずりしながら呟くさとりに、考えておくと答える%CALLNAME:MASTER%
						PRINTFORML 「ぬしさまの、いぢわる。いーです、かってに帰ります」
						PRINTFORMDL ぷーと頬を膨らませて歩き出すさとりに、可愛いと考えた瞬間、ぺしんとサードアイの触手で叩かれた
					ELSE
						PRINTFORML 「主様、私はそろそろ戻りますね」
						PRINTFORMDL すっと立ち上がったさとりが、不意に身を寄せて唇を重ねてきた
						PRINTFORML 「お休みなさいませ、主様」
						PRINTFORMDL そう言って背中を向けるさとりに、時を止めて嬲ろうかとそんなことを考える
						PRINTFORML 「ですから、時を止めるのは出来れば遠慮願いたいのですが……」
						PRINTFORMDL 欲情に瞳を濡らし振り返って呟くさとりが、溜め息を残して去っていた
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「それでは、戻るとしますね。もう少し大きな部屋が欲しいところですが」
					PRINTFORMDL 地霊殿に戻れば、十分に良い部屋があるだろうと考えた途端、さとりがにやりと笑った
					PRINTFORML 「ええ、そうですね。いっそのこと%CALLNAME:MASTER%を地霊殿に拉致しましょうか」
					;神社周辺、人里は霊夢の管轄
					IF MAIN_MAP == 0 && MAIN_MAP == 2
						PRINTFORMD 霊夢
					;命蓮寺＆道場は白蓮の管轄（神子様は来る者拒まず去る者追わず
					ELSEIF  MAIN_MAP == 1
						PRINTFORMD 白蓮
					;紅魔館は私の物、湖の周囲も私の物、と思ってそう＜おぜう
					ELSEIF  MAIN_MAP == 3
						PRINTFORMD レミリア
					;面白そうな事には首をツッコみそう（その１
					ELSEIF  MAIN_MAP == 4
						PRINTFORMD 輝夜
					;面白そうな事には首をつっこみそう（その２
					ELSEIF  MAIN_MAP == 5
						PRINTFORMD 魔理沙
					;山麓は込み入ってるので、一応中立な賢者として
					ELSEIF  MAIN_MAP == 7
						PRINTFORMD 華扇
					ENDIF
					PRINTFORMDL と敵対するのは得策ではない、その思考にさとりが苦笑を浮かべた
				ENDIF
			;さとり住み込み中かつ部屋が一緒(非衰弱
			ELSEIF CFLAG:神社在住 && CFLAG:MASTER:311 == CFLAG:311
				IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
					CALL DRUNKER49(31)
				ELSEIF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 「ぬしさまぁ、そろそろ寝たいから、一緒におへや帰りましょ？」
						PRINTFORMDL そう言って身をすり寄せてくるさとりに、まだ早いと答える%CALLNAME:MASTER%
						PRINTFORML 「むー、主様はほんと勝手です、いぢわるです」
						PRINTFORMDL ぷくぷくと頬を膨らませるさとりに、なんとなく苦笑が浮かぶ
						PRINTFORML 「それじゃ私は先に帰りますから。主様も早めに帰ってきてくださいね？」
						PRINTFORMDL ちゅっと、頬に唇を押しつけてきたさとりが、背中を向けて歩き出した
					ELSE
						PRINTFORML 「ふふ、それでは先に失礼しますね、主様」
						PRINTFORMDL 立ち上がったさとりが、そんなことを呟く
						PRINTFORML 「『一緒に戻るか』？　残念ですけど、連れ立って戻れるほど余裕はありませんので」
						PRINTFORMDL いつもと全く変わらない平静な様子に、それほど眠そうには見えないと呟く%CALLNAME:MASTER%
						PRINTFORML 「ふふ、愛しい人の前で虚勢を張るのは、別に殿方に限ったことではありませんからね」
						PRINTFORMDL そのまま背中を向けて歩いて行くさとりに、しかたがないとため息をついた
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「……ふぁ……、ん、そろそろ部屋に戻ります。%CALLNAME:MASTER%も早く切り上げてください」
					PRINTFORMDL さとりの言葉に考えておくと返しつつ、もう少し居残ろうかと考える
					PRINTFORML 「抱き枕がないと文句を言わないでくださいね？　私の方が先に起きるでしょうから」
					PRINTFORMDL 抱き枕になるつもりはあると、言外に告げるさとりに苦笑が浮かんだ
				ENDIF
			ENDIF
		;地底
		ELSE
			IF CFLAG:MASTER:311 != CFLAG:311
				IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
					CALL DRUNKER49(33)
				ELSEIF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 「ふぁ～、主様、そろそろ部屋に戻りますけど、送ってください」
						PRINTFORMDL 背中から抱きついてきたさとりが耳元で囁く
						PRINTFORML 「そのまま一緒に寝ましょ？　私、主様の抱き枕にされたいなー」
						PRINTFORMDL 猫なら喉を鳴らしそうにご機嫌なさとりに、それはまた今度と答える%CALLNAME:MASTER%
						PRINTFORML 「むー、主様のいぢめっこ……、いーです、それじゃ私は一人寂しく帰ります」
						PRINTFORMDL 背中から離れたさとりが、おそらく唇をとがらせているであろう事を想像して苦笑した
					ELSE
						PRINTFORML 「主様、それじゃ私は戻りますね」
						PRINTFORMDL そう呟いたさとりが、じっとこちらを見つめてくる
						PRINTFORML 「出来れば褥を共にしたいところですけど」
						PRINTFORMDL そんなにＨがしたいのか、そう考えた瞬間、ぺちんと額を叩かれた
						PRINTFORML 「そういう意味ではないとわかっているくせに」
						PRINTFORMDL 唇をとがらせるさとりに、軽く頭を下げた
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「さて、そろそろ寝る時間なので、帰るとしましょうか」
					PRINTFORMDL 呟いたさとりが、何か言いたげにこちらをじっと見つめてくる
					PRINTFORML 「『送って欲しいのか？』　いいえ、単に少し構って欲しいだけです」
					PRINTFORMDL 珍しいさとりのおねだりに、顔を寄せて唇を重ねた
				ELSEIF 陥落状態() == 2
					PRINTFORML 「はぁ、そろそろ時間ですね」
					PRINTFORMDL 呟いたさとりが、冷たい表情で睨んできた後、すいっと離れていく
					PRINTFORML 「さっさと地底から出ていったらどうですか」
					PRINTFORMDL ここは案外楽しい、そう返す%CALLNAME:MASTER%に、さとりが呆れた様にため息をついた
				ELSEIF 陥落状態() == 1
					PRINTFORML 「%CALLNAME:MASTER%と話すのは楽しいですが、今日はそろそろおいとましますね」
					PRINTFORMDL 呟いたさとりが、口元を手で覆って欠伸をした
				ELSE
					PRINTFORML 「…………失礼します」
					PRINTFORMDL 冷めた様子で、さとりが背中を向けた
				ENDIF
			ELSEIF CFLAG:MASTER:311 == CFLAG:311
				IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
					CALL DRUNKER49(33)
				ELSEIF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 「主様ぁ、帰りましょ？　一緒に寝ましょ？」
						PRINTFORMDL 甘ったるい声音で囁きながらさとりがじっと見つめてくる
						PRINTFORML 「『もう少しここに居る』？　むー、主様はホント勝手です」
						PRINTFORMDL 唇をとがらせたさとりが、そのまま顔を寄せてきた
						PRINTFORML 「んー、ちゅっ、れろ……、ぷはっ、おやすみのキスです。早く帰ってきてくださいね」
						PRINTFORMDL 名残惜しそうに呟いて、さとりが背中を向けて歩き出した

					ELSE
						PRINTFORML 「主様、一緒に帰りませんか？」
						PRINTFORMDL まだここにいる、と答えるより早く、さとりが口元に苦笑を浮かべる
						PRINTFORML 「はぁ、同棲している恋人と、閨に帰るよりも大事なことがあるんですか？」
						PRINTFORMDL さとりの言葉に、タダの気まぐれだと応える%CALLNAME:MASTER%
						PRINTFORML 「まったく、困った人です。空閨を紛らせても良いんですね」
						PRINTFORMDL 家族の面々なら構わない、むしろ混ざりたいと考えた%CALLNAME:MASTER%に、さとりが深々とため息をついた
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「ん、そろそろ寝る時間ですし、一緒に帰りませんか？」
					PRINTFORMDL さとりの問いかけに、もうしばらくここに居ると答える%CALLNAME:MASTER%
					PRINTFORML 「閨を共にするようになっても、気まぐれは変わりませんね」
					PRINTFORMDL くすくすと笑いながら、さとりが歩き出した
				ENDIF
			ENDIF
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;眠そうにしている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:1495 == DAY:3
			PRINTFORMDL 目をしょぼつかせたさとりが不満げにこちらを見つめている
		ELSEIF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(34)
			CFLAG:1495 = DAY:3
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「ふぁ～～あ、ぬしさまぁ？　んにゅ、ねみゅいでしゅ……」
				PRINTFORMDL 半眼をこすりながら、さとりがこちらを見つめて、ぎゅっと抱きついてくる
				PRINTFORML 「ぬしさまぁ、このまま、おねんねしましょ？　だきまくらになりましょ？」
				PRINTFORMDL そう言いながら、すりすりとほおずりを始めるさとりの頭を撫でてやる
				PRINTFORML 「ふみゅ、はやく、ねましょうよ」
				PRINTFORMDL それは後で、と答えつつ、ただ頭をなで続けた
			ELSE
				PRINTFORML 「何かご用ですか、主様？」
				PRINTFORMDL 目をしょぼつかせるさとりを、このまま嬲るのも愉しそうだ
				PRINTFORML 「……できれば、勘弁して欲しいところです」
				PRINTFORML 「ちゃんと眠らせて下さい」
				PRINTFORMDL そう言って頭を下げるさとりを、ただニヤニヤと笑いながら見つめる
				PRINTFORMDL 全身を嬲られる妄想を視ているであろうさとりが、小さく肩を震わせた
			ENDIF
			CFLAG:1495 = DAY:3
		ELSEIF 陥落状態() == 3
			PRINTFORML 「ふぁ……、妖怪でも睡眠は必要なのですが」
			PRINTFORMDL 恨みがましく見つめてくるさとりに、時止め中なら問題がないと内心で呟いてみる
			PRINTFORML 「……反応が無い肉人形がお望みなんですか？　甘い鳴き声は聞きたくないと？」
			PRINTFORMDL 声が聞けないのは確かに惜しいと考える%CALLNAME:MASTER%に、さとりが苦笑を浮かべた
			CFLAG:1495 = DAY:3
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;睡眠中（起きていないので会話というよりは寝言？）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF 陥落状態() >= 4
			SELECTCASE RAND:5
				CASE 4
					PRINTFORML 「主様ぁ……、もっ、っとぉ……」
				CASE 3
					PRINTFORML 「ふぁ……ん……ぬし、さまぁ……」
				CASE 2
					PRINTFORML 「んく……、こい、し…………どこ……」
				CASE 1
					PRINTFORML 「ふ……ん、……んぅ……」
				CASE 0
					PRINTFORML 「ん……ふぁ、……くぅ……すぅ……」
			ENDSELECT
		ELSEIF 陥落状態() == 3
			SELECTCASE RAND:3
				CASE 2
					PRINTFORML 「んく……、こい、し…………どこ……」
				CASE 1
					PRINTFORML 「ふ……ん、……んぅ……」
				CASE 0
					PRINTFORML 「ん……ふぁ、……くぅ……すぅ……」
			ENDSELECT
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;イタズラ中
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 4
		;PRINTFORMW
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;衰弱中（恋慕付き拠点内キャラがMAIN_MAPで衰弱状態になった場合か、お招き部屋で相手が衰弱した場合に発生
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML 「……もう、……むり」
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（部屋まで運ばれる）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(35)
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「主様、大丈夫、じゃないですよね？」
				PRINTFORMDL さとりの問いかけに頷きを返し、ひょいっと抱き上げられてしまう
				PRINTFORML 「うふふ、それじゃお部屋にいきましょうね」
				PRINTFORMDL 嬉しそうに笑うさとりに、冷や汗が伝う
				PRINTFORML 「あ、だいじょーぶですよ。寝てる主様にＨな事はしませんから」
				PRINTFORMDL そう言いながら、自分の唇を撫でる様子に、妙な欲情を覚えた
			ELSE
				PRINTFORML 「大丈夫ですか、主様」
				PRINTFORMDL そう声をかけてくるさとりに、大丈夫と応えられずに床に倒れる%CALLNAME:MASTER%
				PRINTFORML 「あら、大変ですね」
				PRINTFORMDL 部屋まで送って欲しいと内心で呟き、さとりがこちらの手を掴んでくることに訝る
				PRINTFORML 「私が妖怪で良かったですね。並の人間なら、途中で疲れてリタイアしてますよ」
				PRINTFORMDL さとりがそう言うと同時、%CALLNAME:MASTER%の体が僅かに浮かびあがった
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「だいじょうぶ、ではないみたいですね」
			PRINTFORMDL ぐったりと倒れ込む%CALLNAME:MASTER%を、さとりが見下ろしてくる
			PRINTFORML 「……はぁ、自分の事くらい、自分で面倒を見てはいかがですか？」
			PRINTFORMDL そう言いながらも、軽々とこちらの体を持ちあげて、さとりが歩き出した
		ENDIF
		PRINTFORMW
		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
			;MASTER私室とさとり私室が同じ
			IF CFLAG:MASTER:現在位置 == CFLAG:MASTER:311
				IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
					CALL DRUNKER49(36)
				ELSEIF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 「うふふ、主様いたんですね。一緒に寝ましょう」
						PRINTFORMDL くすくすと笑ったさとりが、あっという間に服を脱ぎ捨て、\@ CFLAG:ノーパン == 1 ? 全裸 # パンツ一枚 \@で見つめてくる
						PRINTFORML 「『乳首起ってる』？　主様に見られてるからですよ。『Ｈしたい』？　私もしたいです」
						PRINTFORMDL うっとりした表情でこちらを見つめた後、名残惜しげに半透明のネグリジェを身に纏うさとり
						PRINTFORML 「でも、今から寝るからお預けです、残念ですけど。すごく、残念ですけど」
						PRINTFORMDL 欲情に濡れた瞳を向けてきたさとりが\@ INROOM(CFLAG:MASTER:311) == 2 ? ベッド # 布団 \@に身を横たえた
					ELSE
						PRINTFORML 「主様も、一緒に寝られます？」
						PRINTFORMDL 部屋に入ってくるなり、するりと服を脱ぎ捨て\@ CFLAG:ノーパン == 1 ? 全裸 # パンツ一枚 \@になるさとり
						PRINTFORML 「『相変わらずエロい寝間着だ』？　……ふふ、そそられますか」
						PRINTFORMDL \@ CFLAG:ノーパン == 1 ? 恥丘を見せつけながら # パンツだけを穿いて \@、半透明のネグリジェをまとい見つめてくる
						PRINTFORML 「でも、今から寝るんですから、また明日にしてほしいです」
						PRINTFORMDL そう呟いて、\@ INROOM(CFLAG:MASTER:311) == 2 ? ベッド # 布団 \@に身を横たえた
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「%CALLNAME:MASTER%も部屋に戻っていたんですね。一緒に寝ましょうか？」
					PRINTFORMDL くすくすとわらいながら、見せつける様にゆっくりと服を脱いで\@ CFLAG:ノーパン == 1 ? 全裸 # パンツ一枚 \@になるさとり
					PRINTFORML 「様に、じゃなくてみせつけているんですけどね、それではお休みなさい」
					PRINTFORMDL 身につけた薄いネグリジェ越しにピンクの頂を見せつけ、さとりが横になった
				ENDIF
			;MASTER私室とさとり私室が別
			ELSE
				IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
					CALL DRUNKER49(37)
				ELSEIF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 「あ、主様？　なんで私の部屋にいるんですか？」
						PRINTFORMDL 不思議そうな表情を浮かべたさとりが、部屋に入るなり服を脱ぎ捨てていく
						PRINTFORML 「『部屋を漁っていた』？　もう、しょうがない人ですねー」
						PRINTFORMDL クスクス笑いながら、ネグリジェを身につけたさとりがぎゅっと抱きついてくる
						PRINTFORML 「主様、このまま抱き枕になってくださいね」
						PRINTFORMDL 甘えた様子でぐりぐりと頭を押しつけてくるさとりに、また今度と答え抜け出した
					ELSE
						PRINTFORML 「あら、主様。乙女の寝室で待ち構えて何をするつもりですか？」
						PRINTFORMDL くすりとわらったさとりが脱いだ服を綺麗にたたみ、\@ CFLAG:ノーパン == 1 ? 全裸 # パンツ一枚 \@でこちらを見つめてくる
						PRINTFORML 「『夜這いに来た』？　残念ですけど、私はこれから寝ますので」
						PRINTFORMDL 呼吸に合わせて震える乳房と\@ CFLAG:ノーパン == 1 ? 恥丘 # パンツ \@に生唾を飲みながらのため息をつく
						PRINTFORML 「ふふ、Ｈは目が覚めてるときに、しましょうね」
						PRINTFORMDL 嬉しそうに呟いたさとりが、ネグリジェを身にまといベッドに身を預けた
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「なにか用事ですか？　私は今から寝るところなんですが」
					PRINTFORMDL 入ってくると同時、するすると服を脱ぎ\@ CFLAG:ノーパン == 1 ? 全裸 # パンツ一枚 \@になるさとり
					PRINTFORML 「『一緒に寝るか』？　……それはかまいませんがＨなおさわりはなしで」
					PRINTFORMDL 先に釘を刺したさとりが乳首も\@ CFLAG:ノーパン == 1 ? 秘処 # パンツ \@も透けて見えるネグリジェを纏い横になった
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
				CALL DRUNKER49(38)
			ELSEIF 陥落状態() == 2
				PRINTFORML 「……さっさと出て行きなさい」
				PRINTFORMDL 部屋に戻ってくるなり冷たい表情で睨まれ、わざとそっぽを向く
				PRINTFORML 「時止めに依る玩弄でもまだ足りないと。……%CALLNAME:MASTER%の能力を触れ回ってもいいんですよ」
				PRINTFORMDL その言葉に、渋々さとりの部屋を後にする%CALLNAME:MASTER%だった
			ELSEIF 陥落状態() == 1
				PRINTFORML 「申し訳ありませんけど、出て行ってもらえませんか？」
				PRINTFORMDL さとりの寝姿が見たいと言う内心の思いに、少し頬を赤くしたさとりに、それでも無理やり部屋を追い出された
			ELSE
				PRINTFORML 「……出て行きなさい」
				PRINTFORMDL ぞっとするほど冷たい声音に、逆らう余地は見いだせずさとりの部屋を後にした
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他キャラとのＨを止めさせて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML 「……出て行きなさい」
			PRINTFORMDL ゾッとするほど冷たい声音に、慌てて衣服を整えた%CALLNAME:MASTER%達はさとりの部屋から逃げだした
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;非在住TARGETがMAIN_MAPで休憩
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		;さとりが居間（orMASTER初期位置）にて休憩中(おそらく最低合意が着かないと発生しないというかそこまで体力を減らせない筈(恋慕のみだと書いてから気づいたよorz
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(32)
		ELSEIF 陥落状態() >= 4
			PRINTFORML 「……ん、それではお言葉に甘えて、すこし休ませてもらいますね」
			PRINTFORMDL そう呟いて、さとりがしなだれかかってくる
			PRINTFORML 「ふふ、主様が地霊殿に住んでくれれば、いいのですが」
			PRINTFORMDL 考えておくと口で応え、地底を住まいとする妖怪少女達の面影を思い浮かべる
			PRINTFORML 「……あまり側女をつくると、ないちゃいますよ？」
			PRINTFORMDL 冗談めかした言い方に、さとりの本気を感じて、内心で謝った
		ELSEIF 陥落状態() == 3
			PRINTFORML 「ふふ、%CALLNAME:MASTER%がそう言ってくれるとは思いませんでした」
			PRINTFORMDL どこか楽しげに笑って、さとりがすっと身を寄せてくる
			PRINTFORML 「でも、あくまで休憩ですから、Ｈないたずらはやめてくださいね」
			PRINTFORMDL 人目が多くてできる筈がない、内心での呟きに、さとりがおかしそうに笑った
		[SKIPSTART]
		ELSEIF 陥落状態() == 2
			PRINTFORML 「自分で限界まで追い込んでおいて、いい人ぶって楽しいですか」
			PRINTFORMDL 唇をとがらせるさとりに、弱ったさとりを見るのはこの上なく楽しいと返す
			PRINTFORML 「…………この」
			PRINTFORMDL 何か言いたげに唇を震わせながら、それでも何も言わずにさとりは身を横たえた
		ELSEIF 陥落状態() == 1
			PRINTFORML 「……ふぅ、それじゃ、しばらく休ませてもらいますね。彼女にはよしなに」
			PRINTFORMDL それだけを口にして、寝転ぶさとりをしばし鑑賞した
		[SKIPEND]
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;前のターンから一緒の部屋にいる状態で相手が寝る（お招き部屋含む（
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		IF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「んにゅ……、眠いので私は寝ます」
				PRINTFORMDL ぽつりと呟いたさとりが、普段着を脱ぎ捨てネグリジェを身につける
				PRINTFORML 「主様もいっしょにねましょ？　主様抱き枕にしたいです」
				PRINTFORMDL 考えておく、そんな答えを返す%CALLNAME:MASTER%に、さとりが唇をとがらせる
				PRINTFORML 「主様のいぢわる……、いーです、一人寂しく枕を濡らしてねますから」
				PRINTFORMDL 寝てから可愛がろうかと、内心で呟く%CALLNAME:MASTER%に期待を目に浮かべてからさとりが横になった
			ELSE
				PRINTFORML 「ふぁ……、主様、私はそろそろ休みますが、主様はどうされます？」
				PRINTFORMDL 服を脱いで、ネグリジェに着替えるさとりにもう少し起きておこうかと答える%CALLNAME:MASTER%
				PRINTFORML 「……睡眠姦は、できればご遠慮していただけませんか？　私としてはあくまで、主様の事を視ていたいので」
				PRINTFORMDL さとりの言葉に、そう振られたならしないといけないかと、問い返す
				PRINTFORML 「……それじゃ今度から、私も主様が寝ているときにイタズラしましょうか」
				PRINTFORMDL くすりとわらうさとりに、それも良いかもしれないと内心で答える%CALLNAME:MASTER%だった
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「あふ……、女子の欠伸をそんな風に見つめるのはどうかと」
			PRINTFORMDL そんなコトを言いながら、目の前で服を脱ぎ捨てて着替えるさとり
			PRINTFORML 「『慎みもないのに女子か』？　ふふ、%CALLNAME:MASTER%だって嬉しいでしょうに」
			PRINTFORMDL にやにや笑うさとりの揶揄には答えず、横になるのを眺めた
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;移動時すれちがい
;==================================================
@M_KOJO_EVENT_K49_4(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;立ち止まった
	;この後遭遇口上に接続
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMD さとりが
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(40)
		ELSEIF GETBIT (CFLAG:1491,1) || GETBIT (CFLAG:1491,0)
			PRINTFORMD 何か言いたげにじっと
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORMD 満面に笑みを浮かべ
			ELSE
				PRINTFORMD 嬉しそうにほほえみ
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORMD どことなく嬉しそうに
		ELSEIF 陥落状態() == 2
			PRINTFORMD 視線に怒りを込めて
		ELSEIF 陥落状態() == 1
			PRINTFORMD 柔らかな表情で
		ELSE
			PRINTFORMD 特に興味なさそうに
		ENDIF
		PRINTFORMDL こちらを見てくる
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;軽く会釈して通り過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(41)
		ELSEIF GETBIT (CFLAG:1491,1) || GETBIT (CFLAG:1491,0)
			IF 陥落状態() >= 4
				PRINTFORML 「あ、待って下さい主様、お話しが」
				PRINTFORMDL 声をかけてくるさとりに、また後で言って%CALLNAME:MASTER%は歩いて行く
			ELSE
				PRINTFORML 「待ちなさい、話があります」
				PRINTFORMDL 冷たい目で見つめてくるさとりに、%CALLNAME:MASTER%は背中を向けた
			ENDIF
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「あ、主様。いっちゃやです」
				PRINTFORMDL 言うが早いか、さとりがぎゅっと抱きついてほおずりしてくる
				PRINTFORML 「私より大事な用事なんて、世界中探してもないでしょう？」
				PRINTFORMDL さとりの言葉に、大事な用事はないが必要な用事はある、と答える%CALLNAME:MASTER%
				PRINTFORML 「むー、主様のイヂワル」
				PRINTFORMDL 唇をとがらせるさとりの頭を優しく撫でて、束縛から逃れた
			ELSE
				PRINTFORML 「あ、主様。……残念です。私よりも目的地に行くのが大切ですか」
				PRINTFORMDL そういうときもあると応えるよりも早く、すすっとさとりが身を寄せてくる
				PRINTFORML 「本当に残念です。だから、少しだけ頂きますね」
				PRINTFORMDL 言うが早いか、唇を重ねてきた
				PRINTFORML 「……触れるだけだと物足りない？　そうさせたのは主様でしょう」
				PRINTFORMDL その呟きに、滾る物を覚えた%CALLNAME:MASTER%だが、渋々その場を後にした
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「ああ、急ぎの用事ですか、しょうがありませんね」
			PRINTFORMDL くすくすと笑いながら、さとりがスカートの端をつまんで、少しだけ引き上げた
			PRINTFORML 「ふふ、行ってらっしゃいませ。私はいつでも良いですからね」
			PRINTFORMDL ちらちらと、引き上げたスカートの裾から覗くモノに欲情を覚えた
		ELSEIF 陥落状態() == 2
			PRINTFORML 「…………ふん」
			PRINTFORMDL 不愉快そうな表情のさとりが視線を逸らす
			PRINTFORML 「何を視てるんです？　さっさと行けばどうですか？」
			PRINTFORMDL 時を止めて嬲ろうか、そう思った事を読み取られ、冷や汗をかきつつ%CALLNAME:MASTER%は歩き出した
		ELSEIF 陥落状態() == 1
			PRINTFORML 「こんにちは、気を付けて行ってらっしゃいませ」
			PRINTFORMDL 優しげに笑うさとりに、頭を下げて%CALLNAME:MASTER%は歩き出した
		ELSE
			PRINTFORML 「…………」
			PRINTFORMDL こちらが会釈しても、さとりの冷めた表情に変わりは無かった
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無視して通り過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMD さとりが
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(42)
		ELSEIF GETBIT (CFLAG:1491,1) || GETBIT (CFLAG:1491,0)
			PRINTFORMD 何か言いたげに
		ELSEIF 陥落状態() >= 4
			PRINTFORMD 悲しそうに
		ELSEIF 陥落状態() == 3
			PRINTFORMD 寂しそうに
		ELSEIF 陥落状態() == 2
			PRINTFORMD 不快そうに
		ELSEIF 陥落状態() == 1
			PRINTFORMD 柔らかな表情で
		ELSE
			PRINTFORMD 興味なさそうに
		ENDIF
		PRINTFORMDL こちらを見ている
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(50)
		ELSE
			PRINTFORML 「あら、人が来ましたね。ここまでにしておきましょうか」
			PRINTFORMDL 呟いたさとりが、すっと離れた
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;その他（キャラ指定なし
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を目撃した（馴れ合い度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(60)
		ELSEIF ARG == 38
			PRINTFORML 「……こいし、何をしてるのかしら？」
			PRINTFORMDL 目をつり上げながら睨んでくるさとりに、みればわかるよねと笑いながらこいしが答える
			PRINTFORML 「いま、すぐ、やめないと、本気で怒るわよ」
			PRINTFORMDL さとりの本気に渋々こいしが離れ、残念だと思った途端、睨みつけられた
		ELSEIF 陥落状態() == 2
			PRINTFORML 「あら、ずいぶんお盛んなことですね」
			PRINTFORMDL 冷たい瞳で見つめてくるさとりに冷や汗が浮かぶ
			PRINTFORML 「ああ、続けてもかまいませんよ？」
			PRINTFORMDL そう言われて続けられるわけもなく、%CALLNAME:MASTER%は%CALLNAME:ARG%から離れた
		ELSEIF 陥落状態() == 1
			PRINTFORML 「……はぁ、お盛んなのは結構ですが、人が来る場所でするのはどうかと思うのですが」
			PRINTFORMDL 呆れた表情のさとりに、冷や汗をかきながら、%CALLNAME:ARG%からそっと離れた
		ELSE
			PRINTFORML 「せっかくの興趣がそがれた？　こんなところでしている方がわるいのでは？」
			PRINTFORMDL 冷めた表情のさとりに、冷や汗をかきながら%CALLNAME:MASTER%は%CALLNAME:ARG%から離れた
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;負けじと参加（馴れ合い度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(61)
		ELSEIF ARG == 38
			PRINTFORML 「こいし、ほら、さっさと場所を空けて」
			PRINTFORMDL さとりの言葉に、こいしがおねえちゃんと一緒で嬉しいと笑う
			PRINTFORML 「……あんたねぇ」
			PRINTFORMDL 深々とため息をついたさとりが、それでもこいしと共に近寄ってきた
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「……主様の、バカスケベヘンタイおたんこなす！」
				PRINTFORMDL どことなく稚気を感じさせるさとりの様子に、%CALLNAME:ARG%が目を丸くする
				PRINTFORML 「ああ、側女の%CALLNAME:ARG%には関係ないことですから」
				PRINTFORMDL 冷たい流し目を%CALLNAME:ARG%に向けた後、さとりが涙を浮かべながら見つめてくる
				PRINTFORML 「私は主様のモノなのに、どうして、こんなイヂワルするんですか！　お仕置きです！」
				PRINTFORMDL 言うが早いか、さとりが強引に割り込んできた
			ELSE
				PRINTFORML 「はぁ……、恋人を放っておいて他の女としけ込むなんて正気ですか？」
				PRINTFORMDL 当然だと頷く%CALLNAME:MASTER%に、さとりがジト目で睨んでくる
				PRINTFORML 「……はぁ、私も混ざりますからね。%CALLNAME:ARG%も諦めなさい」
				PRINTFORMDL %CALLNAME:ARG%が泣きそうな目でこちらを見つめてくる
				PRINTFORML 「内心を暴露されるのが怖いですか？　ふふ、態度でわかることをわざわざ口にしませんよ」
				PRINTFORML さとりの愉悦の笑みに、%CALLNAME:MASTER%の背中につっと冷や汗が伝った
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「……ふふ、愉しそうなことをしていますね」
			PRINTFORMDL さとりの笑顔が、舌なめずりをしてるように見える
			PRINTFORML 「失礼な事を考えないで欲しいものです」
			PRINTFORMDL くすくすと笑いながら、さとりが%CALLNAME:ARG%との間に割り込んできた
		ELSEIF 陥落状態() == 1
			PRINTFORML 「あら、愉しそうな事をしていますね。混ざらせて貰いますね」
			PRINTFORMDL 嫌そうな顔を浮かべる%CALLNAME:ARG%を押しのけるようにして、さとりが入り込んできた
		ELSE
			PRINTFORML 「私にあれだけのことをしているのだから、文句はありませんね」
			PRINTFORMDL どことなく不愉快そうに呟きながら、さとりが身を寄せてきた
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;気まずそうに立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(62)
		ELSEIF ARG == 38
			PRINTFORML 「…………はぁ、ほどほどにしときなさい」
			PRINTFORMDL 眉根を押さえてため息をついたさとりにお姉ちゃんも混ざる？　と問いかけるこいし
			PRINTFORML 「あんたねぇ……、って嬉しがっても混ざりませんよ」
			PRINTFORMDL じろりとこちらを睨むさとりに、残念だと%CALLNAME:MASTER%はつぶやいた
		ELSEIF 陥落状態() == 3
			PRINTFORML 「恋人同士、仲が良くて結構ですね。はい、わかっていますよ」
			PRINTFORMDL さとりが背中を向けて、%CALLNAME:ARG%がほっとした表情を浮かべる
			PRINTFORML 「ふふ、%CALLNAME:ARG%も恥も外聞も無いおねだりを聞かれたくは無いでしょうしね」
			PRINTFORMDL 振り返らずに呟くさとりに、%CALLNAME:ARG%が顔を真っ赤にして俯いた
		ELSEIF 陥落状態() == 2
			PRINTFORML 「……ふーん、まあ、良いですけど」
			PRINTFORMDL 冷めた瞳でこちらを見つめるさとりが、それ以上は何も言わずに背中を向ける
			PRINTFORML 「肉欲を満たすのは、愉しいこと、なのでしょうね」
			PRINTFORMDL 棘のある言葉に、%CALLNAME:ARG%が不思議そうな表情を浮かべた
		ELSEIF 陥落状態() == 1
			PRINTFORML 「それでは失礼しますね。恋人同士の睦言を盗み聞きしたい所ではありますけど」
			PRINTFORMDL くすりと笑うさとりに、%CALLNAME:ARG%が冷や汗を浮かべている
		ELSE
			PRINTFORML 「恋人同士、どうぞご随意に」
			PRINTFORMDL ソレだけを口にして背中を向けるさとりに、%CALLNAME:ARG%がほっとした表情を浮かべている
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を見られた（目撃者の馴れ合い度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(70)
		ELSEIF ARG == 38
			PRINTFORML 「こいし！？　ななななんでここに？」
			PRINTFORMDL 楽しそうに笑うこいしが、おねーちゃんを見かけたからと言ってのける
			PRINTFORML 「ととと、とにかくこっち見ないで」
			PRINTFORMDL 顔を真っ赤にしてあわてて身繕いをする様を、傍らに来てなぜか腕を組んでくるこいしと眺める
			PRINTFORML 「こいしは、ソレから早く離れなさいっ！」
			PRINTFORMDL それよばわりはひどいとケラケラ笑うこいしに頷き、さとりに思い切り睨まれた
		ELSEIF 陥落状態() == 2
			PRINTFORML 「自業自得ですね」
			PRINTFORMDL 顔を真っ赤にして見つめてくる%CALLNAME:ARG%を見ながらさとりが呟く
			PRINTFORML 「どうぞ、向後は%CALLNAME:ARG%のお好きなように。逆らえる余地は%CALLNAME:MASTER%にはないのですから」
			PRINTFORMDL 服を整えながら離れるさとりに、%CALLNAME:MASTER%は胡乱げな視線を向けた
		ELSEIF 陥落状態() == 1
			PRINTFORML 「『こんなところでするな』？　正論ですが、文句なら%CALLNAME:MASTER%に言って下さい」
			PRINTFORMDL %CALLNAME:ARG%にさとりが苦笑を向けて、%CALLNAME:MASTER%から離れた
		ELSE
			PRINTFORML 「『何をして』？　情事ですよ。『こんなの酷い』？　むしろされていた方なのですが」
			PRINTFORMDL すっと身を離して身形を整えるさとりが、冷めた表情で%CALLNAME:MASTER%と%CALLNAME:ARG%を見比べている
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が負けじと参加（目撃者の馴れ合い度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(71)
		ELSEIF ARG == 38
			PRINTFORML 「こいし！？」
			IF !TALENT:恋人
				PRINTFORMDL 楽しそうに笑うこいしが目を輝かせて混ぜて欲しいと言ってくる
				PRINTFORML 「…………はぁ……、仕方ないわね。…………『姉妹丼』？　さいっていっっっ！」
				PRINTFORMDL おこっちゃダメとなだめながらこいしが口元に笑みを浮かべる
				PRINTFORML 「……全く」
				PRINTFORMDL 唇をとがらせるさとりと、唇をほころばせるこいしが、身をすり寄せてきた
			ELSE
				PRINTFORMDL 目をキラキラと輝かせたこいしが、お姉ちゃん楽しそうと笑っている
				PRINTFORML 「ええ、楽しいわよ。今日は一緒にって言うのはゆるさないからね」
				PRINTFORMDL そんなさとりの言葉に、にこにこと笑ったこいしが、お兄ちゃんお姉ちゃんをよろしくと言って去って行った
				PRINTFORML 「お兄ちゃん……って、主様と結婚しろとでも言う気かしら」
				PRINTFORMDL こいしならそう考えかねないと言う内心の呟きに、さとりが苦笑を浮かべている
			ENDIF
		ELSEIF 陥落状態() == 3 && TALENT:ARG:恋人
			PRINTFORML 「あら、本妻のご登場ですか、側妾としては一歩下がるべきですね」
			PRINTFORMDL クスリと笑って、さとりが譲った場に%CALLNAME:ARG%が割り込んでくる
			PRINTFORML 「『ハーレムは良い』？　まったく、%CALLNAME:MASTER%ももう少し情緒と言う物を」
			PRINTFORMDL さとりの小言を聞き流し、%CALLNAME:ARG%を抱き寄せた
		ELSEIF 陥落状態() == 3
			PRINTFORML 「『さとりになんて負けない』？　どうぞご随意に、私も負けるつもりはありませんが」
			PRINTFORMDL %CALLNAME:ARG%とさとりが、笑顔を浮かべながら火花を散らしている
			PRINTFORML 「『ハーレム最高』……って、本当にどうしょうも無い人ですね」
			PRINTFORMDL %CALLNAME:MASTER%の思考を口にしたさとりと%CALLNAME:ARG%が、同時に苦笑を浮かべた
		ELSEIF 陥落状態() == 1
			PRINTFORML 「『さとりのくせにずるい』ですか。ふふ、ええ、私はずるい女ですよ」
			PRINTFORMDL 愉しげに笑いながら、さとりが%CALLNAME:ARG%に場を譲った
		ELSE
			PRINTFORML 「『私の方が気持ち良くさせられる』？　そう思うならどぞご随意に」
			PRINTFORMDL 割り込んできた%CALLNAME:ARG%に素直に場を譲るさとりに、物足りなさを覚えた
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(72)
		ELSEIF ARG == 38
			PRINTFORMDL お楽しみの邪魔はしないからと言って、嬉しそうに笑いながらこいしが去って行く
			PRINTFORML 「あ、こいし…………はぁ、妹に気を遣われるなんて……」
			PRINTFORMDL 深くため息をつくさとりだが、欲情は変わらないのか、そのままするすると身を寄せてきた
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「『本物のさとり\@ ARG == 37 || ARG == 36 ? 様 #  \@』？　……失敬ですね。%CALLNAME:ARG%には関係ありません」
				PRINTFORMDL 冷め切った表情で呟いたさとりが、満面の笑みをこちらに向けてくる
				PRINTFORML 「ねえ、主様、早く続きしましょ？　ね、ね？」
				PRINTFORMDL 甘えきった表情のさとりの言葉と態度に、%CALLNAME:ARG%が額に冷や汗を浮かべて逃げ出した
				PRINTFORML 「邪魔者はいなくなったから、はやくしましょ、はやくはやく」
				PRINTFORMDL うきうきとした様子でせがんでくるさとりに、苦笑しながら%CALLNAME:MASTER%は続けることにした
			ELSE
				PRINTFORML 「『見てる方が恥ずかしい』？　ふふ、この状況では褒め言葉です、ね、主様」
				PRINTFORMDL 蕩けた笑みを浮かべて見つめてくるさとりに、自然と頷きを返す
				PRINTFORML 「『惚気るな』？　そう言われても、事実は事実ですので」
				PRINTFORMDL くすくすと笑うさとりと%CALLNAME:MASTER%を見比べて、%CALLNAME:ARG%が溜め息を吐いた
				PRINTFORML 「本当は混ざりたいんじゃ無いですか？　『そんな事は無い』？　欲情しているのに？」
				PRINTFORMDL それ以上の問いかけを遮るように、%CALLNAME:ARG%が慌てて背中を向けて逃げ出した
			ENDIF
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

;==================================================
;パンツ没収された
;==================================================
@M_KOJO_EVENT_K49_9(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(80)
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「主様主様、私のおまんことおしりとおっぱいとお口より、こんな下着の方が良いんですか？」
				PRINTFORML 「私の体よりこんな下着なんかの方が大事なんですか？」
				PRINTFORML 「『そうではない』？　じゃ、この下着はぼっしゅーです」
			ELSE
				PRINTFORML 「……はぁ、主様は本当にヘンタイですねぇ」
				PRINTFORML 「『敬虔なだけだ』？　……下着を好む神というのも、理解出来ません」
				PRINTFORML 「でも、これは没収です。まったく」
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「中身よりも下着の方が良い、というのは理解出来ませんね」
			PRINTFORML 「『何事にも別腹というのはある』？　そこで開き直るのが%CALLNAME:MASTER%らしいですね」
			PRINTFORML 「とはいえ、これは没収です、諦めてください」
		ELSEIF 陥落状態() == 2
			PRINTFORML 「やっと目に見える形で、%CALLNAME:MASTER%の弱味を得ることが出来ました」
			PRINTFORML 「諦めて貰いましょうか」
		ELSEIF 陥落状態() <= 1
			PRINTFORML 「……下着ドロって、最低ですねぇ」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;押し倒した
;==================================================
@M_KOJO_EVENT_K49_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
			IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
				CALL DRUNKER49(90)
			ELSEIF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「うふふ、主様大好き」
					PRINTFORMDL 満面に笑みを浮かべて、さとりが抱きついてきて、そのまま押し倒される
					PRINTFORML 「今からナニされるかわかってますよね？」
					PRINTFORMDL さとりの問いかけに、自分からする方がいいと答える%CALLNAME:MASTER%
					PRINTFORML 「それはわかってます、でもだめですからねー」
					PRINTFORMDL なにが嬉しいのか、笑顔のさとりが軽く唇を寄せてきた
				ELSE
					PRINTFORML 「主様、いただきますね」
					PRINTFORMDL 不意に呟いたさとりが、軽くこちらの腕を掴んで、あっけなく床に押し倒してきた
					PRINTFORML 「ふふ、うふふふ、……主様好きです」
					PRINTFORMDL 情欲を目に浮かべ、さとりがぎゅっとしがみついてきた
					PRINTFORML 「覚悟して、下さいね？」
					PRINTFORMDL 自然と、冷や汗が浮かんだ
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「%CALLNAME:MASTER%が悪いんですよ」
				PRINTFORMDL そう曰ったさとりに耐える間もなく、押し倒された
				PRINTFORML 「ソフトタッチしながらの妄想で、散々に犯されたんです。責任取って下さいね」
				PRINTFORMDL 欲情を露わにしながら、さとりが身をすり寄せてきた
			ELSEIF 陥落状態() == 2
				PRINTFORML 「……さあ、%CALLNAME:MASTER%の望み通り、犯してあげますよ」
				PRINTFORMDL そんなことを望んでいない、するのは自分の方だと内心でわめく%CALLNAME:MASTER%
				PRINTFORML 「時止めで嬲らなかったのに、望んでいないと？　私にウソはつけませんよ」
				PRINTFORMDL 抵抗する暇など全くなかった
			ELSEIF 陥落状態() == 1
				PRINTFORML 「さて、では頂くとしましょうか」
				PRINTFORMDL 口元に笑みを浮かべたさとりに、逆らう気力は出てこなかった
			ELSE
				PRINTFORML 「普段はされる方ですが、たまにはする方も良いものです」
				PRINTFORMDL 冷たい表情のさとりに、%CALLNAME:MASTER%は抵抗できない
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERに抱きついた（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
				CALL DRUNKER49(91)
			ELSEIF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「主様主様～」
					PRINTFORMDL 嬉々とした声音で、さとりがぎゅっとしがみついてくる
					PRINTFORML 「大好き、主様、大好きです」
					PRINTFORMDL そう言いながらぐりぐりと頭を押しつけてきたさとりが、サードアイの触手を絡ませてきた
					PRINTFORML 「だいすきだから、いいですよね？」
					PRINTFORMDL その言葉に、抵抗する余地が無い事は理解できた
				ELSE
					PRINTFORML 「主様、たまにはこういうのも良いでしょう？」
					PRINTFORMDL くすりと小さく笑って、さとりが腕を絡ませてくる
					PRINTFORML 「『なにが楽しい』？　ふふ、全て、ですよ」
					PRINTFORMDL そう言いつつ、目に妙な色を浮かべて、体をこすりつけてくるさとり
					PRINTFORML 「今から、楽しい事をしますしね」
					PRINTFORMDL そんなさとりの言葉に、抵抗しようという気が失せてしまった
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「あら、腰が引けてますね、%CALLNAME:MASTER%にしては珍しい」
				PRINTFORMDL にじり寄ってくるさとりの言葉に、気のせいだと応える%CALLNAME:MASTER%
				PRINTFORML 「ふふ、気のせい、ですか。ではそういうことにしておきましょう」
				PRINTFORMDL そう言いながら、抱きついてくるさとりに、逃げ出す機会を逸してしまった
			ELSEIF 陥落状態() == 2
				PRINTFORML 「動いたら許しませんよ」
				PRINTFORMDL 冷たい表情で呟いたさとりが、そのままぎゅっと抱きついてくる
				PRINTFORML 「『甘えたいのか』？　いいえ、タダの気まぐれですよ」
				PRINTFORMDL そう言いながらも、恥ずかしげにさとりが視線をそらした
			ELSE
				PRINTFORML 「そのまましばらく動かないでくださいね」
				PRINTFORMDL そう宣ったさとりが、ギュッと抱きついてきた
			ENDIF
			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
			IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
				CALL DRUNKER49(91)
			ELSEIF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「やーです、もっとしたいです」
					PRINTFORMDL ぐりぐりと頭を押しつけてくるさとりが、涙目を向けてくる
					PRINTFORML 「私のおっぱいもおまんこもおしりもおくちも、主様のものですよ」
					PRINTFORMDL 欲情に潤んだ瞳で、熱情に火照った頬で、さとりがじっと見つめてくる
					PRINTFORML 「もっときもちよくなりたいです、きもちよくなってほしいです。主様ぁ」
					PRINTFORMDL 甘い声音に滾るモノを感じつつ、それでもやっぱりだめだと%CALLNAME:MASTER%は答えた
				ELSE
					PRINTFORML 「もうおしまい、ですか？　主様は本当にそれで良いのですか？」
					PRINTFORMDL さとりの問い掛けに頷きを返す
					PRINTFORML 「やはり、されるよりもする方が良いのですね」
					PRINTFORMDL 当然だと呟くよりも早く、さとりが口の端を僅かに上げた
					PRINTFORML 「その割には、ずいぶん熱中されていたようですが」
					PRINTFORMDL くすくすと笑うさとりから視線をそらした
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「あら、もう良いんですか？　私としてはもう少し楽しみたいのですが」
				PRINTFORMDL こちらが愉しくない、そう理由を思い描いた途端、さとりが苦笑を浮かべた
				PRINTFORML 「%CALLNAME:MASTER%がそうされるように煽ったのに、ひどいですね」
				PRINTFORMDL くすくすと笑い続けるさとりに、溜め息が口をついた
			ELSEIF 陥落状態() == 2
				PRINTFORML 「されるのはいや？　自分は散々好き勝手しておいて、よく言えますね」
				PRINTFORMDL 呆れた表情で呟くさとりに、どう言い返そうかと考えを巡らせ
				PRINTFORML 「ああ、それらの言い訳が無駄な理由も、自分で考えて下さい」
				PRINTFORMDL 冷たい呟きに、返す言葉は見つからなかった
			ELSEIF 陥落状態() == 1
				PRINTFORML 「ここまでにしてほしい？　後で時止めでもするつもりですか？」
				PRINTFORMDL 少しだけ表情を変えたさとりが、それでもゆっくりと離れた
			ELSE
				PRINTFORML 「はぁ、別にかまいませんけど」
				PRINTFORMDL そう言いながら、冷めた表情でさとりが離れた
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード満足終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
				CALL DRUNKER49(91)
			ELSEIF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「はー、満足しました」
					PRINTFORMDL うっとりした表情で呟かれて、苦笑する%CALLNAME:MASTER%
					PRINTFORML 「『物足りない』？　ならＨしましょ？　すぐしましょ？」
					PRINTFORMDL すごく嬉しそうにすり寄ってくるさとりに、考えておくとだけ答える%CALLNAME:MASTER%
					PRINTFORML 「もう、主様はノリが悪いですねー、こんな美少女がお誘いしてるのに」
					PRINTFORMDL 自分で言うな、と思わずツッコみつつ、内心で確かに可愛いと考える%CALLNAME:MASTER%だった
				ELSE
					PRINTFORML 「主様、最後まで付き合ってくださって、ありがとうございます」
					PRINTFORMDL 嬉しそうに微笑むさとりに、単なる気まぐれだと答える%CALLNAME:MASTER%
					PRINTFORML 「ふふ、主様はいつもソレですね。でも、気まぐれでも嬉しいんですよ」
					PRINTFORMDL さとりの言葉に、とっさに答えが出てこない
					PRINTFORML 「『チョロい』？　ふふ、そうかもしれませんね」
					PRINTFORMDL クスクスと笑うさとりの頭を、なぜか撫でてしまう%CALLNAME:MASTER%だった
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「ごちそうさま、満足しました」
				PRINTFORMDL さとりの言葉にソレは結構と応えつつ、わざと視線をそらす
				PRINTFORML 「『してないのにエロい』？　ふふ、%CALLNAME:MASTER%の存在がそうだからですよ」
				PRINTFORMDL 楽しげなさとりに、返す言葉は見つからなかった
			ELSEIF 陥落状態() == 2
				PRINTFORML 「ふぅ、もう良いですよ」
				PRINTFORMDL そう言いながら、冷めた表情で離れるさとり
				PRINTFORML 「『顔が紅い』？　……気のせいです」
				PRINTFORMDL 視線をそらすさとりの頬が、僅かに緩んでいる
			ELSE
				PRINTFORML 「お疲れさまでした。『可愛かった』？　…………そういう風に言われると照れますね」
				PRINTFORMDL 珍しく顔を紅くしてさとりが視線をそらした
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード強制終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			FOR LOCAL:2,1,CHARANUM
				SIF LOCAL:2 == 49
					CONTINUE
				IF CFLAG:MASTER:現在位置 == CFLAG:(LOCAL:2):現在位置
					LOCAL:3 = LOCAL:2
					BREAK
				ENDIF
			NEXT
			IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
				CALL DRUNKER49(91)
			ELSEIF 陥落状態() >= 4
				IF 陥落状態() == 5 && LOCAL:3 != 36 && LOCAL:3 != 37 && LOCAL:3 != 38
					PRINTFORML 「…………なにを見ているんですか？」
					PRINTFORMDL さとりの冷め切った声に、%CALLNAME:(LOCAL:3)%が冷や汗を浮かべる
					PRINTFORML 「ぬしさま、また後でかわいがってあげますね」
					PRINTFORMDL 残念そうに呟いたさとりが、%CALLNAME:(LOCAL:3)%をじろりと睨む
					PRINTFORML 「ホント、迷惑です」
					PRINTFORMDL 珍しく攻撃的なさとりの頭を撫でて、これ以上怒りを出させないようになだめた
				ELSEIF LOCAL:3 == 36 || LOCAL:3 == 37 || LOCAL:3 == 38
					PRINTFORML 「……はぁ、まったく仕方ないわね、ほら、こっちにいらっしゃい」
					PRINTFORMDL さとりが呟くが早いか、%CALLNAME:(LOCAL:3)%がすり寄ってくる
					PRINTFORML 「『相変わらず仲が良い』？　家族ですからね」
					PRINTFORMDL どことなく楽しそうに笑い、さとりが%CALLNAME:(LOCAL:3)%の頭を撫でる
					PRINTFORML 「主様、またあとでしましょうね」
					PRINTFORMDL 苦笑しながら、%CALLNAME:MASTER%は頷きを返した
				ELSE
					PRINTFORML 「はぁ……、なんのようですか？」
					PRINTFORMDL さとりが目に険を浮かべて、%CALLNAME:(LOCAL:3)%を見つめている
					PRINTFORML 「『通りかかっただけ』ですか。それならさっさと出て行ったらどうです」
					PRINTFORMDL そんな不機嫌なさとりの様子に、%CALLNAME:(LOCAL:3)%が不思議そうに小首をかしげる
					PRINTFORML 「『そんなにイチャイチャしたいもの』？　恋人同士、ですからね」
					PRINTFORMDL さとりの答えに、%CALLNAME:(LOCAL:3)%が居心地悪そうに身じろぎしている
				ENDIF
			ELSEIF 陥落状態() == 3
				LOCALS = %CALLNAME:(LOCAL:3)%
				SIF LOCAL:3 != 36 && LOCAL:3 != 37 && LOCAL:3 != 38
					LOCALS += "さん"
				PRINTFORML 「ふぅ、%LOCALS%が来ましたし、残念ですけどここまでですね」
				PRINTFORMDL 深々とため息をついて、さとりが離れる
				PRINTFORML 「『もっとしたい』？　なら、%LOCALS%が出て行くのを待ってください」
				PRINTFORMDL さとりの言葉に、%CALLNAME:(LOCAL:3)%が苦笑を浮かべている
			ENDIF
			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
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「ぬ・し・さ・ま～～～～？　自分から好きにして良いっていったでしょ」
					PRINTFORMDL それでもさすがにキツい、そう返す%CALLNAME:MASTER%に目を爛々と輝かせてだきつくさとり
					PRINTFORML 「だーめーでーすー。今は主様は私のおもちゃなんですー」
					PRINTFORMD そういいながらすっと指を伸ばして
					IF GETBIT (TALENT:MASTER:性別,1)
						PRINTFORMDL %TINKO(MASTER)%を掴んでくる
					ELSE
						PRINTFORMDL クリトリスをなで上げてくる
					ENDIF
					PRINTFORML 「『気持ちいいのがキツい』？　うふふ、主様だって同じ事してるじゃないですか」
					PRINTFORMDL 楽しげに笑うさとりに、逃げ出せる余地はなかった
				ELSE
					PRINTFORML 「諦めてください、主様。自分からして良いと言ったのですから」
					PRINTFORMDL くすくすと嗜虐的な表情で笑うさとりに、はやまったかと思考する%CALLNAME:MASTER%
					PRINTFORML 「ええ、はやまったのですよ、主様は。そういうことで続きをしましょうか」
					PRINTFORMDL そんな言葉を口にして、身を摺り寄せてくるさとり
					PRINTFORML 「『エロくなった』？　そこはせめて淫靡とか妖艶と言って欲しいものです」
					PRINTFORMDL 口では文句を言いながら嬉しそうにさとりの手がこちらの体をなで回し始めた
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「ふふ、今更抜け出そうとしても遅いですよ？」
				PRINTFORMDL にっこりと笑うさとりに、深々とため息をつく
				PRINTFORML 「『その気が無くなった』？　残念ですね、私はやる気十分ですから」
				PRINTFORMDL そう言って抱きついてくるさとりに、観念せざるを得なかった
			ELSEIF 陥落状態() == 2
				PRINTFORML 「『好き者の変態』？　はっ、自分から好きにしろとねだっておいて」
				PRINTFORMDL とびっきり冷たい目で見下すさとりに、気まぐれだと返す%CALLNAME:MASTER%
				PRINTFORML 「気まぐれだろうがなんだろうが、%CALLNAME:MASTER%は私の気が済むまで玩弄されなさい」
				PRINTFORMDL 嗜虐の愉悦、ではなく、妙に暖かな感情を口の端に浮かべるさとりに小首を傾げた
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;欲求不満が高くて抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「やーです、もっとしましょ、主様きぜつするまでしましょ」
					PRINTFORMDL ぷくぷくと頬を膨らませたさとりがぎゅっとしがみついて離れない
					PRINTFORML 「主様のせーで、体火照ってるんですー、おまんこ切ないんですー」
					PRINTFORML 「こんなじょーたいにしたせきにん、とってくださいー」
					PRINTFORMDL 酔ったときの様な物言いに、可愛いやつと内心で呟き、
					PRINTFORMDL 顔を真っ赤にしたさとりにもう一度押し倒された
				ELSE
					PRINTFORML 「だめですよ、主様」
					PRINTFORMDL くっと肩を押さえられただけで、%CALLNAME:MASTER%は動けなくなる
					PRINTFORML 「主様が、私をここまで火照らせたんですから」
					PRINTFORMDL そう言って、艶然と微笑むさとり
					PRINTFORML 「『色情狂』？　ふふ、そうさせたのは主様ですよ」
					PRINTFORMDL そう嘯くさとりがのしかかってきた
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「……まだ、私は満足していませんから」
				PRINTFORMDL 抜け出そうと考えた瞬間、%CALLNAME:MASTER%の体にサードアイの触手が絡んだ
				PRINTFORML 「『そんなにしたいのか』？　ええ、したいですよ」
				PRINTFORMDL 赤裸々なさとりの返答に、苦笑しながら身を委ねた
			ELSEIF 陥落状態() == 2
				PRINTFORML 「『色情魔』？　……黙りなさい下劣魯鈍な愚蒙」
				PRINTFORMDL 痛烈な罵詈雑言に、わざとらしく口元を歪めて嘲りを見せる
				PRINTFORML 「『恥ずかしくないのか』？　……%CALLNAME:MASTER%に言われる筋合いはないでしょう」
				PRINTFORMDL にやにやと笑いながら、無碍にさとりを押しのけはしなかった
			ELSEIF 陥落状態() == 1
				PRINTFORML 「『解放して欲しい』？　別に良いでしょう、いつもは%CALLNAME:MASTER%がしたいようにしているのですし」
				PRINTFORMDL 時止めのイタズラに言及されて、ため息をつきながら体の力を抜いた
			ELSE
				PRINTFORML 「まだ、逃がしませんよ」
				PRINTFORMDL 淡々と呟きながらも頬を紅潮させるさとりに、ため息をついた
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(100)
		ELSEIF 陥落状態() == 2
			PRINTFORML 「……さっさと出て行きなさい」
			PRINTFORMDL さとりの言葉を無視して、じろじろと上から下まで嬲るように眺める
			PRINTFORML 「…………死にたいんですか？」
			PRINTFORMDL その声に、本気の気配を感じて、渋々%CALLNAME:MASTER%は、脱衣所に戻った
		ELSEIF 陥落状態() == 1
			PRINTFORML 「流石に一緒に入るのは遠慮して欲しいのですが」
			PRINTFORMDL さとりの言葉に溜め息を漏らして、%CALLNAME:MASTER%はここから離れた
		ELSE
			PRINTFORML 「出て行ってくれませんか？」
			PRINTFORMDL 裸身を隠そうともしないさとりの言葉に、渋々その場を後にした
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目が合った（追い出されない）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(101)
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「あ、主様。うふふ、一緒にはいりましょ？　ほら、はやくはやく」
				PRINTFORMDL 手招きするさとりの側に近寄る%CALLNAME:MASTER%
				PRINTFORML 「『相変わらず裸身は綺麗』？　裸身だけじゃないですよ」
				PRINTFORMDL 心を読んださとりが、こちらに背を向けて突きだした尻と股間を手で広げる
				PRINTFORML 「ここも、ここも、きちんと綺麗にしてますから」
				PRINTFORMDL ひくひくとかすかに動く膣口とアヌスに、生唾を飲み込んだ
			ELSE
				PRINTFORML 「『相変わらず、裸身は綺麗』ですか。主様に言われるのは嬉しいですが」
				PRINTFORMDL そう言いながら手招きするさとりの側に近寄る%CALLNAME:MASTER%
				PRINTFORML 「『は』？　『裸身、は』？　ソレ以外には問題があるような思い方ですね」
				PRINTFORMDL 皮肉屋な所だとか、一度欲情したらこちらが枯れるか体力が尽きるまでしたがる所とか
				PRINTFORMDL そう内心で呟いた瞬間、ぎゅっと抱き付かれた
				PRINTFORML 「皮肉屋はともかく、そうさせているのは主様です」
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「『これでもう少し……』……最近は、思いを隠すのが上手くなりましたね」
			PRINTFORMDL さとりの側に居れば流石に慣れる、と苦笑を浮かべる%CALLNAME:MASTER%
			PRINTFORML 「思いを隠したところで、私の胸を凝視しているのですから、言いたいことは解りますが」
			PRINTFORMDL ジト目で睨んでくるさとりに、冷や汗が浮いた
		ELSEIF 陥落状態() == 2
			PRINTFORML 「……さっさと出て行って欲しいのですが？」
			PRINTFORMDL そう言いながらも、積極的に排除に出ないさとり
			PRINTFORML 「面倒くさくなっただけです」
			PRINTFORMDL 素っ気なく言って、湯船に身を沈めた
		ELSEIF 陥落状態() == 1
			PRINTFORML 「まあ、ご随意に。……『Ｈなサービス』？　……変態、ですねぇ」
			PRINTFORMDL さとりが深々と溜め息を吐いた
		ELSE
			PRINTFORML 「……はぁ、どうぞご勝手に」
			PRINTFORMDL ちらりと視線を向けてきたさとりが、視線を逸らしながら溜め息を吐いた
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出される（怒り）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(110)
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「…………ぬしさまなんてきらいです！」
				PRINTFORMDL ぽろぽろと涙をこぼすさとりに詰られ、思わず動きを止める
				PRINTFORML 「なんで、こんな風にしないといけないんですか、そんなに私を怒らせるのが楽しいんですか」
				PRINTFORMDL とても怒ってるようには見えないさとりの姿に、なぜか胸の奥がちりちり痛む
				PRINTFORML 「主様なんて、大嫌い、です」
				PRINTFORMDL 悲しげな表情のさとりに、%CALLNAME:MASTER%は背中を向けて逃げ出した
			ELSE
				PRINTFORML 「主様？」
				PRINTFORMDL 思い切り唇をへの字にしたさとりが、じろりとこちらを睨んでくる
				PRINTFORML 「よく顔を出せた物ですね？」
				PRINTFORMDL その不機嫌な表情に、冷や汗が浮かぶ
				PRINTFORML 「さっさと出て行ってください」
				PRINTFORMDL 反駁を許さないその態度に、冷や汗をかきつつ逃げ出す%CALLNAME:MASTER%だった
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「……はぁ、もう許されたとでも思っているんですか？」
			PRINTFORMDL 不愉快そうな表情でさとりがじろりと睨んでくる
			PRINTFORML 「お相手するつもりはありません」
			PRINTFORMDL けんもほろろなその態度に、%CALLNAME:MASTER%は渋々背中を向けた
		ELSEIF 陥落状態() == 2
			PRINTFORML 「消えなさいっっ！！」
			PRINTFORMDL いきなりサードアイの触手で横っ面を叩かれた
			PRINTFORML 「この、このっっっっ！！」
			PRINTFORMDL さらに容赦なく触手を鞭の様に叩きつけてくるさとりに、慌てて逃げ出した
		ELSEIF 陥落状態() == 1
			PRINTFORML 「……優しくなんて、できませんよ？」
			PRINTFORMDL にっこりと笑うさとりの恐ろしいまでの迫力に、%CALLNAME:MASTER%は慌てて逃げ出した
		ELSE
			PRINTFORML 「消えなさい」
			PRINTFORMDL まったくとりつく島もない態度に、ほうほうの体で%CALLNAME:MASTER%は逃げ出した
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(111)
		ELSEIF 陥落状態() == 2
			PRINTFORML 「くー……すー…………だめ……です…………この……へんたい」
			PRINTFORMDL 愛くるしい笑みの浮かぶ寝顔に、けれど、寝言で自分を差していることに疑問が浮かぶ
			PRINTFORML 「すーすー……ふふ、……んぅ…………ばか…………」
			PRINTFORMDL その嬉しそうな寝顔と、普段のつんけんした態度のギャップに、心臓が妙な音を立てた
		ELSEIF 陥落状態() == 1
			PRINTFORML 「ん…………すー……」
			PRINTFORMDL 穏やかな寝息を立てるさとりをしばし鑑賞した
		ELSE
			PRINTFORML 「……ん…………」
			PRINTFORMDL 妙に寝苦しそうなさとりに、妙な違和感を覚えた
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(112)
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「あー、ぬしさまだー」
				PRINTFORMDL 寝ぼけ眼のさとりが、ぎゅっと抱きしめてきた
				PRINTFORML 「んふふ、だきまくらーだきまくらー」
				PRINTFORMDL そのままぐりぐりと全身を押しつけてくるさとりに、欲情が湧いてくる
				PRINTFORML 「きゃー、ぬしさまにおかされるー」
				PRINTFORMDL ケラケラと楽しげに笑うさとりに、ただ苦笑を返した
			ELSE
				PRINTFORML 「……主様、私は眠いのですが……」
				PRINTFORMDL 目をしょぼつかせて、さとりがこちらを見つめてくる
				PRINTFORML 「……ねぼ、かわ？　……すいません、まだ”目”がちゃんと開いてなくて」
				PRINTFORMDL 寝ぼけてる最中は色々出来そうだと思った瞬間、さとりが半眼で睨んできた
				PRINTFORML 「聞き取り、にくい、だけで、聞こえてはいるんですが」
				PRINTFORMDL とりあえず、笑ってごまかす%CALLNAME:MASTER%だった
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「……ふぁ、何かご用、ですか」
			PRINTFORMDL 眠たげなさとりの言葉に、なんとなくと応える%CALLNAME:MASTER%
			PRINTFORML 「眠ってる最中のイタズラは、ご遠慮いただきたいのですが」
			PRINTFORMDL 胡乱げな表情に、軽く頭を下げた
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕・衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(113)
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「……ぬしさまぁ？」
				PRINTFORMDL ぼーっとした表情で、ゆらりと立ち上がったさとりが抱きついてくる
				PRINTFORML 「おやすみなさいー……」
				PRINTFORMDL そのまま、寝息を立て始めるさとりに、苦笑しながら布団へ横たえてやった
			ELSE
				PRINTFORML 「主様……？　おやすみ、なさい……」
				PRINTFORMDL ソレだけを呟いて、布団に身を預けるさとり
				PRINTFORML 「……くー……」
				PRINTFORMDL 暫く眠っているさとりを見つめた
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「……ん……、おやすみ、なさ、い」
			PRINTFORMDL すこしだけ顔を上げたさとりが、すぐに枕に頭を預けて眠りについた
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(114)
		ELSEIF 陥落状態() == 2
			PRINTFORML 「……このヘンタイスケベさっさと出て行きなさいっっ！！」
			PRINTFORMDL そんなエロい寝間着を着てて何を言う、その内心の呟きに、さとりの顔がトマトの様に赤くなる
			PRINTFORML 「うるさいうるさいうるさいうるさいっっっっっ！！！！」
			PRINTFORMDL 命の危険を感じる勢いで、サードアイの触手を振るうさとりに、慌てて%CALLNAME:MASTER%は逃げ出した
		ELSEIF 陥落状態() == 1
			PRINTFORML 「さすがに寝床を一緒にするつもりはありませんので」
			PRINTFORMDL 柔らかな笑みを浮かべつつ、それでも毅然とした態度に、%CALLNAME:MASTER%は部屋から出た
		ELSE
			PRINTFORML 「……出て行ってください」
			PRINTFORMDL サードアイの触手をこちらののどに絡めてくるさとりに、冷や汗をかきつつ部屋から出た
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される（衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 5
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(115)
		ELSEIF 陥落状態() == 2
			PRINTFORML 「…………この」
			PRINTFORMDL ふらふらと立ち上がったさとりが、サードアイの触手でこちらを縛り上げた
			PRINTFORML 「……じゃま、です」
			PRINTFORMDL 抵抗することも出来ず、そのまま部屋から放り出された
		ELSEIF 陥落状態() == 1
			PRINTFORML 「……ん……、いいかげん、怒りますよ？」
			PRINTFORMDL 半眼で睨まれて、思わず背中を向けて逃げ出してしまった
		ELSE
			PRINTFORML 「は、ふ……、じゃまです」
			PRINTFORMDL サードアイの触手を幾本かまとめて、問答無用で殴りかかってくるさとりに、慌てて逃げ出した
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;お仕事中
;==================================================
@M_KOJO_EVENT_K49_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_K49_14(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(120)
		ELSEIF 陥落状態() >= 4
			SIF DISH_DRG
				PRINTFORMDL さとりが苦笑を浮かべながら、%DISHNAME%と%CALLNAME:MASTER%を見比べている
			IF 陥落状態() == 5
				PRINTFORML 「主様の料理、美味しいから好きですよ」
				PRINTFORMDL 最初から食べるのが当然と思っているさとりの言葉に、苦笑が浮かぶ
				PRINTFORML 「『食いしんぼ』？　むー、主様の手料理が美味しいのがいけないんです」
				PRINTFORMDL そう言いながらすり寄ってくるさとりに、%DISHNAME%を差し出す%CALLNAME:MASTER%
				PRINTFORML 「うふふ、主様、大好きです。いただきます」
				PRINTFORMDL ちゅっと唇にキスをしてきたさとりが、%DISHNAME%を口に運んだ
			ELSE
				PRINTFORML 「ん、何かいい匂いが……、主様、何か持っていますか？」
				PRINTFORMDL そう問い掛けながらも、じっとこちらを凝視しているさとりに苦笑が浮かぶ
				PRINTFORML 「『何も持ってないと言ったらどうするんだろう』？　それならそれでかまいませんよ」
				PRINTFORMDL そう言いながらも視線が動かないさとりに、%DISHNAME%を差し出した
				PRINTFORML 「頂きます、ん、美味しいです」
				PRINTFORMDL 笑顔のさとりに、最後まで苦笑が途切れることは無かった
			ENDIF
		ELSEIF 陥落状態() == 3
			SIF DISH_DRG
				PRINTFORMDL さとりが苦笑を浮かべながら、%DISHNAME%と%CALLNAME:MASTER%を見比べている
			PRINTFORML 「あら、美味しそうですね。頂きます」
			PRINTFORMDL %DISHNAME%を奪われ、そのまま食べられてしまう
			PRINTFORML 「『あとでゆっくり食べるつもりだった』？　運がわるかったと諦めて下さい」
			PRINTFORMDL 愉しそうに笑うさとりに、まあ良いかと思う%CALLNAME:MASTER%だった
		ELSE
			IF DISH_DRG
				DISH_DRG = 0
				PRINTFORMDL 手にした%DISHNAME%に懐から取り出した、妙な液体を掛けるさとり
				PRINTFORML 「食べ物に薬を混ぜるとか、最低ですね」
				PRINTFORMDL 冷たい表情でこちらを睨んでから、さとりが手にした%DISHNAME%を口にする
				PRINTFORML 「味気ないですが、薬を呑まされるよりはマシです」
			ELSEIF 陥落状態() == 2
				PRINTFORML 「……貰ってあげます。ありがたく思いなさい」
				PRINTFORMDL %DISHNAME%を奪われ、内心で舌打ちする%CALLNAME:MASTER%
				PRINTFORML 「お燐やおくうやこいしを餌付けしようなんて、無駄ですよ」
				PRINTFORMDL 十分に効果はある、そう考える%CALLNAME:MASTER%に、さとりがジト目を向けてきた
			ELSEIF 陥落状態() == 1
				PRINTFORML 「頂いてもよろしいですね」
				PRINTFORMDL ダメだと言うよりも早く%DISHNAME%を奪われ、苦笑した
			ELSE
				PRINTFORML 「……気まぐれ、ですから」
				PRINTFORMDL ぽつりと呟いたさとりに、%DISHNAME%を奪われた
			ENDIF
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;逢瀬終了（ウフフ終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF GETBIT(CFLAG:1491,0)
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「……ヒドいです、主様ひどいです……」
					PRINTFORML 「わた、し、わたしおもちゃなんですか？」
					PRINTFORML 「主様、ひどい、です、ぐすっ、ひくっ……」
				ELSE
					PRINTFORML 「ひどいひとです、主様は」
					PRINTFORML 「はぁ……、んっ、主様のバカ、ばかぁ」
					PRINTFORML 「愛し合いたいのに……、一方的だなんて……」
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「はぁ……、時止めでして楽しいのでしょうかね」
				PRINTFORML 「ちゃんと睦み合いたいです」
			ELSEIF 陥落状態() == 2
				PRINTFORML 「最っっ低」
			ELSEIF 陥落状態() == 1
				PRINTFORML 「ヒドい人」
			ELSE
				PRINTFORML 「……卑怯者」
			ENDIF
		ELSEIF CFLAG:TARGET:睡眠
			IF 陥落状態() >= 4 && 陥落状態() == 5
				PRINTFORML 「……んにゅ……、ぬし……さ…………もっとぉ…………」
			ELSE
				PRINTFORML 「ん……すー……や……め…………くー……」
			ENDIF
		ELSEIF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(130)
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「……やーです、もっとシテほしいです」
				PRINTFORMDL 離れようとした%CALLNAME:MASTER%に、さとりがぎゅっとしがみついてくる
				PRINTFORML 「わたしのおまんこ気持ちよくないですか？　おっぱいもおしりもおくちも、だめですか？」
				PRINTFORMDL 涙目のさとりに、最高だと内心で答える%CALLNAME:MASTER%
				PRINTFORML 「じゃ、最後までしましょ？　わたしが気絶するか、主様が気絶するまできもちよくなりましょ？」
				PRINTFORMDL 今日はそういう気分じゃない、そう答える%CALLNAME:MASTER%に、さとりが泣き出しそうな表情を浮かべた
			ELSE
				PRINTFORML 「……もう終わり、ですか」
				PRINTFORMDL 潤んだ瞳でさとりがじっと見つめてくる
				PRINTFORML 「『他にもしたい』？　まあ、側女に手を出すなとは言えませんが」
				PRINTFORMDL 呟いたさとりが、ふれるだけの口づけを交わしてきた
				PRINTFORML 「ですが、一番は私で居て下さいね」
				PRINTFORMDL 意外に嫉妬深いさとりの言葉に苦笑が浮かんだ
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「ん、おつかれさまです。ふふ」
			PRINTFORMDL 嬉しげに笑ったさとりがしなだれかかってきた
			PRINTFORML 「出来れば最後までお相手して欲しいところですが」
			PRINTFORMDL 疲れるから嫌だ、そう思いながらさとりから離れた
		ELSEIF 陥落状態() == 2
			PRINTFORML 「……ふぅ、これで終わりですね」
			PRINTFORMDL 僅かにほっとした表情を浮かべるさとりに、口元が緩む
			PRINTFORML 「『所詮女か』……、いいえ、こんなものどうでもいいことです」
			PRINTFORMDL 見た目は淡々と、それでも雰囲気に怯えを滲ませたさとりを、嬲るように見つめた
		ELSE
			PRINTFORML 「はい、おつかれさま。機会があれば次もよろしくお願いしますね」
			PRINTFORMDL ソレだけを口にして、さとりが離れた
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
	;-------------------------------------------------
	;事後描写
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;精液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF CFLAG:TARGET:睡眠
				IF 陥落状態() >= 4 && 陥落状態() == 5
					PRINTFORML 「……んにゅ……、もれ……」
				ELSE
					PRINTFORML 「んぅ……？　……んみゅ……」
				ENDIF
			ELSEIF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
				CALL DRUNKER49(131)
			ELSEIF 陥落状態() >= 4
				IF CFLAG:ノーパン || (CFLAG:205 == 0 && CFLAG:206 == 0)
					IF 陥落状態() == 5
						IF SOAKED_OR_NOT("V_SEMINAL")
							PRINTFORML 「主様の精液、勿体ない」
							PRINTFORMDL 呟きながらぬぐい取った精液を指ですくいあげ、そのまま口に含むさとり
							PRINTFORML 「んぅ、ふふ、嬉しい」
							PRINTFORMDL そう言いながらちゅぱれろと自分の指を舐め始める
							PRINTFORML 「『まだ足りないのか』？　そーですー、主様ともっとしたいですー」
							PRINTFORMDL 唇を尖らせながら、またすくい上げた精液を舐めるさとりに苦笑する
						ELSE
							PRINTFORML 「うー、これ見られるのは凄くはずかしーです」
							PRINTFORMDL ぽたりぽたりと、尻穴から精液を垂れ流すさとりが、わざわざ振り向いて両手で尻たぶを割り開く
							PRINTFORML 「『恥ずかしいんだろう』？　ええ、恥ずかしーですけど、主様に見て欲しいです」
							PRINTFORMDL そんなさとりの言葉に、苦笑しながら近づいて、菊座ににゅるんと中指を突き入れた
							PRINTFORML 「ひぁんっ！　んきゅっ、ね、主様、もっとぬぽぬぽしてぇ」
							PRINTFORMDL さとりのおねだりにしばし、アナルの締め付けを指で楽しんだ
						ENDIF
					ELSE
						IF SOAKED_OR_NOT("V_SEMINAL")
							PRINTFORML 「……ほんとうに、主様はよく出しますね」
							PRINTFORMDL また秘処からこぼれだしてきた精液を手で受け止めたさとりが、口元に持って行きれろっと舐め取る
							PRINTFORML 「ん、Ｈな味です。れろ……、『ヘンタイ』？　ふふ、主様が私をそうしたんですよ」
							PRINTFORMDL くすくすと楽しげに笑いながら、不意に精液のついた手を差し出してくる
							PRINTFORML 「主様もいかがです？　主様の精子が踊り狂ってる濃い子種ですよ」
							PRINTFORMDL さとりの体液ならともかく、自身のソレは遠慮すると答える%CALLNAME:MASTER%にさとりが笑みを向けてくる
						ELSE
							PRINTFORML 「……はぁ、さすがにこれは恥ずかしいです」
							PRINTFORMDL 尻の谷間から伝い落ちるザーメンを見るためにわざわざ背後に回る%CALLNAME:MASTER%
							PRINTFORML 「恥ずかしいと言っているのですが……」
							PRINTFORMDL そう言いながらも、こちらが手をのばして尻たぶを開いてもさとりは抵抗しない
							PRINTFORML 「『見られて嬉しいくせに』？　嬉しいのと恥ずかしいのは別問題です」
							PRINTFORMDL そう言いながらきゅっと菊座をすぼめるさとりに、欲情を覚えた%CALLNAME:MASTER%は尻穴に指を突き入れた
						ENDIF
					ENDIF
				ELSE
					IF 陥落状態() == 5
						PRINTFORML 「……うー、ぱんつがぐちゅぐちゅで気持ち悪いです」
						PRINTFORMDL さとりが股間を気にしながらじとっとした目で睨んでくる
						IF PANTIES_TRANSPARENCY(TARGET)
							PRINTFORML 「オマンコが丸見えになるくらい濡れてるのは、主様のせーですからね」
						ELSE
							PRINTFORML 「おまんこがぬちゅくちゅして気持ち悪いです」
						ENDIF
						PRINTFORMDL そう言って唇を尖らせながら、さとりが不機嫌そうに唇を尖らせる
						PRINTFORML 「ねぇ主様、こんなことするくらいなら、気絶するまでＨしてパンツ盗んでいって欲しいです」
						PRINTFORMDL 続きを懇願するさとりに苦笑が浮かんだ
					ELSE
						PRINTFORML 「主様……、これならいっそのこと、パンツをはいてない方がマシなのですが」
						PRINTFORMDL そういいながら、しとどに濡れて\@ PANTIES_TRANSPARENCY(TARGET) ? 秘処が丸見えの # 股布に染みが浮く \@%PANTSNAME(EQUIP:TARGET:下半身下着２, TARGET)%を見せつけてくるさとり
						PRINTFORML 「『エロい』？　そうさせたのは主様でしょう」
						PRINTFORMDL 唇を尖らせるさとりだが、ゆるゆると淫らに腰を揺らし始める
						PRINTFORML 「私はまだしたいんですけどね」
						PRINTFORMDL はしたないおねだりに、考えておくと答える%CALLNAME:MASTER%
					ENDIF
				ENDIF
			ELSEIF 陥落状態() == 3
				IF CFLAG:ノーパン || (CFLAG:205 == 0 && CFLAG:206 == 0)
					IF SOAKED_OR_NOT("V_SEMINAL")
						PRINTFORML 「……本当に絶倫ですねぇ」
						PRINTFORMDL 呆れた表情でまだこぽりと垂れ落ちる精液を指に絡めるさとり
						PRINTFORML 「ちゅぱ……れろ……、ふふ、どちらかが気絶するまでこのまましませんか？」
						PRINTFORMDL さとりのおねだりに気が向いたらと答える%CALLNAME:MASTER%だった
					ELSE
						PRINTFORML 「……はぁ、見ないでください」
						PRINTFORMDL わざわざさとりの後ろに回って、しゃがみ込む%CALLNAME:MASTER%にさとりが唇を尖らせる
						PRINTFORML 「ひぁんっ！　や、ちょ、いまはさわらな、んくぅっ」
						PRINTFORMDL 尻の谷間をなであげ、菊座に指を差し込んだ
					ENDIF
				ELSE
					PRINTFORML 「はぁ……、さすがに恥ずかしいです」
					PRINTFORMDL 精液と愛蜜の混合液で\@ PANTIES_TRANSPARENCY(TARGET) ? 濡れ透ける # じっとりと湿った \@パンツを見せつけてくるさとり
					PRINTFORML 「『恥ずかしいだけか』？　…………違う、って言っても続きはしてくれないんでしょう？」
					PRINTFORMDL 僅かに頬を膨らませるさとりに、後で考えると%CALLNAME:MASTER%は答えた
				ENDIF
			;思慕レベル以下で、中だし（生解禁）可能になるものかな？
			ELSEIF 陥落状態() == 2
				PRINTFORML 「……あー、気持ち悪い」
				PRINTFORMD 不愉快そうに呟くさとりの
				IF CFLAG:ノーパン || (CFLAG:205 == 0 && CFLAG:206 == 0)
					PRINTFORMDL 剥き出しの秘処から精液がこぼれ落ちる
				ELSE
					PRINTFORMDL %PANTSNAME(EQUIP:TARGET:下半身下着２, TARGET)%がじっとりと湿っている
				ENDIF
				PRINTFORML 「『良い見物だ』？　……ふざけるのも大概にしてください」
				PRINTFORMDL 不機嫌そうな様子で呟きながら、己が下腹部を優しく撫でるさとりに欲情を覚えた
			ELSE
				PRINTFORML 「……ふぅ、本当に、よく出せるものですねぇ」
				PRINTFORMDL 呆れきった呟きに、さとりの体が気持ち良すぎるからだと%CALLNAME:MASTER%は答えた
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;愛液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			IF CFLAG:TARGET:睡眠
				IF 陥落状態() >= 4 && 陥落状態() == 5
					PRINTFORML 「ぬし……、さまぁ……、もっ……とぉ」
				ELSE
					PRINTFORML 「ふー……ふー……んぅ……」
				ENDIF
			ELSEIF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
				CALL DRUNKER49(131)
			ELSEIF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「はぁはぁ、ん、主様のばかぁ、もっとしてほしーです」
					PRINTFORMD 唇を尖らせて見つめてくるさとりの
					IF CFLAG:ノーパン || (CFLAG:205 == 0 && CFLAG:206 == 0)
						PRINTFORMDL 剥き出しの秘処から愛蜜がとろとろとこぼれ落ちる
					ELSE
						PRINTFORMD %PANTSNAME(EQUIP:TARGET:下半身下着２, TARGET)%
						IF PANTIES_TRANSPARENCY(TARGET)
							PRINTFORMDL は濡れ透けて秘処を露わにしている
						ELSE
							PRINTFORMDL の股布がじっとりと色ずんでいる
						ENDIF
					ENDIF
					PRINTFORML 「主様がせーし出してくれないせーですからね」
					PRINTFORMDL ぷくぷくと頬を膨らませて睨んでくるさとり
					PRINTFORML 「『可愛い奴』？　そんなのでごまかされないですー。ねえ主様しましょ？　もっとＨしましょ？」
					PRINTFORMDL そう言いながら\@ CFLAG:ノーパン || (CFLAG:205 == 0 && CFLAG:206 == 0) ? 秘処 # %PANTSNAME(EQUIP:TARGET:下半身下着２, TARGET)% \@をさとりが見せつけてきた
				ELSE
					PRINTFORML 「ふー、ふー……主様、ぬしさまぁ……」
					PRINTFORMDL 涙目でもっとしたいと訴えてくるさとり
					IF CFLAG:ノーパン || (CFLAG:205 == 0 && CFLAG:206 == 0)
						PRINTFORMDL 太ももをたらたらと伝い落ちる、下の口からの涎をしばし眺める
					ELSE
						IF PANTIES_TRANSPARENCY(TARGET)
							PRINTFORMDL 愛蜜に濡れて透ける秘処を無言で見つめる%CALLNAME:MASTER%
						ELSE
							PRINTFORMDL じっとりと濡れて染みが浮かぶ%PANTSNAME(EQUIP:TARGET:下半身下着２, TARGET)%を見て愉悦の笑みを漏らす
						ENDIF
					ENDIF
					PRINTFORML 「主様の、ばか……、いぢわるです」
					IF GETBIT(TALENT:MASTER:性別,1)
						PRINTFORML 「主様の堅くて長くて太いおちんちんでオマンコの奥の奥までしてほしいです」
					ELSE
						PRINTFORML 「主様の指でもおもちゃでも良いですから、おまんこ掻き回してほしいです」
					ENDIF
					PRINTFORMDL さとりの懇願を、素知らぬ顔で聞き流した
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「できれば、もうすこしきちんと可愛がって欲しかったですね」
				PRINTFORMDL すこしだけ恨みがましい視線を向けてくるさとり
				PRINTFORML 「『十分可愛がった』？　……出来ればきちんと注ぎ込んで欲しかったです」
				PRINTFORMDL そんな事を呟くさとりに、苦笑が浮かんだ
			ELSEIF 陥落状態() == 2
				PRINTFORML 「鼻の下を伸ばして、こちらを見ないでください」
				PRINTFORMD 不機嫌そうなさとりの
				IF CFLAG:ノーパン || (CFLAG:205 == 0 && CFLAG:206 == 0)
					PRINTFORMD つっと、愛蜜を垂れ流す秘処
				ELSE
					IF PANTIES_TRANSPARENCY(TARGET)
						PRINTFORMD 下の涎で塗れ透けの
					ELSE
						PRINTFORMD 愛液がぐっちょりと染みこんだ
					ENDIF
					PRINTFORMD %PANTSNAME(EQUIP:TARGET:下半身下着２, TARGET)%
				ENDIF
				PRINTFORMDL を眺める
				PRINTFORML 「『良い光景』？　不愉快です」
				PRINTFORMDL そう言いながら、どこかほっとした表情を浮かべるさとりを眺めて%CALLNAME:MASTER%は笑った
			ELSE
				PRINTFORML 「あまり見ないでください。……『エロい』？　そうさせといて」
				PRINTFORMDL 呆れた表情で呟くさとりだが、その頬は欲情を伝えてくる
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;事後のムード
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「主様、次はいつしてくれるんですか？」
					PRINTFORML 「おまんこもしりあなもなまちちもおまめも主様にしてほしいです」
					PRINTFORML 「『考えておく』……むー、本当にいぢわるです」
				ELSE
					PRINTFORML 「主様はまだ物足りなさそうですね」
					PRINTFORML 「『そんなことはない』？　はい、そういうことにしておきますね」
					PRINTFORML 「主様、私の主様、どうか他の女に心まで向けないでくださいね」
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「%CALLNAME:MASTER%の事を好きになってしまった自分がすこしイヤになります」
				PRINTFORML 「『どうして』？　もっとＨな事がしたいと思ってしまう浅ましさがイヤなだけですよ」
			ELSEIF 陥落状態() == 2
				PRINTFORML 「……これでゆっくり休めます。%CALLNAME:MASTER%につけられた穢れを早く落とさないと」
			ELSEIF 陥落状態() == 1
				PRINTFORML 「……お疲れさまです」
			ELSE
				PRINTFORML 「…………はぁ……」
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;服を着る
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「主様お着替えさせてくださいね？」
					PRINTFORML 「にゅふふ、ぬしさまのおてて、わたしのおっぱい触りたがってますね」
					PRINTFORML 「いくらでもして良いんですよ？　『気が向いたら』？　……いぢわる」
				ELSE
					PRINTFORML 「……主様、着せてくださいますよね？」
					PRINTFORML 「『自分ですれば良いだろうに』？　ふふ、主様にされるのが良いんですよ」
					PRINTFORML 「それでは、次は私が主様のお着替えをさせて貰いますね」
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「そんなにじっと見て、楽しいですか？」
				PRINTFORML 「『エロいのが良い』？　まだしたりません？　私は構いませんよ」
			ELSEIF 陥落状態() == 2
				PRINTFORML 「そんなにじろじろ見ないでください、気持ち悪い」
				PRINTFORML 「『見られて嬉しいだろう？』　気持ち悪いだけです」
			ELSEIF 陥落状態() == 1
				PRINTFORML 「……あまり見ないでください」
			ELSE
				PRINTFORML 「見ないでくれませんか？」
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;添い寝する
;==================================================
@M_KOJO_EVENT_K49_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:睡眠
			IF 陥落状態() >= 4
				PRINTFORML 「……ん、主、……様ぁ……」
			ELSEIF 陥落状態() == 3
				PRINTFORML 「んぅ…………ふ……」
			ENDIF
		ELSEIF CFLAG:TARGET:衰弱
			PRINTFORMDL 可愛らしい寝息を立てるさとりに、目を覚ます気配は見られない
			PRINTFORMDL ふと思いついて、あらん限りにさとりを責め立てる妄想をしてみる%CALLNAME:MASTER%
			PRINTFORMDL 途端、さとりが僅かに頬を赤らめ、体を痙攣させる
			PRINTFORMDL 腰を軽く揺らす様に満足を覚えて、%CALLNAME:MASTER%はさとりから離れた
		ELSEIF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(140)
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「……このまま、一日中、主様といたいです」
				PRINTFORMDL さとりがぎゅっと抱きついてくる
				PRINTFORML 「いっそ、このまま、Ｈしましょ？　主様にされたいです」
				PRINTFORMDL ぐりぐりと頭を押しつけながらそんな事を言うさとりに苦笑が浮かぶ
				PRINTFORML 「『Ｈは後で』？　……ホントですね？　ちゃんとシテほしいです」
				PRINTFORMDL 渋々離れて身支度を調えるさとりに、%CALLNAME:MASTER%は苦笑を浮かべた
			ELSE
				PRINTFORML 「ふふ、それではそろそろ起きるとしましょうか？」
				PRINTFORMDL 呟いたさとりが、上体を起こした
				PRINTFORML 「……それとも、このまま睦み合いでもなさいます？」
				PRINTFORMDL ソレも良さそうだと内心で呟きながら、さとりと同様に体を起こして身支度を調える
				PRINTFORML 「手を出さないのですか、残念です」
				PRINTFORMDL わざとらしく溜め息を吐いたさとりも、身支度を調え始めた
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「それじゃ、そろそろ起きましょうか」
			PRINTFORMDL 軽く伸びをしながらさとりが身を起こす
			PRINTFORML 「ふふ、それともこのままここでしげらせますか？」
			PRINTFORMDL 古くさい言葉で睦み合いを所望するさとりに応えず、体を起こした
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;時止め終了時
;==================================================
@M_KOJO_EVENT_K49_17(ARG,ARG:1)
;口上主はTARGET
;排他と明記されていないモノは状況によっては連続で表示されるので注意
;ARGに射精状況
;ARG:1に射精状態
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	SIF 陥落状態() == 5
		GOTO NAKISATORIN
	IF ARG > 0 && ARG < 3
		;アナル射精
		SIF CFLAG:287 == 2
			SETBIT CFLAG:1494,0
		;膣内射精
		SIF CFLAG:286 == 2
			SETBIT CFLAG:1494,1
		;口内射精
		SIF CFLAG:288 == 2
			SETBIT CFLAG:1494,2
		;顔面射精
		SIF CFLAG:289 == 2
			SETBIT CFLAG:1494,3
		;手淫射精
		SIF CFLAG:290 == 2
			SETBIT CFLAG:1494,4
		FOR LOCAL:2,0,5
			SIF GETBIT (CFLAG:1494,LOCAL:2)
				LOCAL:3 += 1
		NEXT
		IF LOCAL:3 > 1
			FOR LOCAL:2,0,5
				SIF GETBIT (CFLAG:1494,LOCAL:2) && RAND:(LOCAL:3)
					CLEARBIT CFLAG:1494,LOCAL:2
			NEXT
		ENDIF
	ENDIF
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;ARG=1～3は排他
	;謎の快感
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(150)
		ELSEIF 陥落状態() >= 4
			PRINTFORML 「……私は主様の物です。主様がしたいのなら、受け入れるのも吝かではありません」
			PRINTFORMDL 目尻に涙を溜めて、さとりがじっと見つめてくる
			PRINTFORML 「ですが、私は主様に声を聞いて貰いたいのです。主様の悦楽を見たいのです」
			PRINTFORMDL その言葉に真情を感じて、%CALLNAME:MASTER%は大人しく拝聴する
			PRINTFORML 「だから、時止めではなく、普通に抱いて下さい、お願いします」
			PRINTFORMDL その言葉に、頷きは返さなかった
		ELSEIF 陥落状態() == 3
			PRINTFORML 「もう。……こう言うのは止めてほしいのですが」
			PRINTFORMDL 咎めるように呟きながら、口の端に笑みを浮かべるさとり
			PRINTFORML 「声も出さず、抱き返しもしない人形とするのはいささか勿体ないと思いますが」
			PRINTFORMDL 暗に時止めせずに抱いて欲しいと示唆され、苦笑が浮かんだ
		ELSEIF 陥落状態() == 2
			PRINTFORML 「最低ですね……」
			PRINTFORMDL じろりと怒りを眦に浮かべて、さとりが睨んでくる
			PRINTFORML 「卑劣にして怯懦な振る舞いをして恥ずかしいとは思わないのですか」
			PRINTFORMDL 快楽を貪るのに、振る舞いなど関係ない、内心で舌を出しつつそう思う%CALLNAME:MASTER%だった
		ELSEIF 陥落状態() == 1
			PRINTFORML 「……こう言うのはあまり感心しませんよ」
			PRINTFORMDL 嫌そうに呟くさとりに、口の端に笑みを浮かべるだけで%CALLNAME:MASTER%は何も応えない
		ELSE
			PRINTFORML 「っ！　…………反応しないモノを嬲って、愉しいのですか」
			PRINTFORMDL 不愉快そうなさとりに、愉しいに決まっていると%CALLNAME:MASTER%は返した
		ENDIF
		CLEARBIT CFLAG:1491,0
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;絶頂
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(151)
		ELSEIF 陥落状態() >= 4
			PRINTFORML 「ふぁんっっっっ！！！　んくぅ…………、主様、ひどい、です」
			PRINTFORMDL びくびくと全身を痙攣させながら、腰を落としたさとりが上目遣いに見つめてくる
			PRINTFORML 「んっ……、時止めではなく、普通に、相手をさせて、ほしいです」
			PRINTFORMDL 息を整えながら、憾みの籠もった瞳で見つめてくるさとり
			PRINTFORML 「私の意志で、主様を、気持ち良く、させたいのに」
			PRINTFORMDL 目尻に浮かぶ涙に、少しだけ罪悪感が湧いた
		ELSEIF 陥落状態() == 3
			PRINTFORML 「ひんっっ！？　っっ！！　……はぁ……ふっ……もう、酷いひとですね」
			PRINTFORMDL 床にへたり込んだままのさとりが、小さく溜め息を吐いた
			PRINTFORML 「普通に抱いて下さい、……それとも私の啼き声は不快なのでしょうか？」
			PRINTFORMDL そんな事は無いと思いながら、それでも時止めの楽しみを捨てるつもりは無かった
		ELSEIF 陥落状態() == 2
			PRINTFORML 「くぅぅっっ…………、こ、の、変態…………」
			PRINTFORMDL 一度はへたり込んださとりが、唇を噛み締めながら立ち上がる
			PRINTFORML 「こんな、ことの、何が愉しいんですか」
			PRINTFORMDL 全てが愉しい、内心での応えに、さとりが悔しげな表情で睨んできた
		ELSEIF 陥落状態() == 1
			PRINTFORML 「ひぁっ！？　ん……く……、どうして、こんなこと……」
			PRINTFORMDL 涙目で見つめてくるさとりに、応えるつもりは無かった
		ELSE
			PRINTFORML 「きゃんっっ！？　…………こほん……、変態」
			PRINTFORMDL 不愉快そうな表情で、さとりが睨んできた
		ENDIF
		CLEARBIT CFLAG:1491,0
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;パンツ紛失
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(152)
		ELSE
			PRINTFORML 「…………あんな布きれが欲しいなんて」
			PRINTFORML
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚口内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
				CALL DRUNKER49(153)
		;精液中毒低精飲
		ELSEIF ARG:1 == 1
			IF 陥落状態() >= 4
				PRINTFORML 「けほこほっ、んくんっ、けほ……」
				PRINTFORMDL 思わず精液を飲み込んださとりが、目に涙を浮かべて見つめてくる
				IF GETBIT (CFLAG:1494,2)
					PRINTFORML 「こんなこと、しないでほしいです、こほっ……、気持ち悪」
					PRINTFORMDL よほど味も感触も気に入らないのだろ、むせかえりながらも幾度ものどをさすっている
					PRINTFORML 「……けほ、はぁ……本当に、ヒドいです、主様」
					PRINTFORMDL 人心地ついたらしいさとりの言葉に、自然と笑みが浮かんだ
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「っくんっ！　こほっこほっっ……う～～、どうしてこんな」
				PRINTFORMDL 涙目になったさとりが、のどをさすりながら睨んでくる
				IF GETBIT (CFLAG:1494,2)
					PRINTFORML 「のどが気持ち悪い……、本当にヒドい人ですね、%CALLNAME:MASTER%は」
					PRINTFORMDL 僅かに頬を紅潮させて呟くさとりに、妙な艶めかしさを覚えた
				ENDIF
			ELSEIF 陥落状態() == 2
				PRINTFORMDL 顔を蒼くしたさとりが、小走りで離れた場所に移動して、えずこうとする
				PRINTFORML 「っっ！！　げほっごほっっ！！　ぐっ！！」
				IF GETBIT (CFLAG:1494,2)
					PRINTFORML 「くっ……、さいっっ、てい……」
					PRINTFORMDL けれど、結局吐き戻せなかったさとりが、目尻に涙を溜めて悔しげに睨んできた
				ENDIF
			ELSEIF 陥落状態() == 1
				PRINTFORML 「けほっ、こほっ、……こんなの、飲みたくないですよ」
				PRINTFORMDL 美味しいだろう、と言う内心の呟きに、涙目でさとりが見つめてきた
			ELSE
				PRINTFORML 「けほっ、んっ…………最悪……」
				PRINTFORMDL 不愉快そうに呟いたさとりが、目に怒りを浮かべて睨んできた
			ENDIF
		;精液中毒低吐き出し
		ELSEIF ARG:1 == 2
			IF 陥落状態() >= 4
				PRINTFORML 「けほっけほっっ……ん……、不味……」
				PRINTFORMDL 口中の精液を吐き出しながら、さとりが悲しげな表情でこちらを見つめてくる
				IF GETBIT (CFLAG:1494,2)
					PRINTFORML 「……主様、ヒドいです」
					PRINTFORMDL そう文句を言いながらも、どことなく欲情に潤んだ瞳を向けてくる
					PRINTFORML 「……こんな、口の中に出すなんて」
					PRINTFORMDL その言葉に、自然と笑みが浮かんできた
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「こほっこほっ……、気持ち悪……けほっ」
				PRINTFORMDL 精液を吐き出したさとりが、目尻に涙を溜めて見つめてくる
				IF GETBIT (CFLAG:1494,2)
					PRINTFORML 「こういうのは、やめて欲しいです、こほっ」
					PRINTFORMDL その呟きとは裏腹に、頬に僅かに紅が差している
				ENDIF
			ELSEIF 陥落状態() == 2
				PRINTFORML 「げほっ、えほっ…………最低」
				PRINTFORMDL 精液を吐き出したさとりが、眦を決して睨んでくる
				IF GETBIT (CFLAG:1494,2)
					PRINTFORML 「この変態」
					PRINTFORMDL ソレだけを口にするさとりに、ただにやりと笑みを向けた
				ENDIF
			ELSEIF 陥落状態() == 1
				PRINTFORML 「ごほっ…………、なんでこんなことを」
				PRINTFORMDL 嫌そうな表情を浮かべるさとりに、何も応えない
			ELSE
				PRINTFORML 「けほっ、けほっ、こほっっっ……、気持ち悪……」
				PRINTFORMDL 怒りを目に浮かべて見つめてくるさとりを黙殺した
			ENDIF
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
			IF 陥落状態() >= 4
				PRINTFORML 「こほっ、こほっっ……、ん……」
				PRINTFORMDL 掌で受け止めた精液を見ながら、さとりが困ったような表情を浮かべる
				IF GETBIT (CFLAG:1494,2)
					PRINTFORML 「……これ、自分で味わってみます？」
					PRINTFORMDL なぜか笑みを浮かべて白濁まみれの手を差し出してくる
					PRINTFORML 「『遠慮する』？　そんなものを私の口に出したんですか？」
					PRINTFORMDL 唇を尖らせて文句を言うさとりから、視線を逸らした
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「こほっ、こほっっ……、こういうのは、やめて欲しいです」
				PRINTFORMDL ザーメンを掌に吐き出し、さとりが涙目で見つめてくる
				IF GETBIT (CFLAG:1494,2)
					PRINTFORML 「ん……、本当に、ヒドい」
					PRINTFORMDL そう呟きながらも、どことなく楽しげに掌のザーメンをにちゃにちゅと弄んでいる
				ENDIF
			ELSEIF 陥落状態() == 2
				PRINTFORML 「けほっ、けほっ……、きもちわる……」
				PRINTFORMDL 掌に白濁を受け止めたさとりが、不快そうにこちらを睨んでくる
				IF GETBIT (CFLAG:1494,2)
					PRINTFORML 「こんなことの、何が楽しいんですか」
					PRINTFORMDL 全てに決まっている、そう内心で応えた瞬間、弾幕が襲い掛かってきた
				ENDIF
			ELSEIF 陥落状態() == 1
				PRINTFORML 「けほ、ん……、こう言うのは止めてほしいです」
				PRINTFORMDL イヤそうに呟きながら、さとりが掌の精液を見つめている
			ELSE
				PRINTFORML 「こほっけほ……、さい、てい」
				PRINTFORMDL さとりの白眼視は完全に無視した
			ENDIF
		;精液中毒高精飲
		ELSEIF ARG:1 == 4
			IF 陥落状態() >= 4
				PRINTFORML 「……っくん……、はぁ……ん、美味しい……」
				PRINTFORMDL うっとりとした表情で精液を飲み下したさとりが、自分の唇を指でそっとなぞった
				IF GETBIT (CFLAG:1494,2)
					PRINTFORML 「……はっ！　で、ですから、時止めで嬲るのは止めてほしいと何度言ったら解るのですか」
					PRINTFORMDL 顔を赤くして文句を言うさとりだが、ソレが照れ隠しだというのは一目でわかる
					PRINTFORML 「『美味しいだろう』？　……ちゃんとご奉仕した上で、飲ませて欲しかったんです」
					PRINTFORMDL 恥ずかしそうに呟くさとりに、やに下がった笑みが浮かんでしまった
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「こくん…………、ん、もうそんなに飲んで欲しかったら、時止めなんてしなくても」
				PRINTFORMDL 不満そうに呟いたさとりの目が、%CALLNAME:MASTER%の股間に集中する
				IF GETBIT (CFLAG:1494,2)
					PRINTFORML 「しっかり、舐めてしゃぶって、気持ち良くさせたいのに」
					PRINTFORMDL 情欲の籠もる呟きに、自然と生唾を飲み込んでしまった
				ENDIF
			ELSEIF 陥落状態() == 2
				PRINTFORML 「こく…………、不愉快です」
				PRINTFORMDL 自ら飲み下したのに、そんなことを呟くさとりに、嘲弄の笑みが浮かぶ
				IF GETBIT (CFLAG:1494,2)
					PRINTFORML 「……単に邪魔だから飲み下しただけです」
					PRINTFORMDL 不愉快そうな表情で、それでも頬を羞恥に赤くしている
				ENDIF
			ELSEIF 陥落状態() == 1
				PRINTFORML 「こくんっ、ん、美味し……、って、こう言うのはやめて下さい」
				PRINTFORMDL 不快そうに呟くさとりだが、目が情欲に潤んでいる
			ELSE
				PRINTFORML 「こくり、……気持ち、悪」
				PRINTFORMDL そう曰うさとりの、口の端に笑みが浮かんでいる
			ENDIF
		ENDIF
		CLEARBIT CFLAG:1491,0
		CLEARBIT CFLAG:1494,2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;[幼稚]持ち&精液経験100以下
		IF ARG:1 == 1
		ELSEIF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(154)
		;通常ぬぐい取り
		ELSEIF ARG:1 == 2
			IF 陥落状態() >= 4
				PRINTFORML 「主様のバカ……、なんでこんなヒドいことを」
				PRINTFORMDL 顔にべっとりと張り付く白濁を指でこそげ落とすさとり
				IF GETBIT (CFLAG:1494,3)
					PRINTFORML 「……ですから、時止めはしないでほしいとあれほど言ってるじゃありませんか」
					PRINTFORMDL 全てをぬぐい取ってから、こちらを見つめてくる
					PRINTFORML 「主様は本当に意地悪です」
					PRINTFORMDL 唇を尖らせるさとりの姿に、自然と笑みが浮かんだ
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「こんな風に顔を汚されたら、怒りますよ」
				PRINTFORMDL そう言いながらも、どこか興味深そうに指で拭い集めた精液を弄るさとり
				IF GETBIT (CFLAG:1494,3)
					PRINTFORML 「時止めをするなとは言いませんけど、こう言うのは不愉快です」
					PRINTFORMDL 精液をハンカチでぬぐい取り、さとりが唇を尖らせた
				ENDIF
			ELSEIF 陥落状態() == 2
				PRINTFORML 「……変態、鬼畜、最低のクズですね」
				PRINTFORMDL 苛立ちを抑えきれない様子で、顔を拭うさとり
				IF GETBIT (CFLAG:1494,3)
					PRINTFORML 「こんなことの何が楽しいんですか、本当に不快です」
					PRINTFORMDL マーキングだと内心で呟いた瞬間、さとりが殺意の籠もる視線を向けてきた
				ENDIF
			ELSEIF 陥落状態() == 1
				PRINTFORML 「はぁ……、こういうのは止めて下さい。気持ち悪いだけなんですから」
				PRINTFORMDL 呟いて汚れを取るさとりに、ただニヤニヤと笑う%CALLNAME:MASTER%だった
			ELSE
				PRINTFORML 「……最低」
				PRINTFORMDL 怒りを目に浮かべて見つめてくるさとりを黙殺した
			ENDIF
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
			IF 陥落状態() >= 4
				PRINTFORML 「だから、こう言うのは止めてほしいと言ってるのに」
				PRINTFORMDL 呟いたさとりが、顔にかかった白濁を指に絡め、舐めとって笑みを浮かべる
				IF GETBIT (CFLAG:1494,3)
					PRINTFORML 「……ん、美味しい……、っ！？　な、何を見てるんですか」
					PRINTFORMDL 一拍おいて我に返ったさとりが、顔を真っ赤にして見つめてくる
					PRINTFORML 「大体、主様が止めてくれないのが悪いんです」
					PRINTFORMDL そう呟くさとりの表情に、もっとしたいと考え、涙目で睨まれてしまった
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「……本当に、しかたの無い人です」
				PRINTFORMDL 唇を尖らせて顔を拭っていたさとりが、指に絡んだ精液を口中に運ぶ
				IF GETBIT (CFLAG:1494,3)
					PRINTFORML 「『エロい』？　……っ！　な、何を見てるんですか」
					PRINTFORMDL 顔を真っ赤にしたさとりが、慌てて視線を逸らした
				ENDIF
			ELSEIF 陥落状態() == 2
				PRINTFORML 「下衆っていうのは、%CALLNAME:MASTER%の為にある言葉ですね」
				PRINTFORMDL 不愉快そうに呟いたさとりが、何故か精液を拭った指を口元に運んでくわえた
				IF GETBIT (CFLAG:1494,3)
					PRINTFORML 「……はぁ、本当に不愉快です」
					PRINTFORMDL そう言いながらも白濁を味わうさとりに、下卑た笑みを浮かべた途端、睨み付けられてしまった
				ENDIF
			ELSEIF 陥落状態() == 1
				PRINTFORML 「だから、こう言うのは止めて下さいと、……ん」
				PRINTFORMDL 文句を口にしながら、精液を口に運ぶさとりに、自然とにやけた笑みが浮かんでしまう
			ELSE
				PRINTFORML 「はぁ、気持ち悪い」
				PRINTFORMDL 深々と溜め息を吐いて、さとりが顔から拭った精液を口に運んだ
			ENDIF
		ENDIF
		CLEARBIT CFLAG:1491,0
		CLEARBIT CFLAG:1494,3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(155)
		;ぬぐい取り
		ELSEIF ARG:1 == 1
			IF 陥落状態() >= 4
				PRINTFORML 「主様。お願いですから、普通に愛させて下さい」
				PRINTFORMDL 掌にまとわりつくザーメンを見て、さとりが涙目で見つめてくる
				IF GETBIT (CFLAG:1494,4)
					PRINTFORML 「私は主様を悦ばせたいんです。私の意志は必要ないのですか」
					PRINTFORMDL ただの気まぐれだと内心で答え、無意識になぜかさとりの頭を撫でてしまう
					PRINTFORML 「本当に、本当にヒドい人です、主様は」
					PRINTFORMDL そう呟いたさとりが、泣き笑いの表情で見つめてきた
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「……%CALLNAME:MASTER%はどうして、こうなのですか」
				PRINTFORMDL すこしだけ不快そうに眉を顰めてさとりが見つめてくる
				IF GETBIT (CFLAG:1494,4)
					PRINTFORML 「私の声も意志も不要なのですか、残念です」
					PRINTFORMDL 掌の精液を拭いながら、さとりが小さく溜め息を吐いた
				ENDIF
			ELSEIF 陥落状態() == 2
				PRINTFORML 「卑劣下賤な人間にふさわしい、愚かな行為ですね」
				PRINTFORMDL 掌の汚れを拭いながら、さとりが怒りを込めて睨んでくる
				IF GETBIT (CFLAG:1494,4)
					PRINTFORML 「このような行為のどこが楽しいというのですか」
					PRINTFORMDL 全て楽しい、そう考えると同時、ギロリと刺すような視線でさとりが睨んできた
				ENDIF
			ELSEIF 陥落状態() == 1
				PRINTFORML 「はぁ……、こう言うのはあんまり好きではないんですけど」
				PRINTFORMDL 文句を言いながら、どこか興味深げにさとりが精液をにちゃにちゃと弄んでいる
			ELSE
				PRINTFORML 「気持ち悪……」
				PRINTFORMDL イヤそうな表情を浮かべながら、さとりが手の汚れを落としている
			ENDIF
		;舐めとり
		ELSEIF ARG:1 == 2
			IF 陥落状態() >= 4
				PRINTFORML 「どうしてこんなことをするんですか、主様は意地悪です」
				PRINTFORMDL ぽつりと呟いたさとりが、精液にまみれた手を口元へ持って行く
				IF GETBIT (CFLAG:1494,4)
					PRINTFORML 「すんすん……、青臭い……、本当にもう」
					PRINTFORMDL 小さく呟いて、ぺろりとソレを舐めとるさとり
					PRINTFORML 「美味し……、っ、何を見てるんですか」
					PRINTFORMDL まだ残る汚れは布でぬぐい取ってそっぽを向く姿に、%CALLNAME:MASTER%は思わず笑った
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「時止めで、動きもしない私の手を使うだけで楽しいんですか？」
				PRINTFORMDL 文句を口にして、掌を口元へと引き寄せるさとり
				IF GETBIT (CFLAG:1494,4)
					PRINTFORML 「……れろ、ん……、だから、こう言うのはやめて欲しいと言ってるんですけど」
					PRINTFORMDL わざわざ精液の一部を舐めとって、ぬぐい取るさとりに苦笑が浮かんだ
				ENDIF
			ELSEIF 陥落状態() == 2
				PRINTFORML 「ぺろ……、何を見てるんですか、この鬼畜、増上慢」
				PRINTFORMDL こちらに顔を背けて、掌を口に寄せて、精液を舐めるさとり
				IF GETBIT (CFLAG:1494,4)
					PRINTFORML 「『美味いか』？　こんなの、気持ち悪いだけです」
					PRINTFORMDL ぽつりと呟いて、けれど熱情に潤む瞳を、精液に向けたあと、名残惜しげに拭った
				ENDIF
			ELSEIF 陥落状態() == 1
				PRINTFORML 「……れろ、ちゅぱ……、ふぅ……だから、こう言うのはイヤだと言ってるでしょう」
				PRINTFORMDL 美味しそうに舐めとってから言う台詞ではないと、内心で呟く%CALLNAME:MASTER%だった
			ELSE
				PRINTFORML 「……れろ、不味……」
				PRINTFORMDL 舐めなくても良いだろうと思う%CALLNAME:MASTER%を、何か言いたげにさとりが見つめてきた
			ENDIF
		ENDIF
		CLEARBIT CFLAG:1491,0
		CLEARBIT CFLAG:1494,4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚アナル射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(156)
		;Ａ感覚0
		ELSEIF ARG:1 == 1
			IF 陥落状態() >= 4
				PRINTFORML 「くぅ……、お尻でなんて、変態すぎです……」
				PRINTFORMDL 尻穴の苦痛に耐えるように顔を顰めて、さとりが見つめてくる
				IF GETBIT (CFLAG:1494,0)
					PRINTFORML 「入れる場所では、ないところなのに」
					PRINTFORMDL それでも、気持ち良さそうに反応していた、内心でそう呟く
					PRINTFORML 「う、うそです、こんなの、痛いだけで、気持ち良くなんて」
					PRINTFORMDL どことなくそわそわした調子で、さとりが見つめてくる
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「く、っ、いくら、なんでも、して良いことと悪いことが」
				PRINTFORMDL 唇を噛み締めながらさとりが見つめてくる
				IF GETBIT (CFLAG:1494,0)
					PRINTFORML 「『気持ち良かった』？　……変態」
					PRINTFORMDL 内心を読んださとりが、ぼそっと呟きながら、僅かに相好を崩している
				ENDIF
			ELSEIF 陥落状態() == 2
				PRINTFORML 「この、変態、鬼畜」
				PRINTFORMDL 痛みに歯を食いしばり尻に手を回すさとり
				IF GETBIT (CFLAG:1494,0)
					PRINTFORML 「こんな不浄の場所で喜ぶなんて、最低の下衆」
					PRINTFORMDL 尻穴を締め付けて喜んでいたくせに、そう考えた瞬間、頬を張られた
				ENDIF
			ELSEIF 陥落状態() == 1
				PRINTFORML 「痛ぅ……、こんな、ばしょでなんて、へんたい」
				PRINTFORMDL 涙目でさとりが見つめてくる
			ELSE
				PRINTFORML 「痛っ！　この、変態っ！」
				PRINTFORMDL 思い切り頬を張り飛ばされる
			ENDIF
		;ソレ以外
		ELSEIF ARG:1 == 2
			IF 陥落状態() >= 4
				PRINTFORML 「んっ……、主様、ここはイヤです」
				PRINTFORMDL 涙目になりながら、さとりが自身のアヌスを軽く抑える
				IF GETBIT (CFLAG:1494,0)
					PRINTFORML 「お尻でなんて、変態すぎます。……主様お願いですから、ココは止めてほしいです」
					PRINTFORMDL その懇願に媚びを感じて、手を伸ばしたまま、強引にアヌスに指を差し入れた
					PRINTFORMDL 「ふぁんっっ！！　……あ、だ、だから、その……うぅ……」
					PRINTFORMDL びくんと悦楽に体を震わせたさとりが、恥ずかしげに視線を逸らした
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「ここが良いなんて、変態すぎます」
				PRINTFORMDL 憾みを籠めた目でさとりがじっとこちらを見つめてくる
				IF GETBIT (CFLAG:1494,0)
					PRINTFORML 「んっ……、ここでなんて……」
					PRINTFORMDL もじもじと尻を揺らす媚態に脂下がった笑みを浮かべてしまい、思い切り睨まれた
				ENDIF
			ELSEIF 陥落状態() == 2
				PRINTFORML 「あたまがおかしいんですね、こんなところに吐き出して喜ぶなんて」
				PRINTFORMDL 苛立ちを籠めた瞳で見つめられて、当然だと頷く
				IF GETBIT (CFLAG:1494,0)
					PRINTFORML 「変態鬼畜増上慢最低最悪で下劣な下衆にふさわしい行為です」
					PRINTFORMDL 詈言を揚げながら尻を気にするさとりに、自然と笑みが浮かんでしまった
				ENDIF
			ELSEIF 陥落状態() == 1
				PRINTFORML 「……うぅ、ですから、こちらでするのは止めて下さい」
				PRINTFORMDL 尻をもじもじと揺らしながら見つめてくるさとりに、笑みを浮かべたまま応えない
			ELSE
				PRINTFORML 「……最低、ですね」
				PRINTFORMDL 苦しげに唇を噛んださとりがじっと睨んできた
			ENDIF
		ENDIF
		CLEARBIT CFLAG:1491,0
		CLEARBIT CFLAG:1494,0
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚処女喪失】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(157)
		ELSEIF 陥落状態() >= 4
			PRINTFORML 「……どうして、どうして時止めで奪ったのですか」
			PRINTFORMDL 目尻に涙を浮かべてさとりがじっと見つめてくる
			PRINTFORML 「女の初めては、魂に刻まれるもの。ですから自分の意志で捧げたかったのに」
			PRINTFORMDL 普段の甘えとは違うその言葉に、珍しく胸の奥に罪悪感が湧いた
			PRINTFORML 「今更時を巻き戻すことは出来ませんが、そう思うのでしたら今後は控えて欲しいです」
			PRINTFORMDL その言葉に、渋々頷きを返した
		ELSEIF 陥落状態() == 3
			PRINTFORML 「……いくらなんでも、これはないでしょう」
			PRINTFORMDL 目に涙を溜めて、さとりが見つめてくる
			PRINTFORML 「初めてを、肉欲だけで散らすのは、楽しいですか」
			PRINTFORMDL その言葉に、楽しいと答えられない自分に、%CALLNAME:MASTER%は戸惑いを覚えた
		ELSE
			PRINTFORMDL %CALLNAME:MASTER%を強烈な目で見つめてきたさとりが、いきなり頬を張ってきた
			PRINTFORML 「……最低」
			PRINTFORMDL 振り抜いた手をそのままに、さとりが涙を浮かべている
		ENDIF
		CLEARBIT CFLAG:1491,0
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚膣内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(158)
		;非処女膣内射精ピルなし
		ELSEIF ARG:1 == 1
			IF (CFLAG:49:生解禁 == 1 && ESTRUS_CYCLE(49) == 150) || !CFLAG:49:生解禁
				IF 陥落状態() >= 4
					PRINTFORML 「ですから、時止めでするのはやめて欲しいと言っていますのに」
					PRINTFORMDL その言葉に、それはそれコレはコレと応える%CALLNAME:MASTER%
					IF GETBIT (CFLAG:1494,1)
						PRINTFORML 「その上、中で出すんですから、本当に困った人です」
						PRINTFORMDL 出来ないんだから問題ない、そうのたまった%CALLNAME:MASTER%にさとりがコワい笑顔を浮かべる
						PRINTFORML 「主様？」
						PRINTFORMDL だらりとこぼれ落ちる冷や汗に、頭を下げて謝った
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「……こんなことしてもあまり意味は無いんですけどね」
					PRINTFORMDL ため息をついてそんなことをのたまうさとりに、こちらが楽しいから意味はあると答える
					IF GETBIT (CFLAG:1494,1)
						PRINTFORML 「いえ、そういう意味ではありませんから。……ほっとすべき、ところなんでしょうけどね」
						PRINTFORMDL 出来ないならいくら出しても問題ない、そう思った瞬間、悲しそうな表情でさとりが見つめてきた
					ENDIF
				ELSEIF 陥落状態() == 2
					PRINTFORML 「…………こんな無駄なことをして何が楽しいんですか」
					PRINTFORMDL 無駄とは限らない、そう内心で応えを返す%CALLNAME:MASTER%に、さとりが悔しげな表情を浮かべる
					IF GETBIT (CFLAG:1494,1)
						PRINTFORML 「何をバカなことを言っているんですか、ふざけないでください」
						PRINTFORMDL 中で出される感触そのものは覚えているだろうと、内心で呟く%CALLNAME:MASTER%にさとりが視線をそらした
					ENDIF
				ELSEIF 陥落状態() == 1
					PRINTFORML 「はぁ……、どうしてこんなことをしたがるんですか」
					PRINTFORMDL 非難の混じる声音に、したいからだと答えて呆れた表情を向けられた
				ELSE
					PRINTFORML 「…………最低ですね」
					PRINTFORMDL その言葉に、ただにやりと下卑た笑みを向けた
				ENDIF
			ELSE
				IF 陥落状態() >= 4
					PRINTFORML 「子供が出来たら、責任は取って下さいね」
					PRINTFORMDL にっこりと満面の笑みで告げるさとりに、ソレも仕方ないと苦笑を浮かべる%CALLNAME:MASTER%
					IF GETBIT (CFLAG:1494,1)
						PRINTFORML 「そこで素直にそう思うのでしたら、時止めはしないで欲しいですけどね」
						PRINTFORMDL 笑顔のまま続いた言葉に、時止めの楽しみを止めるつもりはないと内心で答える
						PRINTFORML 「はぁ……、私の声や痴態は、主様を満足させられないと？」
						PRINTFORMDL 自ら腰をふる様も甘い啼き声も満足出来るものだが、ソレとコレとは別だと応えた
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「……%CALLNAME:MASTER%は、ヒドい人です。時止めで膣内射精して孕ませようなんて」
					PRINTFORMDL 深々と溜め息を吐いたさとりが、じろりとこちらを睨んでくる
					IF GETBIT (CFLAG:1494,1)
						PRINTFORML 「孕むなら、ちゃんと自分の意志で孕みたいんですからね」
						PRINTFORMDL 甘えるような声音に、ただ頷くしかなかった
					ENDIF
				ELSEIF 陥落状態() == 2
					PRINTFORML 「っっ！」
					PRINTFORMDL キッ、と強烈な目で睨んでくるさとりに、背中に汗が浮いた
					IF GETBIT (CFLAG:1494,1)
						PRINTFORML 「………………ころして、やりたい」
						PRINTFORMDL その呟きと同時、涙をこぼすさとりに妙な違和感を覚えた
					ENDIF
				ELSEIF 陥落状態() == 1
					PRINTFORML 「……はぁ、どうして時止めでしたがるんです、普通にシテほしいのに」
					PRINTFORMDL さとりの言葉に、%CALLNAME:MASTER%はなんとなくだと答えた
				ENDIF
			ENDIF
		;非処女膣内射精ピルあり
		ELSEIF ARG:1 == 2
			IF (CFLAG:生解禁 == 1 && ESTRUS_CYCLE(49) == 150) || !CFLAG:生解禁
				IF 陥落状態() >= 4
					PRINTFORML 「……主様、私はまだ子供は欲しいとは言っていません」
					PRINTFORMDL 目に涙を溜めつつ見つめてくるさとりに、冷や汗が背中を伝う
					IF GETBIT (CFLAG:1494,1)
						PRINTFORML 「ちゃんと、子供が欲しいと思わせてはくれないのですか？」
						PRINTFORMDL さとりの言葉とその頬を伝い落ちる涙に、言葉に出来ない感情が胸の奥で渦巻く
						PRINTFORML 「……その思いを言葉にはしません。ですが、そう思うのでしたら、時止めで嬲るのはやめてください」
						PRINTFORMDL やめるつもりはない、と答えつつ、腹の奥を掻き回される様な違和感に首をかしげた
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「いくらなんでも、これはないでしょう」
					PRINTFORMDL 頬を膨らまして、さとりが睨んでくる
					IF GETBIT (CFLAG:1494,1)
						PRINTFORML 「いくら子供ができないからと、そんなに注ぎ込むのは楽しいんですか？」
						PRINTFORMDL さとりの言葉に、楽しいと言い返せない自分に%CALLNAME:MASTER%は戸惑いを浮かべた
					ENDIF
				ELSEIF 陥落状態() == 2
					PRINTFORML 「……本当に無駄なことが好きですね」
					PRINTFORMDL 冷めた表情のさとりに無駄なはずはないと答えを返す
					IF GETBIT (CFLAG:1494,1)
						PRINTFORML 「絶対に出来ないのだから無駄に決まっています」
						PRINTFORMDL それでも中出しされる感覚は忘れられないだろうと声をかけ、悔しげな表情で睨まれた
					ENDIF
				ELSEIF 陥落状態() == 1
					PRINTFORML 「……はぁ…………、いい加減にしないと怒りますよ」
					PRINTFORMDL 深々と溜め息を吐いたさとりに、普通とっくに怒るだろうと思う%CALLNAME:MASTER%だった
				ELSE
					PRINTFORML 「最低、ですね」
					PRINTFORMDL 呆れた様子でさとりが向けてくる白眼視に、ただにやにやと笑みを浮かべた
				ENDIF
			ELSE
				IF 陥落状態() >= 4
					PRINTFORML 「……主様、いくらピルを飲んでいるからと言って、これはどうかと思いますが」
					PRINTFORMDL 唇をとがらせたさとりがじっとこちらを睨んでくる
					IF GETBIT (CFLAG:1494,1)
						PRINTFORML 「こんなに中に出して、もし出来たらどうするつもりですか」
						PRINTFORMDL その時はその時だと、呟く%CALLNAME:MASTER%
						PRINTFORML 「お願いですから、主様の子供が欲しいと思わせるようにして下さい」
						PRINTFORMDL なんとなく胸の奥に妙なしこりがある事に、内心で小首を傾げた
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「どうして、%CALLNAME:MASTER%はこんなことをするんですか」
					PRINTFORMDL 少しだけ不愉快そうに眉をしかめてさとりがぽつりと呟く
					IF GETBIT (CFLAG:1494,1)
						PRINTFORML 「……ピルさえ飲んでいるから何をしても良いと思っているんですか」
						PRINTFORMDL その呟きに悲哀の響きを感じて、%CALLNAME:MASTER%はなぜか答えを返せない
					ENDIF
				ELSEIF 陥落状態() == 2
					PRINTFORML 「この変態、鬼畜、けだもの、もう私に触れないで下さい」
					PRINTFORMDL 唇を噛み締め、呟くさとり
					IF GETBIT (CFLAG:1494,1)
						PRINTFORML 「『ならカゾクに』っ！？　この、……この」
						PRINTFORMDL わなわなと震えるさとりが、涙をこぼしながら視線を逸らした
					ENDIF
				ELSEIF 陥落状態() == 1
					PRINTFORML 「……はぁ…………、いい加減にしないと怒りますよ」
					PRINTFORMDL 深々と溜め息を吐いたさとりに、普通とっくに怒るだろうと思う%CALLNAME:MASTER%だった
				ELSE
					PRINTFORML 「最低、ですね」
					PRINTFORMDL 呆れた様子でさとりが向けてくる白眼視に、ただにやにやと笑みを浮かべた
				ENDIF
			ENDIF
		;処女膣内射精
		ELSEIF ARG:1 == 3
			IF 陥落状態() >= 4
				PRINTFORML 「……初めてなのに、中に出すなんて、主様は本当にヒドい人です」
			ELSEIF 陥落状態() == 3
				PRINTFORML 「……せめて、こちらから捧げたのなら、まだ嬉しいと言えるのに」
			ELSE
				PRINTFORML 「…………さい……てい…………」
			ENDIF
		ENDIF
		CLEARBIT CFLAG:1491,0
		CLEARBIT CFLAG:1494,1
		TCVAR:種付けられ自覚 = 1
		CFLAG:身に覚え_母 = 1
		PRINTFORML
		RETURN 1
	ENDIF
	RETURN 1
	$NAKISATORIN
	IF ARG == 1 || ARG ==2 || ARG == 8 || ARG == 9
		IF ARG == 8
			IF 陥落状態() >= 4
				PRINTFORML 「主様の馬鹿、なんであんなことするんですか」
				PRINTFORMDL 唇をとがらせたさとりが詰め寄ってくる
				PRINTFORML 「なんで今まで時止めでしなかったのに、時止めで奪ったんです」
				PRINTFORMDL そこまで言った途端、ぼろぼろと唐突に涙をこぼし始めるさとり
				PRINTFORML 「ぐす、えぐ、ひどい、です。ひくっ、ぬしさましんじてたのに、こんなの、こんなのぉ」
				PRINTFORML 「ハジメテ、ハジメテだったのに、どうして、どうしてなんですか」
				PRINTFORMDL 嗚咽混じりの問い詰めに、答えを返せない
				PRINTFORML 「ぐすひぐ、ぬしさまのばかぁ、わ～～んっっ！！」
				PRINTFORMDL そのまま号泣するさとりに、無かったはずの罪悪感が胸を苛んできた
			ELSE
				PRINTFORML 「……いくらなんでも、これはないでしょう」
				PRINTFORMDL ぽつりと呟いたさとりが、目尻に涙を溜めながらも無表情で見つめてくる
				PRINTFORML 「……%CALLNAME:MASTER%に慕情を向けたのは、間違いだったと思わせたいのですか」
				PRINTFORMDL ぽろりと零れた涙をぬぐいもしないさとりに、なぜか胸の奥に痛みを覚える
				PRINTFORML 「……%CALLNAME:MASTER%でも、罪悪感を感じることはあるんですね」
				PRINTFORMDL 無表情で涙をこぼしながら淡々と呟くさとりに、ただ頭を下げた
			ENDIF
		ELSEIF ARG == 9
			TCVAR:種付けられ自覚 = 1
			CFLAG:身に覚え_母 = 1
		ELSEIF FIRSTTIME("NAKISATORIN")
			IF 陥落状態() >= 4
				PRINTFORML 「…………んっ……、ひどい、です」
				PRINTFORMDL 悦楽に身を震わせたさとりが、目尻に涙を溜めて見つめてくる
				PRINTFORML 「どうして、今更こんなこと、するんですか」
				PRINTFORMDL ほろりと、零れる涙をぬぐいもせず、さとりはただこちらを見つめてくる
				PRINTFORML 「……わたしのこと、だいじに、してくれたんじゃ、ないんですか」
				PRINTFORML 「ぬしさまは、わたしのこと、きらいなんですか」
				PRINTFORMDL そんなことはないと答えようにも、なぜか言葉が出てこない
				PRINTFORML 「ぐす……えぐ…………ぬしさま……ひどい、です……ひくっ」
				PRINTFORMDL ボロボロと涙をこぼすさとりの頭を撫でてやることしか出来なかった
			ELSE
				PRINTFORMDL 快楽に身を震わせたさとりが、初めて顔を合わせたときの様な冷たい表情を向けてくる
				PRINTFORML 「…………恋い慕われる相手を、なぶり者にして楽しいですか？」
				PRINTFORMDL さとりの言葉が、なぜか胸に突き刺さる
				PRINTFORML 「……%CALLNAME:MASTER%を、きらいになれない自分がイヤになります」
				PRINTFORMDL サードアイの触手を自身の喉に巻き付けるさとりに、背筋が総毛立った
				PRINTFORML 「『死ぬな』？　…………そう思うなら、もう、こんなことしないでください」
				PRINTFORMDL 渋々触手が外されたさとりの喉に残る、赤黒いアザに胸の奥が痛みを発した
			ENDIF
		ELSE
			IF 陥落状態() >= 4
				PRINTFORML 「…………まだ、するんですか」
				PRINTFORMDL ぼろぼろと涙をこぼしながら、さとりがすがりついてくる
				PRINTFORML 「わた、わたし、ぬしさま、まんぞくさせ、られませんか？」
				PRINTFORMDL そうではないと内心で考える%CALLNAME:MASTER%に、さとりが嗚咽を漏らす
				PRINTFORML 「どうして、きをゆるした、とたん、こんなこと、ぐすっ……えぐっ……」
				PRINTFORMDL 余りにも悲痛なその姿に%CALLNAME:MASTER%はなにも言えなくなった
			ELSE
				PRINTFORML 「…………ヒドい、ひと、です」
				PRINTFORMDL つっと、さとりの頬を涙が数行伝い落ちる
				PRINTFORML 「……『すまない』？　……なら、もうしないで、ください」
				PRINTFORMDL 無表情のまま涙を流すさとりに、%CALLNAME:MASTER%は頭を下げる以外の事は出来なかった
			ENDIF
		ENDIF
		FOR LOCAL:2,7,10
			IF !GETBIT (CFLAG:1490,LOCAL:2)
				SETBIT CFLAG:1490,LOCAL:2
				BREAK
			ENDIF
		NEXT
		IF GETBIT (CFLAG:1490,9)
			PRINTFORML 「……\@ 陥落状態() >= 4 ? 主様 # %CALLNAME:MASTER% \@は、ヒドい人です」
			PRINTFORMDL ぽつりと呟いたさとりが、零れる涙をぬぐいもせず見つめてくる
			PRINTFORML 「私が心を許すまでは、時止めの玩弄はしなかったのに」
			PRINTFORML 「心まで、玩弄して、楽しいですか」
			PRINTFORMDL そのさとりの言葉に、楽しいの一言が出てこない
			PRINTFORML 「……\@ 陥落状態() >= 4 ? 主様 # %CALLNAME:MASTER% \@は、そう言う方でしたね」
			PRINTFORMDL ぽつりと呟いたさとりが、涙をぬぐって寂しげな微笑を浮かべた
			PRINTL
			PRINTL
			PRINTL
			PRINTL
			PRINTL
			PRINTL
			PRINTL さとりは、[素直]を失った
			TALENT:態度 = 0
			PRINTL さとりは、[サド]を得た
			TALENT:サド = 1
			CLEARBIT CFLAG:1490,6
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K49_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「今日は中には出さないで欲しいのですが」
		IF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORMD 物欲しそうな表情で、
			ELSE
				PRINTFORMD 含羞の紅を頬に乗せ、
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORMD 苦笑を口元に浮かべて
		ELSEIF 陥落状態() == 2
			PRINTFORMD 冷たい目で睨みながら、
		ELSE
			PRINTFORMD 困ったような顔で、
		ENDIF
		PRINTFORMDL さとりが口を開いた
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「……主様の赤ちゃん、きっと可愛いと思います、けど」
				PRINTFORMDL そう言いながら、さとりが少し目を伏せる
				PRINTFORML 「今はまだ、主様のおそばで主様を独占したいです」
				PRINTFORMDL 不意に近寄ってきたさとりが、抱きついてほおずりしてくる
				PRINTFORML 「私の主様、赤ちゃんはもう少し時間が経ってからにしましょ、ね？」
				PRINTFORMDL その表情にとっさに返す言葉が出てこなかった
			ELSE
				PRINTFORML 「え、と、その主様に注いで貰うのは嬉しいんです」
				PRINTFORMDL 恥ずかしげに呟いたさとりが、上目遣いで見つめてくる
				PRINTFORML 「でも、やっぱり子供はまだ早いと思いますし」
				PRINTFORMDL そう呟きながら、視線を逸らすさとり
				PRINTFORML 「主様の事はお慕いしていますけれど、やっぱりもう少しこのままが」
				PRINTFORMDL 恥ずかしげなまま呟く様に、%CALLNAME:MASTER%は言葉に詰まった
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「その、%CALLNAME:MASTER%も子供が欲しいんですか？」
			PRINTFORMDL そういうわけではない、そう思った瞬間、さとりが深々と溜め息を吐いた
			PRINTFORML 「なら、ガマンして下さい。責任とれないのでしょう？」
			PRINTFORMDL とれないとは言ってない、とらないかもしれないが、その思考にさとりがもう一度溜め息を吐いた
		ELSEIF 陥落状態() == 2
			PRINTFORML 「……気持ち悪い。%CALLNAME:MASTER%と性交するだけでも不愉快なのですが」
			PRINTFORMDL 不快そうに眉をしかめて、さとりが語を繋ぐ
			PRINTFORML 「大体、ただ玩弄するだけの相手に、本気で子供を産ませたいと思っているのですか？」
			PRINTFORMDL 子供はどうでも良いがナマが良い、そう思った瞬間殺意の滲む視線で睨み付けられた
		ELSE
			PRINTFORML 「%CALLNAME:MASTER%の子供が欲しいとまでは、今は思えませんので」
			PRINTFORMDL 微笑みと共に告げられて、小さく舌打ちをする%CALLNAME:MASTER%だった
		ENDIF
		SETBIT CFLAG:1490,2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「……主様、私の事、きらいになりました？」
			ELSE
				PRINTFORML 「……いくら主様でも、言って良いことと悪いことがありますよ」
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「はぁ……、子供が欲しいわけでもないのなら、諦めなさい」
		ELSEIF 陥落状態() == 2
			PRINTFORML 「絶対、イヤです」
		ELSE
			PRINTFORML 「怒っても、構いませんね」
		ENDIF
		CLEARBIT CFLAG:1490,2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日以外許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		IF GETBIT (CFLAG:1490,2)
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「……赤ちゃん、欲しくないわけじゃないんです。……良いですよ」
				ELSE
					PRINTFORML 「……そんなにしたいんですか？　しょうがありませんね」
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「責任とっていただきますからね、覚悟して下さい」
			ELSEIF 陥落状態() == 2
				PRINTFORML 「最低……、そんなにしたければ勝手にどうぞ」
			ELSE
				PRINTFORML 「はぁ、どうぞご随意に」
			ENDIF
			CLEARBIT CFLAG:1490,2
		ELSE
			;システム的にどうなのかは解りません
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「そんなに、生が良いんですか？」
					PRINTFORMDL さとりの問いかけに当然だと答える%CALLNAME:MASTER%
					PRINTFORML 「もし赤ちゃん出来たら、責任取ってくださいね？」
					PRINTFORMDL 当然だと頷きを返し、さとりをぐっと抱き寄せる
					PRINTFORML 「主様、大好きです。だから、いーですよ」
					PRINTFORMDL そう言って朗らかな笑みを浮かべるさとりに、なぜかしばらく見とれてしまう%CALLNAME:MASTER%だった
				ELSE
					PRINTFORML 「危険日以外でも、子供が出来る可能性はあるんですよ。解っています？」
					PRINTFORMDL 解っていると答える%CALLNAME:MASTER%をしばしじっと見つめてから、溜め息を吐いた
					PRINTFORML 「解りました。主様のたっての願いなら、逆らえる余地はありませんし」
					PRINTFORMDL よしっ、と内心でガッツポーズを決めた瞬間、さとりがジト目で見つめてきた
					PRINTFORML 「……どうして、こんな人を恋人に選んでしまったのかしら」
					PRINTFORMDL そう言いながらも、身を任せてきた
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「そんなに言うなら、しかたありませんね……、ってわかりやすく嬉しがらないで下さい」
				PRINTFORMDL 内心で浮かべた笑いを覚られ、自然と冷や汗が浮かぶ
				PRINTFORML 「まったく、情けない人です」
				PRINTFORMDL そう言いながらも、どこか嬉しげな笑みを浮かべた
			ELSEIF 陥落状態() == 2
				PRINTFORML 「……どうぞ、御勝手に」
				PRINTFORMDL 忌々しげに唇を歪めて、さとりが頷きを返してきた
				PRINTFORML 「『意外に素直に認めた』？　単に、バカの相手に疲れただけです」
				PRINTFORMDL そう言いながらも、体から力を抜いて、受け入れる体勢になるさとりだった
			ELSE
				PRINTFORML 「はぁ、わかりました。後悔しても知りませんから」
				PRINTFORMDL そう言いながらも、口元にうっすらと笑みを浮かべた
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF GETBIT (CFLAG:1490,2)
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「……もう、しょうが無いですねー、主様との赤ちゃん、私も欲しいです」
				ELSE
					PRINTFORML 「だから……、はぁ、いいです。全く主様にも困ったものです」
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「もう、そんなに子作りしたいんですか、しょうが無い人です」
			ELSEIF 陥落状態() == 2
				PRINTFORML 「………………勝手にすればいいでしょう」
			ELSE
				PRINTFORML 「子供、何人欲しいですか？」
			ENDIF
			CLEARBIT CFLAG:1490,2
		ELSE
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「主様、そんなに私との赤ちゃん欲しいですか？」
					PRINTFORMDL さとりの問いかけに、当然だとうなずく%CALLNAME:MASTER%
					PRINTFORML 「……んー、主様らしくないですねー。単に生でＨしたいだけでしょう？」
					PRINTFORMDL ソレにも当然だと頷きを返す
					PRINTFORML 「……うふふ、そんな正直な主様には、ご褒美上げます。主様、子作りSEXしましょ？」
					PRINTFORMDL 甘えきったその声音に、凄艶を感じて、%CALLNAME:MASTER%は生唾を飲み込んだ
				ELSE
					PRINTFORML 「そんなに子供が欲しいんですか？」
					PRINTFORMDL さとりの子供なら可愛いだろう、そう考えると同時、さとりが嬉しげに頬を緩ませた
					PRINTFORML 「ふふ、主様に似て、良い子になると良いですね」
					PRINTFORMDL ……良い子はない、そう思いながらさとりを組み敷く
					PRINTFORML 「主様、はらませて、下さいな」
					PRINTFORMDL 欲情に濡れた瞳で囁くさとりの妖艶さに、生唾を飲み込んだ
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「ふふ、%CALLNAME:MASTER%との子供、うふふ、良いですよ」
				PRINTFORMDL 楽しげに笑いながら、さとりがこちらを見つめてくる
				PRINTFORML 「後悔だけは許しませんけどね」
				PRINTFORMDL 満面の笑みに、早まったような気がした
			ELSEIF 陥落状態() == 2
				PRINTFORML 「…………この、鬼畜」
				PRINTFORMDL なんとでも言え、そう思いながらのしかかる
				PRINTFORML 「最低、最悪、妖怪よりも悪辣なくせに……、……好きに、すれば」
				PRINTFORMDL 悔しげに呟きながら、体から力を抜いた
			ELSE
				PRINTFORML 「子作り、するんですね」
				PRINTFORMDL どこか楽しげに呟き、さとりが身を預けてきた
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K49_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;認められる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF !GETBIT(CFLAG:1490,4)
			IF 陥落状態() == 5
				PRINTFORML 「うふふ、主様のおそばに住める、すごく嬉しいです」
				PRINTFORMDL さとりの言葉に、というよりは、その満面を埋める笑みに、頷きを返す
				PRINTFORML 「主様主様主様」
				PRINTFORMDL ぎゅっと抱きついてきたさとりが、そのまま胸元にほおずりしてくる
				PRINTFORMW 「大好きです、主様、私の主様、私だけの主様」
				PRINTFORMDL 氷砂糖のように甘いさとりの声音に、地霊殿を放置するのはどうなんだと問いかけてみる
				PRINTFORML 「ふふ、時々顔を出しにはいきますけど、うちのペットは優秀ですから」
				PRINTFORML 「『おくうは』？　あの子はあの子なりに優秀ですよ。時々バカの真似して遊ぶくらいには」
				PRINTFORMDL さとりの言葉に、鳥頭っぷりを思い出して、ソレはないだろうと答える%CALLNAME:MASTER%
				PRINTFORMW 「うふふ、そーゆーことにしておきます」
				PRINTFORML 「それじゃ、これからよろしくお願いしますね。同居人達が嫉妬で狂うくらいＨしましょうね」
				PRINTFORMDW 朗らかなおねだりに、少し早まった様な気がする%CALLNAME:MASTER%だった
				PRINTFORML
			ELSE
				PRINTFORML 「ふふ、よかった。正直に言って断られると思っていました」
				PRINTFORMDL さとりの笑顔に、単なる気まぐれだと答える%CALLNAME:MASTER%
				PRINTFORMW 「ええ、それでも構いませんよ。でも、彼女が認めてくれるかは解りませんが」
				PRINTFORMDL %CALLNAME:拠点_大家%なら認めるに決まっていると思うと同時、さとりが楽しげな笑みを浮かべた
				IF 拠点_大家 == 1
					PRINTFORML 「言われてみればそうですね。私が側に居ても一切心構えをかえない数少ない人ですし」
					PRINTFORMDW そんなものは、霊夢くらいしかいないだろうと、内心でそんなことを思う
					PRINTFORML 「いえ、私の家族と……、\@ 陥落状態() == 4 ? 主様 # %CALLNAME:MASTER% \@がいます」
					PRINTFORMDL どうせバレているからこその開き直りをそう言われて、苦笑が浮かぶ
					PRINTFORML 「ふふ、普通は恐れて身を躱すものです。なにはともあれこれからよろしくお願いしますね」
					PRINTFORMDW そう言って優雅に一礼するさとりに、ただ頷きを返した
				ELSE
					IF TALENT:拠点_大家:恋慕
						PRINTFORML 「彼女も、\@ 陥落状態() == 4 ? 主様 # %CALLNAME:MASTER% \@を慕っていますし、当然ですね」
						PRINTFORMDL そう言いながら、どことなく不穏な雰囲気でじっと見つめてくるさとり
						PRINTFORML 「もっとも、私も引くつもりはありませんが」
						PRINTFORMDL そういった瞬間、顔を寄せてきたさとりが不意打ちの口づけを落としてきた
						PRINTFORML 「ふふ、これからよろしくお願いしますね、\@ 陥落状態() == 4 ? 主様 # %CALLNAME:MASTER% \@」
						PRINTFORMDL さとりの答えに頷きを返しつつ、%CALLNAME:拠点_大家%の不機嫌さを思って苦笑を浮かべた
					ELSE
						PRINTFORML 「本気で嫌がっていましたけどね。うふふ」
						PRINTFORMDL どことなく楽しげな様子に小首を傾げる%CALLNAME:MASTER%
						PRINTFORML 「覚妖怪を忌み嫌ってるのではなく、心を読まれるのがイヤな訳でもなく」
						PRINTFORML 「ただ単に、余計な住人が増えるのが面倒くさい、そう思われるのが楽しいんです」
						PRINTFORMDL %CALLNAME:拠点_大家%の苦虫をかみつぶした様な表情を思い出し、さとりの言葉に納得する
						PRINTFORMDL もっとも、さとりのような面白い人物が、嫌われているという現況には納得出来ない%CALLNAME:MASTER%だった
					ENDIF
				ENDIF
				PRINTFORML
			ENDIF
			SETBIT CFLAG:1490,4
		ELSE
			IF 陥落状態() == 5
				PRINTFORML 「主様、どうしてこんなにあっちに引っ越したりこっちに引っ越したりするんですか？」
				PRINTFORMDL さとりの問いかけに気まぐれだと答える%CALLNAME:MASTER%
				PRINTFORML 「おなじ気まぐれなら、地霊殿に引っ越して欲しいです」
				PRINTFORMDW 唇をとがらせるさとりに、こいし達も巻き込んで良いのかと問いかける
				PRINTFORML 「姉妹で同じ人を愛する、素敵ですし、ペットがご主人様の伴侶に甘えるのも素敵ですよ」
				PRINTFORMDW 以前なら、顔を真っ赤にして怒ったであろうさとりの言葉に小首をかしげる
				PRINTFORML 「主様が家族に時止めで手を出さず、私にも時止めでの玩弄をしてないからですよ」
				PRINTFORMW 「もし、家族に時止めで手を出したら、怒りますけどね」
				PRINTFORMDL
			ELSE
				PRINTFORML 「\@ 陥落状態() == 4 ? 主様 # %CALLNAME:MASTER% \@は、自由に動きすぎですね」
				PRINTFORMDL 広い洋館の一室から、わざわざこんなところに来ているさとりの言葉に苦笑が浮かぶ
				PRINTFORML 「『あそこの方が良い部屋だろう』？　%CALLNAME:MASTER%の側にいたいだけですけどね」
				PRINTFORMDW くすくすと笑うさとりに、許可を出したときの%CALLNAME:拠点_大家%のげんなりとした顔を思い出す
				PRINTFORML 「ああ、あれは私と\@ 陥落状態() == 4 ? 主様 # %CALLNAME:MASTER% \@がのろけるのを見たくなかったというだけですよ」
				IF TALENT:拠点_大家:恋慕
					PRINTFORML 「もっとも、そう言いたくなる気持ちは私もよくわかりますが」
				ELSEIF 拠点_大家 == 1
					PRINTFORML 「まあ、色恋には恬淡としている彼女らしいですが」
				ELSE
					PRINTFORML 「%CALLNAME:拠点_大家%に見せつけるのも良さそうですが」
				ENDIF
				PRINTFORML 「できれば、今後はおとなしくココで暮らすか、いっそ地底に来て欲しいところです」
				PRINTFORMDW さとりのその言葉に、%CALLNAME:MASTER%は考えておくと返した
			ENDIF
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF !GETBIT(CFLAG:1490,4)
			IF 陥落状態() == 5
				PRINTFORML 「主様のいぢわる。恋人なんですからいいじゃないですか」
				PRINTFORMDL さとりの言葉に、単なる気まぐれだと答える%CALLNAME:MASTER%
				PRINTFORML 「……私のこと、きらいになったんですか？」
				PRINTFORMDW 目尻に涙を溜めるさとりに、間髪入れずそれはないと答えを返す
				PRINTFORML 「……本当に、主様はイヂワルです」
				PRINTFORMDL 唇をとがらせて、そっぽを向いたさとりが、顔をあさっての方に向ける
				PRINTFORML 「ぬしさまの、ばか」
				PRINTFORMDW 甘えるような声音の咎める言葉に、返答は出来なかった
			ELSE
				PRINTFORML 「残念です、やはり\@ 陥落状態() == 4 ? 主様 # %CALLNAME:MASTER% \@も私のような化け物は身近に起きたくないのですね」
				PRINTFORMDL 化け物というならココに来るものは全員化け物だろうと、思わず内心で呟く
				PRINTFORMW 「その他の者からさえ忌まれていますけどね」
				PRINTFORMDL そう言って寂しげに笑うさとりの姿に、わざとらしく溜め息を吐く
				PRINTFORML 「『自虐するところが気にくわない』、…………\@ 陥落状態() == 4 ? 主様 # %CALLNAME:MASTER% \@に何が解るんです」
				PRINTFORMDW 抑えた声音で、それでも怒りを目に浮かべて見つめてくるさとり
				PRINTFORML 「私が、私達の存在がどれほど忌まれていたか知らないくせに」
				PRINTFORML 「見たくも無い闇を心に抱え、なのにそれを見るからと忌み嫌っているくせに」
				PRINTFORMW 「ついには目を閉ざすほど追い込まれるまでに、こいしを傷つけてきたくせに」
				PRINTFORML 「その痛みも苦しさも知らない\@ 陥落状態() == 4 ? 主様 # %CALLNAME:MASTER% \@に、自虐なんて言葉で片付けないで欲しい」
				PRINTFORMDL ならその連中のせいにすればいい、自虐なんてアホらしい、そう思いながら溜め息を吐く
				PRINTFORML 「…………そう、できれば、楽なんでしょうね」
				PRINTFORMDW 小さく呟いて、それから軽く頭を下げて出て行った
			ENDIF
		ELSE
			IF 陥落状態() == 5
				PRINTFORML 「なんで、今回はだめなんですか？」
				PRINTFORMDL ぎゅっと抱きついて上目遣いで見つめてくるさとり
				PRINTFORML 「『通い妻も良いだろう』？　……婿として妻問婚してくれるなら、いいですけどねー」
				PRINTFORMDW さとりの言葉に、それなりに地霊殿には通ってると返す%CALLNAME:MASTER%
				PRINTFORML 「……はー、ホント主様は勝手です」
				PRINTFORMDL 唇をとがらせるさとりに、強引に口づけする
				PRINTFORMW 「ちゅ、れろ……ちゅぱ…………れる……ぷはっ」
				PRINTFORML 「もー、キスなんかでごまかされないんですからね」
				PRINTFORMDW そう言いながらも嬉しそうな笑みを浮かべるさとりの頭を軽く撫でてやった
			ELSE
				PRINTFORML 「……以前はよくて今回はダメ、というのは正直納得できかねますね」
				PRINTFORMDL さとりがとがらせた唇に、軽くキスしてみる
				PRINTFORML 「ん……、こんなことでごまかしたつもりですか？」
				PRINTFORMDW たんに美味しそうだった、内心で答える%CALLNAME:MASTER%をさとりがジト目で見つめてくる
				PRINTFORML 「本当に勝手な人ですね、\@ 陥落状態() == 4 ? 主様 # %CALLNAME:MASTER% \@は」
				PRINTFORML 「『他にも来たがってる娘がいる』？　……はぁ、本当に困った人です」
				PRINTFORMDL そう呟きながら、さとりが口元を緩める
				IF 陥落状態() == 4
					PRINTFORM 「まあ、側妾に機会を与えるのも、正妻の努めではありますしね」
				ELSEIF TALENT:MASTER:恋人 != TARGET
					PRINTFORM 「側妾としては、正妻を立てるのが筋というものですしね」
				ELSE
					PRINTFORM 「まあ、%CALLNAME:MASTER%がそういう人だと言うことはわかっていますけど」
				ENDIF
				PRINTW
				PRINTFORML 「それでは失礼しますね」
				PRINTFORMDW 背中を向けて出て行くさとりを、何も言わずに見送った
			ENDIF
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K49_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		SIF CFLAG:うふふ
			PRINTFORMDL 少し慌てた様子で、さとりが体を離して、身繕いを整える
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(160)
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「もっと、一緒に居たいです」
				PRINTFORMDL しがみつきながら上目遣いでさとりが見つめてくる
				PRINTFORML 「でも、帰らないといけないのがツラいです」
				PRINTFORMDL ぐりぐりと押しつけてくる頭を軽く撫でてやる
				PRINTFORML 「たまには、主様の方から地霊殿に来てくださいね」
				PRINTFORMDL 不意に、唇を寄せてきたさとりが、そのまま背中を向けて歩き出した
			ELSE
				PRINTFORML 「主様、それでは私は帰りますね。……御側において欲しいところですけど」
				IF FLAG:住み込みキャラ
					PRINTFORMD もう離れが埋まっているんだからしょうがない
				ELSE
					PRINTFORMD 通い妻というのもいいだろう
				ENDIF
				PRINTFORMDL 。内心での呟きにさとりが恨みがましい視線を向けてくる
				PRINTFORML 「主様は、卑怯です。私が逆らえないのを良いことに」
				PRINTFORMDL 逆らえないのではなく逆らわないだけだろうに
				PRINTFORML 「ええ。ですが、そうやって嬲られるのも、あまり良い気分ではありません」
				PRINTFORMDL そう言いながら苦笑を浮かべるさとりを、しばし見つめた
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「ん、そろそろ帰らないといけませんね。出来れば、ずっと一緒に居たいですが」
			PRINTFORMDL さとりが名残惜しげに呟くのを、わざとらしく聞き流す
			PRINTFORML 「本当に、なんでこんな人に……」
			PRINTFORMDL 唇を尖らせたさとりに、なぜか苦笑が浮かんだ
		ELSEIF 陥落状態() == 2
			PRINTFORML 「さて、帰りましょうか。……あの子達の体調も確認しないと」
			PRINTFORMDL さとりの言葉に、時止めで嬲った体の味を思い出し、じろりと睨まれた
		ELSEIF 陥落状態() == 1
			PRINTFORML 「それでは、失礼しますね」
			PRINTFORMDL 柔らかな表情のさとりが軽く頭を下げて、離れていった
		ELSE
			PRINTFORML 「……失礼します」
			PRINTFORMDL 冷めた表情で口を開いたさとりが、静かに離れていった
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;デート中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		SIF CFLAG:うふふ
			PRINTFORMDL 少し慌てた様子で、さとりが体を離して、身繕いを整える
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(161)
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「むー、このまま時間が止まってくれたら良いのに」
				PRINTFORMDL さとりの言葉に自然と苦笑が浮かぶ
				PRINTFORML 「『止めても良いのか』？　良くないです。同じ時間を%CALLNAME:MASTER%と過ごしたいだけですから」
				PRINTFORMDL そう言いながら、さとりがぎゅっと抱きついてきた
				PRINTFORML 「名残惜しいけど、しょうが無いですから。主様、大好きです」
				PRINTFORMDL ちゅっ、と頬に唇を寄せてきたさとりが、背中を向けた
			ELSE
				PRINTFORML 「もうしわけありません、主様。そろそろ帰る時間ですので」
				PRINTFORMDL 小さく呟いて、さとりが名残惜しげに見つめてくる
				PRINTFORML 「本当はもっと一緒に居たいんですけどね」
				PRINTFORMDL そう呟いたさとりが顔を寄せてきて、唇を重ねてきた
				PRINTFORML 「愛しています主様。それでは失礼しますね」
				PRINTFORMDL さとりが去って行くのを、所在なくただ見送った
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「ごめんなさい。そろそろ帰る時間ですから」
			PRINTFORMDL すっと離れたさとりが、申し訳なさそうに頭を下げてくる
			PRINTFORML 「『ついでだから送ってやる』？　ふふ、嬉しいですけど、遠いですから」
			PRINTFORMDL ソレだけを言葉にして、さとりが背中を向けて歩き出した
		ELSEIF 陥落状態() == 2
			PRINTFORML 「……帰らせて貰います」
			PRINTFORMDL ソレだけを口にして、さとりが背中を向けてきた
		ELSEIF 陥落状態() == 1
			PRINTFORML 「ふふ、ごめんなさい、そろそろ帰る時間ですので」
			PRINTFORMDL さとりが軽く頭をさげてから歩き出した
		ELSE
			PRINTFORML 「……失礼します」
			PRINTFORMDL ソレだけを言葉にして、さとりが背を向けて歩いて行った
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;玄関先でお見送り
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(162)
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「主様、今日はこのままずっと居てくれます？」
				PRINTFORMDL さとりの問いかけにどうしようかと考える%CALLNAME:MASTER%
				PRINTFORML 「デートは終わりですけど、主様が居たいなら居ても良いですよ？」
				PRINTFORMDL そう言いながら、ぎゅっと服の裾を掴んで離さないさとり
				PRINTFORML 「『本当は居て欲しいのか』？　はい、そうですよ。でも、そう言っても主様は気まぐれですから」
				PRINTFORMDL 唇をとがらせるさとりに、もう少し居るのも良いかもしれないと思う%CALLNAME:MASTER%だった
			ELSE
				PRINTFORML 「主様、残念ですけど、逢い引きの時間は終わりです」
				PRINTFORMDL 地霊殿の一室でくつろいでいる%CALLNAME:MASTER%に、心底残念そうにさとりが呟く
				PRINTFORML 「まあ、もうしばらくならいてもかまいませんが」
				PRINTFORMDL 一緒にいるのとデートの違いはどこにあると、内心で問いかける%CALLNAME:MASTER%
				PRINTFORML 「……ふふ、さあ、どこにあるんでしょうね？」
				PRINTFORMDL くすくすと笑うさとりに、自然と苦笑が浮かんだ
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「はい、デートはここまでです。ふふ、今日も楽しかったですよ」
			PRINTFORMDL まだ一緒にいるのに、デートは終わりだとのたまうさとりに苦笑が浮かぶ
			PRINTFORML 「あら、こういうことはきちんと区切りをつけないと面白くないんですよ」
			PRINTFORMDL そういいながら、するりとさとりが身を離した
		ELSEIF 陥落状態() == 2
			PRINTFORML 「はぁ、やっとおわりですね、さっさと帰ってください」
			PRINTFORMDL 心底イヤそうに呟くさとりに、こいしやお燐おくうを探すそぶりを見せる
			PRINTFORML 「…………そんなに死にたいんですか？」
			PRINTFORMDL ぞっとするほど冷たい声音に、それでも内心で舌を出した
		ELSEIF 陥落状態() == 1
			PRINTFORML 「今日はここまでですね、ありがとうございました」
			PRINTFORMDL 楽しげに笑うさとりに、デートは終わりでも居座ろうと%CALLNAME:MASTER%は決めた
		ELSE
			PRINTFORML 「……はい、おわりです。帰ってください」
			PRINTFORMDL どことなく投げやりなさとりに、時間まで居座ろうと決める%CALLNAME:MASTER%だった
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K49_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(170)
		ELSEIF GETBIT(CFLAG:1490,0)
			PRINTFORML 「ごめんなさい」
			PRINTFORMDL 家族への謝罪を呟きながら、さとりは目頭を押さえる
			PRINTFORML 「……大事な家族を汚した相手に、想いを懸けてしまって、ごめんなさい」
			PRINTFORMDL その言葉と共に、ぽつぽつと涙をこぼした
		ELSE
			PRINTFORML 「もう、ダメですね」
			PRINTFORMDL 小さく呟いたさとりが、自分の胸元に手を当てる
			PRINTFORML 「恋い慕う、という感情が、こんなに心地いいなんて……」
			PRINTFORMDL 呟くさとりの瞳は、熱情に染まっている
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(171)
		ELSEIF GETBIT(CFLAG:1490,0)
			PRINTFORML 「……こんなのは、気の迷い。気の迷いなんです」
			PRINTFORMDL 呟きながら、さとりは小さく溜め息を吐く
			PRINTFORML 「大事な家族に卑劣な手段で近づく者が許せないだけです」
		ELSE
			PRINTFORML 「はぁ……、まさか私がこのような感情を持つなんて」
			PRINTFORMDL さとりにとって、それは青天の霹靂だった
			PRINTFORML 「……あんなよこしまな欲望の持ち主なのに」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(172)
		ELSE
			PRINTFORML 「熱い、あついんです。でも、%CALLNAME:MASTER%じゃないと足りないんです」
			PRINTFORMDL 涙をこぼし、必死に体中を弄りながら、呟くさとり
			PRINTFORML 「もう、こんなのおかしくなってしまいます」
			PRINTFORMDL ぐちゅぬじゅと卑猥な音を鳴らし、ぼたぼたと涎を垂らし、さとりは喘いでいる
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(173)
		ELSE
			PRINTFORML 「……んくっ、こんなの、あんっ、こんなのぉ」
			PRINTFORMDL 欲情に浮かされたさとりが、ぴくびくと自慰に耽りながら吐息を漏らす
			PRINTFORML 「もう、だめ……、あの人のものに、なりたい」
			PRINTFORML
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;セフレ取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(174)
		ELSEIF GETBIT(CFLAG:1490,0)
			PRINTFORML （……ん、なんで、あんな人の事なんて）
			PRINTFORMDL 小さく呟きながら、自らを慰めるさとり
			PRINTFORML （……こんなのだめ、なのに、もう抗えません……）
		ELSE
			PRINTFORML 「はぁはぁ、ん……」
			PRINTFORMDL 甘い吐息を漏らし、さとりは自慰に耽る
			PRINTFORML 「……からだだけの関係も、いいの、かも」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K49_22(ARG,ARG:1)
;口上主はARG
;ARG:0に自慰状況
;ARG:1に自慰種類
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;SIF ARG == 7
		;RETURN 1
	;さとりん特殊
	;酔っ払いモード
	IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
		CALL DRUNKER49(180)
		RETURN 1
	;遠距離通話自慰、前振り
	ELSEIF !RAND:5 && GETBIT(CFLAG:1490,5) && GET_MAPID(CFLAG:MASTER:現在位置) != 9
		LOCAL:2 ++
		IF FIRSTTIME("自慰実況")
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 『主様、聞こえてますよね？　主様のおねだり通り、オナニー実況の時間ですよ』
					PRINTFORML 『「……」、嬉しいですよ？　主様のＨな声も聞けますし』
					PRINTFORML 『まさか、自分はしない、なんて言わないですよね』
					PRINTFORML 『うふふ、それじゃテレホンセックスしましょ？』
				ELSE
					PRINTFORML 『主様、主様、聞こえていますか？』
					PRINTFORML 『「……」、はい、主様の声が聞こえています』
					PRINTFORML 『本当に、こんな道具があるんですね。あの、主様急に黙らないでください』
					PRINTFORML 『さすがに、これだけの距離があると、”声”は聞こえませんので』
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 『これでいいのかしら？　聞こえていますか？』
				PRINTFORML 『「…………」、本当に会話出来るのですね』
				PRINTFORML 『%CALLNAME:MASTER%の”声”が聞こえないのは難点ですが』
			ELSEIF 陥落状態() == 2
				PRINTFORML 『はぁ、なんでこんなことを。気持ち悪い』
				PRINTFORML 『「……」、聞かせているのですよ。本当に気持ち悪い』
				PRINTFORML 『%CALLNAME:MASTER%の悦に入る”声”を聞かないで済むのだけは救いですが』
			ELSEIF 陥落状態() == 1
				PRINTFORML 『これで届いていますか？　「……」、はい、本当に聞こえるんですね』
				PRINTFORML 『”声”を聞けないのは、少し気になりますが』
			ELSE
				PRINTFORML 『聞こえていますか？』
				PRINTFORML 『「……」、”声”が聞けないというのは、新鮮ですね』
			ENDIF
		ELSE
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 『ふふ、それじゃ、Ｈしましょうね？』
					PRINTFORML 『「…………」、疑似SEXでも主様の声音で、気持ちよくなってるのがわかりますから』
					PRINTFORML 『”声”が聞こえないのは、ちょっと恐いですけどね』
					PRINTFORML 『でも、主様は、気まぐれは起こしても嘘だけはつかないですもの』
					PRINTFORML 『一緒に気持ちよくなりましょ』
				ELSE
					PRINTFORML 『主様、主様、聞こえていますか？』
					PRINTFORML 『主様のお望みの、オナニー実況の時間ですよ』
					PRINTFORML 『「……」、ノリノリにもなります。だって、”声”が聞けないんですよ』
					PRINTFORML 『でも、次にあった時、主様も気持ちよくなってくれているとわかるんですから』
					PRINTFORML 『これで、ハマらないわけがないじゃないですか』
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 『聞こえていますか？　%CALLNAME:MASTER%の大好きな時間ですよ』
				PRINTFORML 『「……」、ふふ、嬉しそうな声音ですね。音で感情を感じるというのも素敵です』
				PRINTFORML 『本当に、面白い道具があるものです』
			ELSEIF 陥落状態() == 2
				PRINTFORML 『不愉快です、本当に不愉快です』
				PRINTFORML 『「…………」、%CALLNAME:MASTER%がしろとせっついたんでしょう』
				PRINTFORML 『本当に、不愉快です』
			ELSEIF 陥落状態() == 1
				PRINTFORML 『届いていますか？　「……」、それはよかった。それでは始めますね』
				PRINTFORML 『「……」、ええ、楽しいですよ。”声”が聞けないのに意向はつたえてもらえるんですから』
			ELSE
				PRINTFORML 『届いていますか？　「……」、はい、そうです』
				PRINTFORML 『「……」、いえ、楽しんでません。これは無理矢理させられているだけですから』
			ENDIF
		ENDIF
		PRINTFORML …………
		PRINTFORML 『それでは始めますね』
		PRINTW
	ENDIF
	;-------------------------------------------------
	;通常自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		$オナニー
		IF LOCAL:2
			IF 陥落状態() >= 4
				PRINTFORML 『ん、んぅ、「……」、は、はい。ぬしさまにされてるの、っ、そうぞう、して』
				PRINTFORML 『はぁ、はふっ、んくっ、おっぱいなで、て、おまん、こ、くちゅ、くちゅしてふぁっ！』
				PRINTFORML 『「……」、へんたい、《ぬちゅくちゅ、ちゅぽちゅぽちゅぽ、ぬちゅじゅちゅ》』
				PRINTFORML 『おまんこ、かきまわすおと、そんなに、い、っっ！　い、ですか』
				PRINTFORML 『「…………」、ふぁんっ！　や、かわいいって、そんな、そんな、あふっ！？　や、うそ、もう！』
				PRINTFORML 『イク、イキます、ぬしさま、ぬしさま、ぬしさまぁっ！　んっんっ、ふぁああああっっっっっ！！』
				PRINTFORML 『はぁ、はぁ、はぁ～～～～、「……」、可愛い声って、言わないでください。「……」、はい、お休みなさい』
			ELSEIF 陥落状態() == 3
				PRINTFORML 『はふ、んくっ、「……」、はい、きもちいいです。%CALLNAME:MASTER%に、して、ほしいです、けど』
				PRINTFORML 『「……」、ん、むねをもんで、ふぁっ！　ちくび、さわってます。んくっ、その、したもいっしょに』
				PRINTFORML 『「……」、お、おま、おまんこ、いじって、やぁ、はずかしい、です』
				PRINTFORML 『みえないのに、みえないから、よけいはずかし、ふぁんっ！　んっ、んっっ、んぅっっっ！！』
				PRINTFORML 『はぁ、はぁ、はふ。「……」、はい、イキました。%CALLNAME:MASTER%は楽しかったですか？』
				PRINTFORML 『「……」、そう、ですか、それはよかったですね、「……」、はい、お休みなさい』
			ELSEIF 陥落状態() == 2
				PRINTFORML 『ふぅ、ふぅ、くっ、んっ。「……」、%CALLNAME:MASTER%に、聞かせる、声なんか』
				PRINTFORML 『「……」、この、卑怯者。ふぁ、あふっ、んくっひんっ！』
				PRINTFORML 『んっんっ、んぅっ！　「……」、くっ、この変態っ！　いまは、胸、触ってるだけです』
				PRINTFORML 『「……」、下は、今から、っっ！　やっ！？　嘘！？　ふぁああああっっっっっ！！』
				PRINTFORML 『はぁはぁ、ふぅ。「……」、もう終わりで、悪かった、ですね』
				PRINTFORML 『「……」、！？　ここ、昂奮なんてしてませんっ！　もう知りませんっっ！！』
			ELSEIF 陥落状態() == 1
				PRINTFORML 『はぁはぁ、気持ちいい、ですよ。「……」、胸と秘所を、触ってます』
				PRINTFORML 『んっんっんぅ、はぁ、気持ちいい。「……」、はい、出来れば、%CALLNAME:MASTER%に、触って欲し、いです』
				PRINTFORML 『「……」、%CALLNAME:MASTER%の、言うとおり、うごかしたら、ふぁんっ！　これ、凄い』
				PRINTFORML 『あ、あ、ああっっ！　うそ、もう、もうっ！　あひ、んきゅぅっっっ！！』
				PRINTFORML 『はぁ、はぁ、はぁ～～、気持ちよかったぁ。「……」、ふふ、それじゃ、お休みなさい』
			ELSE
				PRINTFORML 『はふ、んくっ、はぁ、気持ちいいです、けど、不安に、なります』
				PRINTFORML 『「……」、声が届くのに、”声”が、聞こえない、のは、んっ、ふぁっ！』
				PRINTFORML 『んっんっんぅ、～～～～～～っっっっ！！　「……」、は、い、イキました』
				PRINTFORML 『「……」、楽し、かった、ですか、では、お休み、なさい』
			ENDIF
		ELSE
			IF 陥落状態() >= 4
				PRINTFORML 「はぁはぁ……ん……あふ……」
				PRINTFORMDL ちゅくぬちゅと、部屋の中に粘着音が響く
				PRINTFORML 「主様、ぬしさまぁ……、もっと、もっとしてほしいです……」
				PRINTFORMDL 涎と愛蜜を垂れ流し、喜悦の涙を浮かべて、自慰を続けるさとり
				PRINTFORML 「ぬしさまぁ、もっと、もっとぉ」
				PRINTFORMDL 甘い啼き声を上げるさとりの自慰は、終わりそうにない
			ELSEIF 陥落状態() == 3
				PRINTFORML 「あふ、んくぅ……、はぁ、は、あ……もっと」
				PRINTFORMDL 自身の体をいじくり回すさとりがぽつりと呟く
				PRINTFORML 「もっと、してほしい……、なんて……ふぁんっ……」
				PRINTFORMDL 熱い吐息を漏らしながら、さとりは自慰を続ける
			ELSEIF 陥落状態() == 2
				PRINTFORML 「っっ！　んっっっ！　～～～～～っっっっ！！」
				PRINTFORMDL びくんと、全身を痙攣させて上り詰めるさとり
				PRINTFORML 「……どうして、どうしてこんな、……あんな人のことなんて」
				PRINTFORMDL 愛蜜に濡れた指先を見つめて、さとりがほろほろと涙をこぼし始めた
			ELSEIF 陥落状態() == 1
				PRINTFORML 「はぁはぁ、んっあふ……、ふぁんっ」
				PRINTFORMDL さとりの吐息と指の動きは、止まりそうにない
			ELSE
				PRINTFORML 「んっ……ふぅ……あふ……」
				PRINTFORMDL 戸惑うようにおずおずと、さとりが自らを慰めている
			ENDIF
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同室時自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF 陥落状態() >= 4
			PRINTFORML 「はぁはぁ、んっ、ぬしさま、ぬしさまぁ……」
			PRINTFORMDL 押し殺した声と、ちゅくちゅくという音に、昂奮を覚える%CALLNAME:MASTER%
			PRINTFORML 「だめ、なのに、となりに、いるのに……」
			PRINTFORMDL きゅっと捕まれる手の感触に、さとりの快感が伝わってくる
			PRINTFORML 「っ、っっ、んぅ…………、はぁ…………、ぬしさま、なんでおそってくれないんですか……」
			PRINTFORMDL 呟いて唇を押しつけてくるさとりを抱きしめて、そのままもう一度眠る%CALLNAME:MASTER%だった
		ELSEIF 陥落状態() == 3
			PRINTFORML 「んっんっ、こんなこと、だめ、なのに……、んぅっ！？」
			PRINTFORMDL 甘ったるいさとりの声に、一瞬、握られた手に力を込めて可愛いと内心で呟いてしまう
			PRINTFORML 「ひぅっ！　や、だめ、みないで、みないでください、っっ！　ひああっっっ！！」
			PRINTFORMDL ビクビクと痙攣しながら絶頂するさとりを抱きしめ、そのまま強引にもう一度眠りについた
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;中だし精液自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF LOCAL:2
			IF 陥落状態() >= 4
				PRINTFORML 『おとを、きかせろ？　はい、ぬしさま』
				PRINTFORML 『《じゅぷぬぽちゅぷぐちゅ》　「……」、ぬしさまの、せーえきの、せいで、っ、すから』
				PRINTFORML 『ぬしさまの、せーえき、あふ、きもちいーです』
				PRINTFORML 『ん、ん、んぅっ、やあイキます、ぬしさまのせーえきでいってしまいます』
				PRINTFORML 『んっ、～～～～～～っっっっ！！　は－、はー、きもち、良かったぁ』
				PRINTFORML 『ふふ、それじゃおやすみなさい、ぬしさま』
			ELSEIF 陥落状態() == 3
				PRINTFORML 『「……」、ぐちゅぐちゅって、おと、きこえます？』
				PRINTFORML 『%CALLNAME:MASTER%の、せいえき、ですよ。んっふぅ』
				PRINTFORML 『せいえき、おまんこに、ぬり、はふ、こむの、いいです』
				PRINTFORML 『「……」、そんなへんたいに、したのは、%CALLNAME:MASTER%、でしょう、んくっ』
				PRINTFORML 『ふーふー、これ、もう、だめです、これ、これ、んくぅっっっ！！』
				PRINTFORML 『はぁ、はぁ、「……」、きかれてると、おもうと、すぐにおわって、「……」、はいお休みなさい』
			ELSEIF 陥落状態() == 1
				PRINTFORML 『んっんっ、んんぅっっ！！　はぁ、精液、きもちいいです』
				PRINTFORML 『んぅ、イキます、精液でぬちゅぬちゅしながら、イキます、ひぅんっっっっ！！』
				PRINTFORML 『はぁ、はぁ、ふぅ、「……」、%CALLNAME:MASTER%が、中に出すから、です』
			ENDIF
		ELSE
			IF 陥落状態() >= 4
				PRINTFORML 「んっ、主様、主様ぁ、精液気持ちいいです、んく、気持ちいいんです」
				PRINTFORMDL にゅちゅぐちゅと、精液と愛蜜の混合物を必死に膣壁にこすりつけるさとり
				PRINTFORML 「でも、これじゃ、んくっ、足りない、です。あふ、足りないんです」
				PRINTFORMDL 必死に膣腔をかき混ぜながら、熱い吐息を漏らすさとり
				PRINTFORML 「欲しいです、主様、もっと、もっと精液呑ませて欲しいです」
				PRINTFORMDL 届きもしないおねだりを繰り返すさとりの指は、止まりそうにない
			ELSEIF 陥落状態() == 3
				PRINTFORML 「はぁはぁ、んっ、精液、きもちいい……、はふ、んくっ」
				PRINTFORMDL ぐちぐちと股間から卑猥な音を立てながら、さとりが秘所を弄っている
				PRINTFORML 「はふ、…………れろ、おいしい……、はぁ、あの人も、もっと、出してくれれば、いいのに」
				PRINTFORMDL うっとりした表情のさとりは、精液と愛蜜の混合液が絡む指を舐めしゃぶっている
			ELSEIF 陥落状態() == 1
				PRINTFORML 「はぁはぁ、んっ、精液、きもちいい、もっと、もっと欲しい、はふっ」
				PRINTFORMDL 精液と愛蜜を混ぜ合わせるさとりの指は、動きを止めそうにない
			ENDIF
		ENDIF
		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 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;-------------------------------------------------
		;Ｃ敏感orＣ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			GOTO オナニー
			IF LOCAL:2
				IF 陥落状態() >= 4
				ELSEIF 陥落状態() == 3
				ELSEIF 陥落状態() == 2
				ELSEIF 陥落状態() == 1
				ELSE
				ENDIF
			ELSE
				IF 陥落状態() >= 4
				ELSEIF 陥落状態() == 3
				ELSEIF 陥落状態() == 2
				ELSEIF 陥落状態() == 1
				ELSE
				ENDIF
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｖ敏感orＶ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			GOTO オナニー
			IF LOCAL:2
				IF 陥落状態() >= 4
				ELSEIF 陥落状態() == 3
				ELSEIF 陥落状態() == 2
				ELSEIF 陥落状態() == 1
				ELSE
				ENDIF
			ELSE
				IF 陥落状態() >= 4
				ELSEIF 陥落状態() == 3
				ELSEIF 陥落状態() == 2
				ELSEIF 陥落状態() == 1
				ELSE
				ENDIF
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ａ敏感orＡ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			IF LOCAL:2
				IF 陥落状態() >= 4
					PRINTFORML 『「……」、おしり、おしりのあな、ぬぽぬぽしてます』
					PRINTFORML 『ひぁんっ！　いい、です、これ！　しりあな、いいですっ！！』
					PRINTFORML 『「……」、ぬしさ、ま、がっ！　ぬしさまがっ、わたしをこんなへんたいにしたんです！』
					PRINTFORML 『んきゅっ、しりあな、いい、ふぁっ、しりあないいです、ぬぽくぽするの、いいですっっ！！』
					PRINTFORML 『あ、きます、おっきいのきます！　「……」、はい、はい、きいて、っっ、ください！』
					PRINTFORML 『ぬしさま、ぬしさま、ぬしさまぁ、ひっ、ぁ、ああああああああっっっっっっ！！』
					PRINTFORML 『はー、はー、「……」、はい、しりあな、でイキました』
					PRINTFORML 『「……」、こんどあったときは、しりあな、いぢめて、くださいね、おやすみ、なさい』
				ELSEIF 陥落状態() == 3
					PRINTFORML 『はぁはぁ、これ、いいです、きもち、いいですっ！』
					PRINTFORML 『「……」、おし、おしり、です、んくっ、ふぁっ！』
					PRINTFORML 『「……」、この、へんたい。しりあな、いい、です、んくっ、はふっ！』
					PRINTFORML 『ぬぽぬぽ、いいです、これきもち、いいんですっ！！』
					PRINTFORML 『んっ、ふぁっ！　あんっあんっ、ああああっっっっっっ！！！』
					PRINTFORML 『はぁ、はぁ、ん、はぁ、「……」、は、い。イキました、しりあなで、いきましたぁ』
					PRINTFORML 『こんなへんたいにして、たのしいですか？　「……」、ふふ、うれしいです、それではおやすみなさい』
				ELSEIF 陥落状態() == 2
					PRINTFORML 『ん、くっ、ふぅ。「……」、うるさい、っ、ですね、どうして、せつめい、んくっ』
					PRINTFORML 『「……」、この、卑怯、者。おしりを、触って、ふっ、ます』
					PRINTFORML 『「……」、そうっ！　させたのは、%CALLNAME:MASTER%、でしょう。くぅっ』
					PRINTFORML 『ふぁ、んきゅっ！　あひんっ！　「……」、うるさい、うるさいうるさいうるさいっっ！！』
					PRINTFORML 『あふ、んくっ、んっんっんっ、～～～～～～～～～～～～～～～～～っっ！！』
					PRINTFORML 『「……」、うるさい、黙りなさい。「……」、この、変態』
				ELSEIF 陥落状態() == 1
					PRINTFORML 『ふぁんっ、あひんっ、んくぅっ！　お尻、きもち、良い、んくっ！』
					PRINTFORML 『ん、ふぁっ、ひんっ！　「……」、こうさせたのは、%CALLNAME:MASTER%、です』
					PRINTFORML 『あひっ、ふぁっ！　ひぁんっ！！　や、おしり、イク、おしりイク』
					PRINTFORML 『あっあっああっっ、ひぁあああああああっっっっ！！』
					PRINTFORML 『はぁ、ふぅ、ふぅ、ん、「……」、はい、きもちよかった、です。それではお休みなさい』
				ELSE
					PRINTFORML 『ふぁ、んくっ、これ、きもちいい、です』
					PRINTFORML 『「……」　はい、お尻、です。お尻、いじって、んっ、気持ちよく』
					PRINTFORML 『あふ、んくっ、ひんっっ！　あ、イク、イキます、ふぁあっっ！！』
					PRINTFORML 『はぁはぁ、ん、「……」、きもち、良かったです。それでは、失礼しますね』
				ENDIF
			ELSE
				IF 陥落状態() >= 4
					PRINTFORML 「ん、ぬしさまぁ、ぬしさまもっとぉ……」
					PRINTFORMDL 喜悦の涙を浮かべながら、雌猫の姿勢で尻穴を掻き回すさとり
					PRINTFORML 「ぬしさまのおちんちんほしいです、おしりのあなに、いれてほしいです」
					PRINTFORMDL はしたないおねだりをしながら、腰を揺らし、ぬぽぬぷと尻穴に指を出し入れする
					PRINTFORML 「んっ、いきます、ぬしさま、ぬしさまぁっ！」
					PRINTFORMDL 腰を後ろに突き出しながら上り詰めるさとり、だが、四肢を痙攣させながらもまた手を動かし始めた
				ELSEIF 陥落状態() == 3
					PRINTFORML 「んっんっ、くぅっ、おしり、きもちいい……」
					PRINTFORMDL 蕩けるような表情で、アナルに銜え込んだ指を動かすさとり
					PRINTFORML 「ん、イク、イキます、んっんっんぅっ！」
					PRINTFORMDL ビクビクと体を震わせるさとりだが、まだ物足りないのか指を動かし始めた
				ELSEIF 陥落状態() == 2
					PRINTFORML 「くぅ、こんな、こんなこと、だめ、なのに」
					PRINTFORMDL 屈辱に頬を火照らせながらも、さとりがアヌスを掻き回している
					PRINTFORML 「あの人が、わるいん、だか、ら、私は、私は、んぅっっ！！」
					PRINTFORMDL びくりと、大きく震えたさとりは、もう一度指を動かし始めた
				ELSEIF 陥落状態() == 1
					PRINTFORML 「はぁはぁ、おしりいい、おしりいい、おしりいいですっ、っっ！！」
					PRINTFORMDL アナルを掻き回してたさとりが不意に体を強張らせ、一拍おいてまた指を動かしはじめた
				ELSE
					PRINTFORML 「んっんっんっ、こんな、こんな不浄な、ところで、んっんっんぅっ」
					PRINTFORMDL 尻穴に指を突き入れて自慰にふけるさとり、その手の動きは止まりそうにない
				ENDIF
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｂ敏感orＢ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			IF LOCAL:2
				IF 陥落状態() >= 4
					PRINTFORML 『んっ、はふ、これ、きもち、いいです。「……」、はい、おっぱい、いじっ、てます』
					PRINTFORML 『「……」、はい、おっぱい、だけ、です』
					PRINTFORML 『あんっ！　も、もんでる、だけで、おっぱい、おくあつくっ！　んくっっ！！』
					PRINTFORML 『「……」、は、はい、あ、あんっ！　ぬしさま、ちくび、すごい、ですっ』
					PRINTFORML 『あひっ、んくっっ！　これ、これぇっ！！　ふぁああ！　や、くる、すごいのきますっ！！』
					PRINTFORML 『あっ、あっ、ああああっっっ！！　はぁ、はぁ』
					PRINTFORML 『「……」、はい、きもち、よかった、です。ぬしさま、すみません』
					PRINTFORML 『たいりょく、げんかい、きゅぅ』
				ELSEIF 陥落状態() == 3
					PRINTFORML 『んっ、んっっ、んぅっっっ！　「……」、すみ、ません、きもちよくてつい』
					PRINTFORML 『いまは、おっぱいを、さわって、んくっ！　はぁ、ふぅ、おっぱいを、さわってます』
					PRINTFORML 『「……」、は、い。おっぱい、もみもみして、ます。これ。からだあつく』
					PRINTFORML 『「……」、え？　は、はい、んきゅうぅっっ！！　や、これ、むりちくびむりっ！』
					PRINTFORML 『や、でも、とめられない、とまらない、んっんっっ、ひぅ、くぅんっっっっっ！！』
					PRINTFORML 『「……」、は、い、いきま、した、もう、むり、おやすみなさい』
				ELSEIF 陥落状態() == 2
					PRINTFORML 『ふぅ、ふぅ、「……」、くっ、この変態。いまは、胸を触っ、っ、てます』
					PRINTFORML 『包むよ、うに、はふ、もんで、んっ』
					PRINTFORML 『「……」、嫌、です。ふざけ、ないでくだ、さい。んくっ』
					PRINTFORML 『「……」、こ、の、ひきょう、もの。あん、ひぁっ、んきゅっ』
					PRINTFORML 『乳首、さわって、ます、これ、これっ！　んっんっんくぅっっっ！！』
					PRINTFORML 『はぁはぁ、ふぅ、「……」、だまり、なさい』
				ELSEIF 陥落状態() == 1
					PRINTFORML 『ん、ふぁっ！　胸、触るの、んっ、きもちいい』
					PRINTFORML 『「……」、はい、ふぁんっ！　あひんっ！　んきゅっ、はふっ！』
					PRINTFORML 『きもちいい、です、胸もむの、乳首、つまむの、きもち、いいっっ！』
					PRINTFORML 『「……」、は、はい、イキます、イキます！　んっんっ、んぅ、ふぁああっっっっ！！』
					PRINTFORML 『はーはー、気持ちよかった、です。また、しましょうね』
				ELSE
					PRINTFORML 『はふ、んくっ、ふぁっ。「……」、可愛い声と、言われるのは、照れますね』
					PRINTFORML 『んっ、あんっ！　ひぁっっ！　乳首、気持ち、いいです、んくっっ！』
					PRINTFORML 『あんっ、あんっ、ひあんっっ！　イク、イキます！　あひんっっっっ！！』
					PRINTFORML 『はぁ、はぁ、「……」、そうですか、良かったですね。では失礼します』
				ENDIF
			ELSE
				IF 陥落状態() >= 4
					PRINTFORML 「はー、はー、主様、ぬしさまぁ、おっぱい、もっと、もっとしてください」
					PRINTFORMDL 甘ったるい声を上げながら、さとりが自身の乳房を揉みしだいている
					PRINTFORML 「ぬしさまのせーで、こんなＨなおちちになったんですからぁ」
					PRINTFORMDL 蕩けきった表情で、やわやわと乳房を弄るさとり
					PRINTFORML 「んっっちくび、ちくびっ、……ひぁあああっっっ！！」
					PRINTFORMDL きゅっと、乳首をつまんだ瞬間、さとりは大きくのけぞる、が、手の動きは止まらない
				ELSEIF 陥落状態() == 3
					PRINTFORML 「あふ、んく、ふぁん……、はぁ、はぁ、んくっ」
					PRINTFORMDL やわやわと乳房を揉み、時折乳首を指でこする度、さとりがびくんと肩を震わせる
					PRINTFORML 「ん、んっ、んぅっっ…………、はぁ、はぁ、もっと……」
					PRINTFORMDL 一瞬身を強張らせたさとりが、それでもさらに手の動きを早めていく
				ELSEIF 陥落状態() == 2
					PRINTFORML 「ちがう、のに、こんなの、んっ！　したく、ない、のに、ふぁっ」
					PRINTFORMDL やわやわと乳房を揉みながら、さとりが屈辱と悦楽がない交ぜになった表情を浮かべている
					PRINTFORML 「ふぁっ！　んっ！　あの人のせい、ふぁん、あの人がわる、っ、いんだか、らっ！！」
					PRINTFORMDL 乳首をつまみながら上り詰めたさとりだが、その手は全く動きを止めない
				ELSEIF 陥落状態() == 1
					PRINTFORML 「んぅ……、胸、きもちいい……あふ、んくぅ、はふ、んくっ、はぁはぁ、んっ！」
					PRINTFORMDL 一瞬小さく肩を震わせ、息を整えるさとりだが、一拍おいてまた指を動かし始めた
				ELSE
					PRINTFORML 「はぁはぁ、なんで、こんなこと、んっんっんっ！」
					PRINTFORMDL 恥ずかしげに頬を染めながら、さとりは乳房をいらっている
				ENDIF
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部位指定無し
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 5
			PRINTFORML
			RETURN 1
		ENDIF
		;その他
		;上の分岐を一切書かずに、ここに書くことで陥落素質あり自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;-------------------------------------------------
		;尻穴膣腔同時
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			GOTO オナニー
			IF LOCAL:2
				IF 陥落状態() >= 4
				ELSEIF 陥落状態() == 3
				ELSEIF 陥落状態() == 2
				ELSEIF 陥落状態() == 1
				ELSE
				ENDIF
			ELSE
				IF 陥落状態() >= 4
				ELSEIF 陥落状態() == 3
				ELSEIF 陥落状態() == 2
				ELSEIF 陥落状態() == 1
				ELSE
				ENDIF
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;膣腔のみ
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			GOTO オナニー
			IF LOCAL:2
				IF 陥落状態() >= 4
				ELSEIF 陥落状態() == 3
				ELSEIF 陥落状態() == 2
				ELSEIF 陥落状態() == 1
				ELSE
				ENDIF
			ELSE
				IF 陥落状態() >= 4
				ELSEIF 陥落状態() == 3
				ELSEIF 陥落状態() == 2
				ELSEIF 陥落状態() == 1
				ELSE
				ENDIF
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;その他
		;上の分岐を一切書かずに、ここに書くことで自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;我慢
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		IF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「……はぁ、ふぅ……主様、主様ぁ」
				PRINTFORML 「ほしーです、主様」
				PRINTFORML 「う゛ー、明日、行きますからね」
			ELSE
				PRINTFORML 「はぁ……、体が熱い……」
				PRINTFORML 「けど、どうせなら、主様にしてほしい」
				PRINTFORML 「……明日、主様にお願いしようかしら」
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「ふぅ、ふぅ……。%NAME:MASTER%……して欲しい」
			PRINTFORML 「明日、逢いに行きましょうか」
		ELSEIF 陥落状態() == 2
			PRINTFORML 「……違う、これは違うのに、なんで、あんな人の……」
			PRINTFORML 「……こいし達に、手を出してないか……、監視するためなんだから」
		ELSE
			PRINTFORML 「はぁ……、体熱い、あの人のせいかしら」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K49_23(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;断られた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(190)
		ELSEIF 陥落状態() == 2
			PRINTFORML 「連れ出されるまでは、まだ吝かではありませんが」
			PRINTFORMDL 不愉快そうに呟いたさとりが、足を止めた
			PRINTFORML 「%CALLNAME:MASTER%と一緒になんて御免蒙ります」
			PRINTFORMDL そう言って服を脱ごうとしないさとりに、溜め息と共に%CALLNAME:MASTER%は諦めた
		ELSEIF GETBIT (CFLAG:1 ,0) && !GETBIT (CFLAG:1490,1)
			PRINTFORML 「%CALLNAME:MASTER%の事は、嫌いではありませんけど、ご遠慮します」
			PRINTFORMDL 柔らかな微笑みでそう言われて、無理強いすることは出来なかった
		ELSE
			PRINTFORML 「……冗談は顔だけにしてくださいね」
			PRINTFORMDL ソレだけを口にして動かないさとりに、渋々諦めた
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;一緒に入ってくれた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
			CALL DRUNKER49(191)
		ELSEIF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「主様と一緒のお風呂、うれしいです」
				PRINTFORMDL 満面の笑顔で、さとりが服を脱ぎ散らかしていく
				PRINTFORML 「うふふ、早くはいりましょ主様」
				PRINTFORMDL 平然と裸体を晒すさとりに苦笑しながら、%CALLNAME:MASTER%も服を脱いだ
				PRINTFORML 「『綺麗な裸体』？　うふふ、主様\@ GETBIT(TALENT:性別,0) ? もとっても綺麗です # はとてもたくましいです \@」
				PRINTFORMDL そう言って、うっとりと見つめてくるさとりの手を引いて、風呂場に入った
			ELSE
				PRINTFORML 「ふふ、いいですよ。主様と一緒に入れるのは嬉しいです」
				PRINTFORMDL そういいながら、するりと服を脱いでいくさとり
				PRINTFORML 「ほら、主様も脱いで下さい。それとも、私が脱がせましょうか？」
				PRINTFORMDL 嬉しそうに笑うさとりに苦笑しながら、服を脱いでいく
				PRINTFORML 「『綺麗な肌だ』？　主様のために磨いていますからね」
				PRINTFORMDL 楽しそうな笑顔で腕を絡めてくるさとり共に、風呂場に入った
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「はいはい、まったくしかたの無い人ですね」
			PRINTFORMDL 苦笑を浮かべながら、さとりが服を脱いでいく
			PRINTFORML 「%CALLNAME:MASTER%も早く脱いではいかがですか？」
			PRINTFORMDL 先に風呂場にはいるさとりの小振りな尻をガン見してから、服を脱ぎ捨てた
		ELSEIF 陥落状態() == 2
			PRINTFORML 「何をじろじろ見てるんですか」
			PRINTFORMDL 輝くような肌とつんと上を向いた乳房、細く括れた腰と丸みのある尻をしっかりと見つめる
			PRINTFORML 「……はぁ…………、『綺麗』と思われても、嬉しくはありませんね」
			PRINTFORMDL そう言いながらも、少しだけ嬉しそうに口元を弛めたさとりが、風呂場に入っていく
		ELSEIF GETBIT (CFLAG:1 ,0) && !GETBIT (CFLAG:1490,1)
			PRINTFORML 「一緒に入るのは構いませんが、せめて服を脱ぐ間はこちらは見ないで下さい」
			PRINTFORMDL 背中を向けた%CALLNAME:MASTER%は、衣擦れの音を楽しんでから風呂場に入った
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K49_24(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;出産
;==================================================
@M_KOJO_EVENT_K49_25(ARG,ARG:1)
;口上主はLOCAL
;ARG:1	何人目の子供か
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;オナバレ
;==================================================
@M_KOJO_EVENT_K49_26(ARG,ARG:1)

;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;見られた瞬間
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「あ、主様、何のご用ですか？　うふふ、これ、気持ちいーです」
					PRINTFORMDL そう言いながら、大きく足を開き秘所を見せつけてくるさとり
					PRINTFORML 「主様に、んっ、おまんこ見られながら、はふ、弄るの、気持ちいいんです」
					PRINTFORMDL その言葉に、少しは驚いて欲しいと思う%CALLNAME:MASTER%
					PRINTFORML 「ソレはむりですよ、だって、主様に見られるなら嬉しいだけですから」
					PRINTFORMDL そう言いながらも手の動きを控えめにして、破顔したさとりが見つめてくる
				ELSE
					PRINTFORML 「…………主様、いくら何でも勝手に部屋に入り込むのはどうかと思いますけど」
					PRINTFORMDL わざとらしくため息をつきながら、半裸の体でさとりが言葉を紡ぐ
					PRINTFORML 「『着衣を整えるべき？』　主様になら見られても嬉しいだけですから」
					PRINTFORMDL そう言いながら、軽く足を開いて恥蜜に濡れた秘処を晒すさとり
					PRINTFORML 「……本当に、ヒドい人なんですから」
					PRINTFORMDL そう言いながらまた秘処へと指を這わせ始めた
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「きゃんっ！？　……こほんっ、%CALLNAME:MASTER%は何を考えているんですか！」
				PRINTFORMDL 顔を赤くして睨んでくるさとりだが、前をはだけスカートをまくり上げた姿では、コワくもなんともない
				PRINTFORML 「っっっ！！　誰が入って良いと言いました、本当にもう」
				PRINTFORMDL 唇をとがらせながら、さとりが慌てて着衣を整えはじめた
			ELSEIF 陥落状態() == 2
				PRINTFORML 「きゃぁーーっっっっ！！」
				PRINTFORMDL らしくない、可愛い悲鳴に、思わず口の端を緩めつつ、さとりをじっと見つめる
				PRINTFORML 「なななな、ああああ、あな、なんっっっ！？」
				PRINTFORMDL よっぽど慌てているのか、こちらを指さして言葉にならない声を上げている
			ELSEIF (GETBIT (CFLAG:1 ,0) || TALENT:思慕) && !GETBIT (CFLAG:1490,	1)
				PRINTFORML 「っっっっっ！！　みみみ、見ないでくださいっっっ！！！！」
				PRINTFORMDL 半裸で秘処を濡らすさとりに、それは無理だと内心で答えた
			ELSE
				PRINTFORML 「こここここここ、この、この」
				PRINTFORMDL 必死に言葉を紡ごうとしながらも、ただ唇を震わせさとりが指さしてくる
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;何もしない
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「あ、ダメです！　なんで出て行こうとするんですか！」
					PRINTFORMDL さとりの言葉に、タダの気まぐれだと返す%CALLNAME:MASTER%
					PRINTFORML 「やーです、主様、このままＨしましょう？　ね、きもちいいですよ？」
					PRINTFORMDL 両手で大きく陰唇を開き、ひくつく膣口を見せつけるさとり
					PRINTFORML 「『Ｈな光景だ』？　そう思うなら、早く手を出してください」
					PRINTFORMDL とぷんと、膣口から愛蜜が零れるのを、少し惜しいと思いつつ、それでも部屋を後にした
				ELSE
					PRINTFORML 「……あ、主様。なんでココで出て行こうとするんですか」
					PRINTFORMDL さとりの言葉に、ただの気まぐれだと答える%CALLNAME:MASTER%
					PRINTFORML 「据え膳食わぬは男の恥って言葉を知ってます？」
					PRINTFORMDL \@ GETBIT(TALENT:性別,0) ? 男ではないから、恥 # それほど飢えてる訳 \@ではないと、応えを返す
					PRINTFORML 「はぁ……、本当に主様はいぢわるです」
					PRINTFORMDL 唇をとがらせるさとりに苦笑を向けて、部屋を後にした
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「早く、出て行ってください！」
				PRINTFORMDL さとりの怒った声に、頷きを返して背中を向ける
				PRINTFORML 「…………もぅ、本当にヒドいんですから」
				PRINTFORMDL どこか物足りなさそうな声に、内心で小首をかしげながら部屋を後にした
			ELSEIF 陥落状態() == 2
				PRINTFORML 「ででででででてけーーーーーーーっっっっっっっっっ！！！！！！！」
				PRINTFORMDL よっぽど焦っているのか、普段とは全く違う言動と共に、弾幕を投げつけてくるさとり
				PRINTFORML 「このこのこのこのこのっっっっっっっっ！！！！」
				PRINTFORMDL 命の危険を覚えて、%CALLNAME:MASTER%は慌てて部屋から逃げ出した
			ELSEIF (GETBIT (CFLAG:1 ,0) || TALENT:思慕) && !GETBIT (CFLAG:1490,	1)
				PRINTFORML 「はははは、はやく出て行ってくださいっっ！！」
				PRINTFORMDL 顔を真っ赤にして叫ぶさとりに、背中を向けて逃げ出した
			ELSE
				PRINTFORML 「っっっっっっっっっっっ！！！！！」
				PRINTFORMDL 顔を真っ赤にして、声にならない声を上げるさとりに、背中を向けた
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;そのまま続行
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「……見るだけでいいんですか？」
					PRINTFORMDL ぷーと頬を膨らませたさとりがじっとこちらを見つめてくる
					PRINTFORML 「主様なら、抱いてくれると思っていたのに……、わかりました。すれば良いんですね、すれば」
					PRINTFORMDL 唇をとがらせたさとりが、自身の秘所に指をそっと含ませ、軽く前後させ始めた
					PRINTFORML 「はぁはぁ、んっ、主様、どう、です？」
					PRINTFORMDL Ｈで可愛い、そう答える%CALLNAME:MASTER%にうっとりした表情を向け、さとりが指の動きを早めていく
				ELSE
					PRINTFORML 「ふふ、仕方の無い人ですね。はぁ、ほら、これでいいですか？」
					PRINTFORMDL より大胆に股を広げ、より大きく服をくつろげるさとり
					PRINTFORMDL そのまま、ゆっくりと胸の先端を右手の指で弄りながら、秘処へ左手の中指を沈めていく
					PRINTFORML 「あ、んぅっ……、はふ……見られてると思うと、きもちよく……ひぁんっ」
					PRINTFORMDL そのまま甘い声を上げるさとりに手を伸ばして、サードアイの触手で弾かれてしまう
					PRINTFORML 「主様は、見ててあげると言ったでしょう？　見てるだけ、ですよ」
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「……%CALLNAME:MASTER%は本当にヘンタイですね」
				PRINTFORMDL 深々とため息をついたさとりが、それでも服をはだけ半裸になりながら手を動かし始める
				PRINTFORML 「んっ、はぁ……、くぅっ、あふ…………見られるのは、恥ずかしい、です」
				PRINTFORMDL 荒い息で呟くさとりだが、秘処からは愛蜜を口の端からは唾液を、こぼしながら悦楽にふけっている
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;追い出し
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF 陥落状態() == 2
				PRINTFORML 「ででででででてけーーーーーーーっっっっっっっっっ！！！！！！！」
				PRINTFORMDL よっぽど焦っているのか、普段とは全く違う言葉遣いと共に、弾幕を投げつけてくるさとり
				PRINTFORML 「このこのこのこのこのぉっっっっっっっっ！！！！」
				PRINTFORMDL 命の危険を覚えて、%CALLNAME:MASTER%は慌てて部屋から逃げ出した
			ELSEIF (GETBIT (CFLAG:1 ,0) || TALENT:思慕) && !GETBIT (CFLAG:1490,	1)
				PRINTFORML 「はははは、はやく出て行ってくださいっっ！！」
				PRINTFORMDL 顔を真っ赤にして叫ぶさとりに、背中を向けて逃げ出した
			ELSE
				PRINTFORML 「っっっっっっっっっっっ！！！！！」
				PRINTFORMDL 顔を真っ赤にして、声にならない声を上げるさとりに、背中を向けた
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;やっちゃう
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「してくれるんですね。嬉しーです」
					PRINTFORMDL 蕩けきった表情でさとりがじっと見つめてくる
					PRINTFORML 「主様、大好きです。だから、すきなだけ気持ちよくなってください」
					PRINTFORMDL そう言いながら指で陰唇を割り開き、みだらに腰を揺らし始める
					PRINTFORML 「早くしましょ。主様のおちんちん、おまんこに入れて欲しいです」
					PRINTFORMDL はしたないおねだりに、%CALLNAME:MASTER%は頷きながらさとりに近づいた
				ELSE
					PRINTFORML 「『そんなに慰めて欲しいのか』…………、さあ、どうでしょう」
					PRINTFORMDL くちゅくちゅと、秘処を弄りながら、さとりがこちらを眺めてくる
					PRINTFORML 「さぁ、どうでしょうね？」
					PRINTFORMDL クスクスと笑いながら、腰を突き出し陰唇を指で割り開く
					PRINTFORMDL ひくひくと物欲しげに震える膣口に、思わず生唾を飲み込む%CALLNAME:MASTER%
					PRINTFORML 「主様？　どうします？」
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「はやく、出て行ってください」
				PRINTFORMDL もういちど弱々しく呟くさとりだが、こちらを見る目には媚びが浮かんでいる
				PRINTFORML 「『本当に出て行っていいのか』？　……出て行って欲しいんです」
				PRINTFORMDL 弱々しく呟くさとりだが、整えかけた着衣を自ら乱し始めている
			ELSE
				PRINTFORML 「『可愛い』っっ！？　ななななな、何を言ってるんですか、%CALLNAME:MASTER%は！」
				PRINTFORMDL 顔を真っ赤にして慌てるさとりに、イタズラ心が疼いた
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;事後
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「はぁはぁ、んにゃぁ……、きもち、よかったれしゅ……」
					PRINTFORMDL ぐったりとベッドに身を横たえながらつぶやくさとり
					PRINTFORML 「ぬしさまは、どーでした？」
					PRINTFORMDL さとりの問いかけにとてもよかったと答えながら身を起こす
					PRINTFORML 「あ、……帰る、んですか？　ずっと、いてほしーのに」
					PRINTFORMDL 唇を尖らせて見つめてくるさとりに、しばしどうしようかと考える
				ELSEIF TALENT:恋慕
					PRINTFORML 「はぁ……ふぅ……ぬしさまぁ……」
					PRINTFORMDL うっとりした表情で絶頂の余韻に浸るさとりを見ながら、%CALLNAME:MASTER%は立ち上がる
					PRINTFORML 「あ、主様、…………帰られるのですか」
					PRINTFORMDL 息を整えながら身を起こしたさとりが、きゅっと服の裾を掴んでくる
					PRINTFORML 「今日は、その、泊まっていってくれませんか？」
					PRINTFORMDL さとりの珍しいワガママに、どうすべきかと%CALLNAME:MASTER%は思い惑う
				;恋慕も持たずに恋人とな？
				ELSE
					PRINTFORML 「はあはぁ…………、んぅ……ぬしさまぁ」
					PRINTFORMDL 甘ったるい声を上げるさとりの頬に軽く口づけをして立ち上がる%CALLNAME:MASTER%
					PRINTFORML 「あ、ぬしさま、かえる、ん、ですか……、このまま……いっしょに……」
					PRINTFORMDL そう呟くさとりのお誘いに、また今度と答える
					PRINTFORML 「はぁ……、今度は、泊まっていってくださいね」
					PRINTFORMDL 少しだけ、はっきりした様子のさとりに笑みを浮かべて頷き返した
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「あふ……、もう、むり……」
				PRINTFORMDL くたりと寝床に身を横たえるさとりが、息を整えながらけだるげに顔を向けてきた
				PRINTFORML 「ほんとうに……、ひどい……ひとで、す……」
				PRINTFORMDL 口ではそういいながら、うっとりとした目で%CALLNAME:MASTER%を見つめてくる
			ELSE
				PRINTFORML 「……はぁ…………はぁ………………こん、な」
				PRINTFORMDL 呆然としているさとりに笑みを向けて、%CALLNAME:MASTER%は立ち上がった
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 6
		;事後お泊り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF NEMUKE() < 720 && BASE:体力 > 500
				IF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 「うふふ、今日は一日主様を独占できます」
						PRINTFORMDL 嬉しそうに声を上げて、ギュッと抱きついてくるさとり
						PRINTFORML 「今日は一杯一杯いっっぱいＨしてくださいね？」
						PRINTFORMDL セックスだけでいいのかと問いかける%CALLNAME:MASTER%にさとりが首を左右に振る
						PRINTFORML 「いちゃいちゃもしましょ。うふふ、大好きです、主様」
						PRINTFORMDL 満面の笑みを浮かべるさとりに苦笑しつつ、唇を重ねた
					ELSE
						PRINTFORML 「ありがとうございます、主様」
						PRINTFORMDL 泊まっても良いかと考えた途端、笑顔を浮かべるさとり
						PRINTFORML 「『まだ決めてない』？　駄目ですよ、私の前でそう考えた時点で確定事項ですから」
						PRINTFORMDL くすくすと笑うさとりに、逃げ出せない事を理解して、%CALLNAME:MASTER%は苦笑しながらさとりを抱き寄せる
						PRINTFORML 「せっかく一日中いられるのですから、今日は存分に甘えさせてくださいね」
						PRINTFORMDL 上目遣いでそんなコトを言ってくるさとりに苦笑しながら頷いた
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「……ふふ、泊まって、くれる、んですね、嬉しいです」
					PRINTFORMDL そう言いながらそっとこちらを引き寄せ、肩に頭を預けてくる
					PRINTFORML 「……Ｈも無論します、けど、今日は、すこし甘えたい気分です」
					PRINTFORMDL 可愛いことを言うさとりの腰に手を回して、しばしそのぬくもりを味わった
				ENDIF
			ELSE
				IF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 「えー、もう寝るんですかー？」
						PRINTFORMDL 唇を尖らせて抱きついてくるさとりに頷きを返す
						PRINTFORML 「せっかく一日中主様と一緒にいられると思ったのにー」
						PRINTFORMDL 頬をぷくぷくと膨らませるさとりに、軽く謝りながら服を脱ぎ捨て布団にもぐりこむ
						PRINTFORML 「……それじゃ、私もご一緒します」
						PRINTFORMDL そういいながら、さとりがのしかかってきた
					ELSE
						PRINTFORML 「主様、そんなに眠いのなら一緒に寝ましょう」
						PRINTFORMDL そう言ったが早いか、さとりのサードアイが%CALLNAME:MASTER%の体に絡みつき布団に引きずり込んだ
						PRINTFORML 「主様専用の抱き枕ですよ、嬉しいですか？」
						PRINTFORMDL 気持ちは良い、そう答えながら%CALLNAME:MASTER%はさとりを抱き絞める
						PRINTFORML 「『これで胸枕ができれば』？　……ぬしさま？」
						PRINTFORMDL コワい笑顔を浮かべるさとりに、内心謝りつつ眠りに落ちた
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「ふふ、仕方ない人ですね」
					PRINTFORMDL 嬉しそうに笑いながら、さとりが布団をめくりあげて手招きする
					PRINTFORML 「それじゃお休みなさい。良い夢を」
					PRINTFORMDL 手早く服を脱ぎ布団に入った%CALLNAME:MASTER%は、さとりの頬に口づけして瞼を閉ざした
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF

;==================================================
;相手からデートのお誘い
;==================================================
@M_KOJO_EVENT_K49_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 (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
				CALL DRUNKER49(200)
			ELSEIF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「ぬしさま！　んーっっ、主様主様主様っ」
					PRINTFORMDL 満面に笑みを浮かべたさとりが、ぎゅっと抱きついて頭をぐりぐりと押しつけてくる
					PRINTFORML 「ねえ主様、今からでえとしませんか？　主様とお出かけしたいです」
					PRINTFORMDL すりすりと胸元にほおずりしながら、上目遣いで見つめてくるさとり
					PRINTFORML 「『どうしよう』？　……私は、主様と一緒にいたいのに、だめなんですか？」
					PRINTFORMDL 人差し指を咥えて、見上げてくるさとりのおねだりに、しばし考える%CALLNAME:MASTER%
				ELSE
					PRINTFORML 「あ、主様。今日は出掛けたい気分なのですが、主様はいかがですか？」
					PRINTFORMDL すっと間近に寄ってきたさとりの言葉に、そちらから誘ってくるのは珍しいと思う%CALLNAME:MASTER%
					PRINTFORML 「主様流に言えば、ただのきまぐれ、ですよ？」
					PRINTFORMDL クスクスと笑いながら上目遣いで見つめてくるさとり
					PRINTFORML 「『相変わらず可愛い』？　ふふ、まさか主様がそんな事を言ってくれるとは思いませんでした」
					PRINTFORMDL 微笑むさとりに、さてどうしようかと%CALLNAME:MASTER%は考え込む
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「あら、%CALLNAME:MASTER%ですか……、よかったら、一緒に出掛けませんか？」
				PRINTFORMDL どことなく浮かれた様子のさとりのお誘いに、思わず珍しいと呟いてしまう
				PRINTFORML 「ふふ、たまにはそういう気分の時もあると言うことですよ」
				PRINTFORMDL どうします？　と目で問いかけてくるさとりに、どうしようかと%CALLNAME:MASTER%はしばし考える
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
				CALL DRUNKER49(201)
			ELSEIF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「やった！　うふふ、主様とデート、デート！」
					PRINTFORMDL 満面の笑顔でぎゅっとこちらの腕を抱きしめてくるさとり
					PRINTFORML 「『単なる気まぐれ』？　むー、主様のイヂワル」
					PRINTFORMDL 頬を膨らませたさとりがじっと見つめてくる
					PRINTFORML 「私とのでえとは、おいやなんですか？」
					PRINTFORMDL 拗ねるさとりに、嫌に決まってる訳がないと答え、そのまま歩き出した
				ELSE
					PRINTFORML 「ふふ、主様、ありがとうございます」
					PRINTFORMDL 柔らかな笑顔に、単なる気まぐれだと答える%CALLNAME:MASTER%
					PRINTFORML 「ふふ、気まぐれ同士なのも楽しいと思いません？」
					PRINTFORMDL そう言いながら腕を絡めてくるさとり
					PRINTFORML 「『柔らかい』？　ふふ、おんなですからね」
					PRINTFORMDL そう言いながら胸を押し当ててくるさとりに苦笑が浮かんだ
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「『行くか』？　ありがとうございます」
				PRINTFORMDL 嬉しそうに笑ったさとりが軽く頭を下げてくる
				PRINTFORML 「ふふ、私だって女ですからね、デートとなれば浮き立つものですよ」
				PRINTFORMDL 嬉しそうに笑うさとりに腕を絡められたまま、歩き出した
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
				CALL DRUNKER49(202)
			ELSEIF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「……ぬしさまのばか、なんでいやなんですか！」
					PRINTFORMDL 目尻に涙を溜めたさとりが、上目遣いに睨んでくる
					PRINTFORML 「『外出する気分じゃ無い』？　私はでえとしたい気分なんです」
					PRINTFORMDL そんなさとりのわがままな態度に、なぜか嬉しくなってくる
					PRINTFORML 「『昔より可愛』っ！？　そそそ、そんなこと言ってもだまされにゃっ！」
					PRINTFORMDL 顔を真っ赤にしたさとりが、舌を噛んで悶絶している
				ELSE
					PRINTFORML 「……はぁ、せっかくのお誘いを断るんですか？」
					PRINTFORMDL さとりの言葉に、誘われるのは好みでは無いと答える%CALLNAME:MASTER%
					PRINTFORML 「まったく、勝手な人ですね、相変わらず」
					PRINTFORMDL なぜか楽しげに頬を緩ませるさとりに小首をかしげる
					PRINTFORML 「そう言う気まぐれなところも、主様らしくて嬉しいですから」
					PRINTFORMDL 寄り添いながら呟かれた言葉に、なんとなく気分が良くなる%CALLNAME:MASTER%だった
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「『気分じゃ無い』ですか、残念です」
				PRINTFORMDL そう言いながらも、どことなく柔らかな笑みを浮かべるさとり
				PRINTFORML 「ではしばらくここでお話でもしていきませんか？」
				PRINTFORMDL その提案は吝かでは無い、と答える%CALLNAME:MASTER%
			ENDIF
			SETBIT CFLAG:1492,1
			RETURN 1
		ENDIF
		;自宅位置（＝散策MAP自室）が存在しないキャラ用
		;-------------------------------------------------
		CASE 3
		;部屋に誘われた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;部屋に誘われたのを受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;部屋に誘われたのを断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;脱衣口上
;==================================================
@M_KOJO_EVENT_K49_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
				IF CFLAG:TARGET:睡眠
					PRINTFORML 「くーすー……ん……や……すー」
				ELSEIF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
					CALL DRUNKER49(210)
				ELSEIF TCVAR:発情
					IF 陥落状態() != 2
						PRINTFORML 「はー、はー……、なん、です」
						PRINTFORMDL 頬を火照らせたさとりが、こちらののばした手を払って自ら服を脱ぎ捨てていく
						PRINTFORML 「\@ 陥落状態() >= 4 ? 主様 # %CALLNAME:MASTER% \@が、望んだこと、でしょう」
						PRINTFORMDL 完全に発情しているさとりが、そのままこちらの服を剥ぎ取った
						PRINTFORML 「逃がしませんから」
						PRINTFORMDL 逃げるつもりはないと返しつつ、ゆであがったさとりの表情に愉悦を覚えた
					ELSE
						PRINTFORML 「……はー、はー……」
						PRINTFORMDL 獲物を狙う肉食獣の様な瞳をこちらに向け、服を脱ぎ捨てるさとり
						PRINTFORML 「ふ－、ふー、こう、したいの、でしょうが」
						PRINTFORMDL 言葉を吐き捨てながら服を脱いださとりが、サードアイの触手でこちらの服を剥ぎ取り、のしかかってきた
					ENDIF
				ELSEIF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 「んー、主様、脱がせてください」
						PRINTFORMDL さとりのおねだりに苦笑しながら、身に纏っている物を剥ぎ取っていく
						PRINTFORML 「『綺麗』？　んふふ、主様に見せるために、いろいろしてますからねー」
						PRINTFORMDL そこまで言ったさとりが、手を伸ばしてくる
						PRINTFORML 「はい、次は主様が服を脱がせられる番ですよー」
						PRINTFORMDW 満面に笑みを浮かべるさとりに、苦笑しつつも従う%CALLNAME:MASTER%だった
					ELSE
						PRINTFORML 「ふふ、恥ずかしいけれど、嬉しいです」
						PRINTFORMDL そう言いながら、一枚一枚見せつけるように服を脱いでいくさとり
						PRINTFORML 「見せつけているんですよ。あ、主様はそのままで」
						PRINTFORMDL 全裸になったさとりが身を寄せてくる
						PRINTFORML 「主様の服は、私が脱がせて差し上げますね」
						PRINTFORMDW 楽しげな表情に、逆らう余地は全くなかった
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「やはり、恥ずかしいものですね」
					PRINTFORMDL 頬を朱に染めるさとりだが、目元は欲情に濡れている
					PRINTFORML 「……%CALLNAME:MASTER%も早く脱いでくださいね？」
					PRINTFORMDW さとりの言葉に、苦笑しながら服を脱ぎ捨てた
				ELSEIF 陥落状態() == 2
					PRINTFORML 「『綺麗な体だ』？　……%CALLNAME:MASTER%に言われても怖気が走るだけですね」
					PRINTFORMDL 冷めた表情で呟きながらも、抵抗せずに服を脱ぐさとり
					PRINTFORML 「……さっさと、%CALLNAME:MASTER%も脱いだらどうですか？」
					PRINTFORMDW さとりの言葉に、にやりと笑いながら、%CALLNAME:MASTER%も服を脱いだ
				ELSEIF 陥落状態() == 1
					PRINTFORML 「やっぱり、全てを見られるのは恥ずかしいですね」
					PRINTFORMDW 僅かに頬を紅くするさとりを見ながら、%CALLNAME:MASTER%も服を脱ぎ捨てた
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;下着姿にする
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF !FLAG:70
				IF CFLAG:TARGET:睡眠
					PRINTFORML 「くーすー……ん……や……すー」
				ELSEIF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
					CALL DRUNKER49(210)
				[SKIPSTART]
				ELSEIF TCVAR:発情
					;裸画像
					IF GETBIT(CFLAG:1490,12)
					;非裸画像
					ELSE
					ENDIF
				[SKIPEND]
				ELSEIF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 「主様は本当に変な趣味をしてますね」
						PRINTFORMDL 自らブラをはずそうとしたさとりの手を押しとどめる
						PRINTFORML 「ナマチチよりブラの方がすきなんですか？」
						PRINTFORMDL 女の子がなまちちと言うな、そんな内心の呟きに、さとりがにっこりと笑う
						PRINTFORML 「おっぱいやおまんこやおちんちんは良いのに、なまちちはダメって、基準がわかりません」
						PRINTFORMDW そう言いながら、足を開いて陰唇を割り開き、さとりがひくつく膣口を露わにした
					ELSE
						PRINTFORML 「主様、おっぱいだけ隠せというのは、正直理解できません」
						PRINTFORMDL さとりの言葉に、これはこれで良いものだと応える%CALLNAME:MASTER%
						PRINTFORML 「はぁ……、ほんとうにへんたいですねぇ」
						PRINTFORMDL 呆れたように呟くさとりだが、その口元には柔らかな笑みが浮かんでいる
						PRINTFORML 「それでは主様、好きなようにしてください」
						PRINTFORMDW そう言いながら足を開いて秘処を見せつけるさとりに、欲情してしまった
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「どうせなら、全部脱がせた方が早くないですか？」
					PRINTFORMDL 不思議そうな表情で、ブラ以外を脱ぎ捨てるさとり
					PRINTFORML 「『こういうのも良い』？　本当によくわからないことが好きですね」
					PRINTFORMDW 呆れたように呟きながらも、さとりは含羞の紅を頬に乗せている
				ELSEIF 陥落状態() == 2
					PRINTFORML 「……下を脱がせておいて、上はつけておけ？　訳がわかりませんね」
					PRINTFORMDL 冷たく呟くさとりだが、顔を紅くしてる
					PRINTFORML 「『恥ずかしいだろう』？　別に、%CALLNAME:MASTER%が異常なのは、わかっていますから」
					PRINTFORMDW そう言いながら、手で股間を隠しているさとりを、にやにや笑いながら見つめた
				ELSEIF 陥落状態() == 1
					PRINTFORML 「『胸だけ隠してるのも良い』？　正直理解できません」
					PRINTFORMDW くすりと笑いつつ、さとりがブラジャーだけの姿で見つめてくる
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;半脱ぎ
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF !FLAG:70
				IF CFLAG:TARGET:睡眠
					PRINTFORML 「くーすー……ん……や……すー」
				ELSEIF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
					CALL DRUNKER49(210)
				[SKIPSTART]
				ELSEIF TCVAR:発情
					SETBIT(CFLAG:1490,12)
				[SKIPEND]
				ELSEIF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 「ぬしさまのだいすきなナマチチですよ、どーです？」
						PRINTFORMDL 満面に笑みを浮かべるさとりに、別に大好きではないと返す%CALLNAME:MASTER%
						PRINTFORML 「もう、こんなことしてる最中に、照れ隠しやおためごかしは無しですよ」
						PRINTFORMDL 蠱惑的な笑みを浮かべたさとりが、下乳に手を当てふるふると揺らし始める
						PRINTFORML 「『エロい』？　Ｈしてるんですから、エロくてあたりまえでしょう？」
						PRINTFORMDW 卑猥なおねだりに、たまらずさとりを抱き寄せた
					ELSE
						PRINTFORML 「はい、主様、これでよろしいですか？」
						PRINTFORMDL くすくすと笑いながら、はだけた服から乳房を晒すさとり
						PRINTFORML 「『エロい格好』？　ふふ、主様にそう思われるのは光栄ですね」
						PRINTFORMDL くすりと笑って、さとりが胸の下で腕を組んだ
						PRINTFORML 「こういうのはどうです？」
						PRINTFORMDW 腕で押し上げられて作られた谷間に、生唾が湧いた
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「こんなのが楽しいんですか？　よくわかりません」
					PRINTFORMDL 半裸の体で呟くさとりに、全裸も半裸も綺麗だと呟く%CALLNAME:MASTER%
					PRINTFORML 「っ……、もう、なんでこういうときこういうセリフが出てくるんですか」
					PRINTFORMDW 口元を緩ませるさとりに、事実だからと返し、そのまま抱き寄せた
				ELSEIF 陥落状態() == 2
					PRINTFORML 「……この変態」
					PRINTFORMDL 服を着たまま、胸を晒す変態に言われたくない、そう答えた瞬間、さとりが顔を紅くする
					PRINTFORML 「%CALLNAME:MASTER%がそうさせたのでしょう！　嬲るのもいい加減にしてください！」
					PRINTFORMDW 嬲るのは今からだと答える%CALLNAME:MASTER%にさとりが顔を真っ赤にして睨んでくる
				ELSEIF 陥落状態() == 1
					PRINTFORML 「服がしわくちゃになりそうですね」
					PRINTFORMDW くすりと笑いながら、着衣はそのままに乳房を晒すさとりに、滾るモノを覚える
				ENDIF
			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
					IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
						CALL DRUNKER49(213)
					ELSEIF 陥落状態() >= 4
						IF 陥落状態() == 5
							PRINTFORML 「主様のパンツ……、すんすん……、あんまり匂いしないです」
							PRINTFORMDL そう言いながら、さとりが自身のパンツをこちらの口元に押しつけてくる
							PRINTFORML 「『Ｈな匂い』？　うふふ、主様がそうさせたんですよ？　だから、責任取ってくださいね」
							PRINTFORMDL 自身のパンツの又布に指を絡めたさとりがこちらの口中にソレを押し込み、こちらのパンツをれろれろと舐め始める
							PRINTFORML 「ん、れろ……、『変態』？　うふふ、変態でもいいですよーだ」
							PRINTFORMDW 互いのパンツをしばらく舐め合ってから、懐にしまい込んだ
						ELSE
							PRINTFORML 「『こんなものが欲しいのか』？　私のパンツを盗んでる主様の言えた義理ですか」
							PRINTFORMDL 口元を緩めるさとりの反撃に、パンツよりは中身の方が良いと答える%CALLNAME:MASTER%
							PRINTFORML 「『パンツは別腹だけど』？　ふふ、私も同じ理由ですから」
							PRINTFORMDL そう言いながら、こちらのパンツを握りしめるさとり
							PRINTFORML 「私も主様のパンツよりは、中身の方が良いですけどね」
							PRINTFORMDW 上目遣いのおねだりに、我慢できずにさとりを抱き寄せた
						ENDIF
					ELSEIF 陥落状態() == 3
						PRINTFORML 「パンツの交換は変だと思います？」
						PRINTFORMDL さとりの問いかけに、別にそんなことはないと答える%CALLNAME:MASTER%
						PRINTFORML 「いつも取られてばかりは癪ですからね」
						PRINTFORMDW そんなさとりの言葉に、苦笑が浮かんでしまった
					ENDIF
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 1
				;OK（嬉々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
						CALL DRUNKER49(214)
					ELSEIF 陥落状態() >= 4
						IF 陥落状態() == 5
							PRINTFORMDL 無言でパンツを脱いださとりが、両手でパンツを広げて、こちらの顔に被せてきた
							PRINTFORML 「はいどうぞ、うふふ、主様良い匂いですか？　美味しいですか？」
							PRINTFORMDL 鼻と口を覆う又布に、匂いをかぎながら軽く舌で舐める
							PRINTFORML 「『Ｈな匂いと味』？　うふふ、光栄です。主様、昂奮しました？」
							PRINTFORMDL 頷きを返す%CALLNAME:MASTER%に、さとりがこちらの顔から外したパンツを手に押しつけてきた
							PRINTFORMW 「堪能したなら、早くＨの続きしましょ？」
						ELSE
							PRINTFORML 「はいどうぞ」
							PRINTFORMDL 呆れたような表情で、脱いだばかりのパンツを差し出してくるさとり
							PRINTFORML 「『良い匂い』？　……もう、本人の前でそんな変態行為はどうかと思いますよ」
							PRINTFORMDL わざと匂いをかいでみせた%CALLNAME:MASTER%に、さとりが苦笑を向けてくる
							PRINTFORML 「『つれない』？　お渡しした限り、どう使おうと主様の自由ですから」
							PRINTFORMDW そうのたまうさとりだが、羞恥と情欲に頬を朱に染めている
						ENDIF
					ELSEIF 陥落状態() == 3
						PRINTFORML 「……はぁ、本当にへんたいですねぇ」
						PRINTFORMDL くすりと笑ったさとりが、ゆっくりと脱いだパンツを押しつけてくる
						PRINTFORML 「匂いもぬくもりも、どうせすぐに消えると思いますけど」
						PRINTFORMDW 持ち主が自ら渡してくれるのが嬉しいのだと、伝える%CALLNAME:MASTER%に、さとりが苦笑を浮かべた
					ELSEIF 陥落状態() == 2
						PRINTFORML 「この変態！　色情狂！　破廉恥漢！　こんな物をほしがるなんてなにを考えているんですか」
						PRINTFORMDL 不快そうに言葉を投げつけてくるさとり
						PRINTFORML 「『カゾクからもらう』っっ！？　っっっ！　この、卑怯者！」
						PRINTFORMDW 顔に向かって投げつけられたソレを受け止め、懐にしまい込んだ
					ELSEIF 陥落状態() == 1
						PRINTFORML 「まったく、こんなものが欲しいなんて、理解できません」
						PRINTFORMDW 羞恥に頬を染めつつ、さとりが脱いだばかりのパンツを差し出してきた
					ENDIF
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 2
				;OK（渋々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					IF (BASE:酒気 > (MAXBASE:酒気 / 10) * 4)
						CALL DRUNKER49(215)
					ELSEIF 陥落状態() >= 4
						PRINTFORML 「……主様、こういうのはどうかと思いますよ」
						PRINTFORMDL 呆れた表情で呟きながら、目の前で脱いだパンツを差し出してくるさとり
						PRINTFORML 「ここで、匂い嗅いだりしたら、泣きますからね」
						PRINTFORMDL その言葉に本気を感じて、%CALLNAME:MASTER%はおとなしく懐にパンツをしまった
						PRINTFORML 「『コレをおかずに』？　……主様、目の前にいる私よりもパンツの方が良いと？」
						PRINTFORMDW 僅かにすねを見せるさとりに、これは別腹だと%CALLNAME:MASTER%は答えた
					ELSEIF 陥落状態() == 2
						PRINTFORML 「この変態！　色情狂！　破廉恥漢！　こんな物をほしがるなんてなにを考えているんですか」
						PRINTFORMDL 不快そうに言葉を投げつけてくるさとり
						PRINTFORML 「『家族からもらう』っっ！？　っっっ！　この、卑怯者！」
						PRINTFORMDW 顔に向かって投げつけられたソレを受け止め、懐にしまい込んだ
					ELSEIF 陥落状態() == 1
						PRINTFORML 「まったく、こんなものが欲しいなんて、理解できません」
						PRINTFORMDW 羞恥に頬を染めつつ、さとりが脱いだばかりのパンツを差し出してきた
					ENDIF
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 3
				;嫌です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					IF 陥落状態() == 2
						PRINTFORML 「ふざけるのは顔だけにしておいてください」
						PRINTFORMDL さとりの言葉に、苦笑を返す
						PRINTFORML 「なにがおかしいんですか」
						PRINTFORMDW 予想通りの答えだと返した
					ELSEIF 陥落状態() == 1
						PRINTFORML 「さすがに、ソレはちょっと……」
						PRINTFORMDW 困ったように笑うさとりに、残念だと答える%CALLNAME:MASTER%
					ELSE
						PRINTFORML 「冗談には付き合いきれません」
						PRINTFORMDW 冗談ではないと返す%CALLNAME:MASTER%に、さとりが呆れた表情を向けてきた
					ENDIF
					RETURN 1
				ENDIF
				RETURN 1
			ENDSELECT
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;怒り口上
;==================================================
@M_KOJO_EVENT_K49_29(ARG,ARG:1)
;口上主はTARGET
;ARGはTARGETの度胸で分岐
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;怒らせてしまった
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORMDL 今にも泣き出しそうな表情で、さとりが見つめてくる
			ELSE
				PRINTFORMDL 寂しげな表情で、さとりが見つめてくる
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORMDL 何か言いたげな表情で、さとりが見つめてくる
		ELSEIF 陥落状態() == 2
			PRINTFORMDL 殺意さえ感じる表情で、さとりが思い切りにらみつけてくる
		ELSEIF 陥落状態() == 1
			PRINTFORMDL いらだちを抑えきれない様子で、さとりが視線をそらしている
		ELSE
			PRINTFORMDL 不機嫌そうに口元を引き結び、さとりが顔を背けている
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;泣かせてしまった　[臆病]持ち
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;疲れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「……むー、残念ですけど、今は終わりです」
				PRINTFORMDL ほつれ髪もそのままに、すっとさとりが離れた
				PRINTFORML 「『まだつきあえる』？　私が疲れたんです」
				PRINTFORMDL %CALLNAME:MASTER%の内心の言葉に応えたさとりが、そのまましなだれかかってくる
				PRINTFORML 「本当はもっとしたいですけどね」
				PRINTFORMDL ソレはまた今度と答えつつ、しばらくさとりを抱きしめた
			ELSE
				PRINTFORML 「……はふ……、今はこれくらいで」
				PRINTFORMDL そんなコトを言いながら、衣服を整えるさとり
				PRINTFORML 「『まだ出来る』？　申し訳ありません、主様」
				PRINTFORMDL 一瞬喜悦を瞳に浮かべたさとりが、それでも軽く頭を下げて少し離れる
				PRINTFORML 「できれば、私ももう少ししたい、ですけれど」
				PRINTFORMDL 表情に疲れを滲ませるさとりに、苦笑しながら構わないと答える%CALLNAME:MASTER%だった
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「はぁ……、ん、済みませんが、これで終わりに」
			PRINTFORMDL こちらはまだ大丈夫だと答える%CALLNAME:MASTER%にさとりが疲れを笑みに乗せて見つめてくる
			PRINTFORML 「すこし気疲れしてしまったので……、すみません」
			PRINTFORMDL 深々と頭を下げるさとりに、残念だと内心で呟きながら慰労のつもりで頭を撫でてやった
		ELSEIF 陥落状態() == 2
			PRINTFORML 「終わりです」
			PRINTFORMDL けんもほろろと言った様子で離れたさとりが睨んでくる
			PRINTFORML 「『蒲柳の質でもないくせに』？　……%CALLNAME:MASTER%と違って、こういうことは好きではないので」
			PRINTFORMDL 自分から襲ってきたくせにと、内心で詰った瞬間、頬を張り飛ばされた
		ELSE
			PRINTFORML 「……疲れました」
			PRINTFORMDL それだけを呟いて、さとりが身を離した
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;満足して解放
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「ふ～、うふふ、主様成分補給完了です」
				PRINTFORMDL 成分とか意味のわからないことを言い出すさとりを、しばし胡乱げに見つめる%CALLNAME:MASTER%
				PRINTFORML 「主様、大好きです」
				PRINTFORMDL 満面の笑顔でそんなコトを言われて、やれやれと首を軽く振る
				PRINTFORML 「『そんなに良かったか』？　はい、最高でした」
				PRINTFORMDL そう言って、すり寄ってきたさとりがほおずりしてきた
			ELSE
				PRINTFORML 「はぁ、良かったです」
				PRINTFORMDL そう言って、さとりが身支度を調え始める
				PRINTFORML 「『もう良いのか』？　はい、主様とむつみ合えて満足です」
				PRINTFORMDL そう言いながら、うっとりした表情でこちらを見つめてくるさとり
				PRINTFORML 「主様は……、まだ満足ではありませんか？」
				PRINTFORMDL さとりの問いかけに、答えは出てこなかった
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「はふ、気持ち良かったですよ」
			PRINTFORMDL そう言って離れるさとりに、少し残念な気持ちが湧いてくる
			PRINTFORML 「ふふ、そう思ってもらえれば、更に満足感が増しますね」
			PRINTFORMDL クスクス笑いながら、身支度を調えるさとりをしばし眺めた
		ELSEIF 陥落状態() == 2
			PRINTFORML 「これくらいで許してあげます」
			PRINTFORMDL 別にさとりに許される謂われは無いと返す%CALLNAME:MASTER%
			PRINTFORML 「この減らず口」
			PRINTFORMDL いつもとは少し違う、どこか楽しげな軽口に首を傾げた
		ELSE
			PRINTFORML 「お疲れさまです、ありがとうございました」
			PRINTFORMDL 淡々とした様子でさとりが離れた
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
	;満足したところを押し倒された
		IF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「はー、気持ち良か、った……、えと、主様？」
				PRINTFORMDL 離れようとしたさとりの腕を掴んで強引に抱き寄せる
				PRINTFORML 「『シ足りない』？　あ、あはははは……いーですよ、主様の好きなこと何でもシテください」
				PRINTFORMDL ギュッと抱きついてきたさとりが耳元で囁く
				PRINTFORML 「私の体は、なまちちもおまんこもしりあなもくりもおくちも、何から何まで主様のためのものですから」
				PRINTFORMDL 甘ったるい声でつぶやくさとりに、%CALLNAME:MASTER%は欲情がいや増すのを覚えた
			ELSE
				PRINTFORML 「主様、おつかれさ、あ、あの？」
				PRINTFORMDL もう終わりだと言いたげなさとりの手をギュッと握りしめる
				PRINTFORML 「『まだだ』？　……ふふ、どうぞ主様のお好きなように」
				PRINTFORMDL 嬉しげに笑うさとりが、こちらの手を掴んで自身の秘処へと導く
				PRINTFORML 「主様にされると思うと、嬉しくて我慢出来ません」
				PRINTFORMDL うっとりと見つめてくるさとりに、こちらの方が我慢出来ず唇を押しつけた
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「ふぅ、満足しました……が、どうやら%CALLNAME:MASTER%はまだのようですね」
			PRINTFORMDL こちらの内心を読み取ったさとりが、身を摺り寄せてくる
			PRINTFORML 「いいですよ、%CALLNAME:MASTER%の気が済むまで、好きなだけ使ってください」
			PRINTFORMDL %CALLNAME:MASTER%はさとりを抱きしめ、口づけを交わしながら尻を揉み始めた
		ELSEIF 陥落状態() == 2
			PRINTFORML 「終わりに、『まだする』？　冗談じゃありませんね」
			PRINTFORMDL 不愉快そうなさとりを強引に抱き寄せる
			PRINTFORML 「このっ、離しなさい変態！」
			PRINTFORMDL 文句を言いながらも、さとりは逃げださなかった
		ELSE
			PRINTFORML 「……まだしたいのですか、仕方ありませんね」
			PRINTFORMDL 柔らかな笑みを浮かべたさとりが、身を委ねてきた
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;壊れるまでしてあげる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		IF 陥落状態() >= 4
			IF 陥落状態() == 5
				PRINTFORML 「うふふ、それじゃ私だけの私専用の主様にしてあげますね」
				PRINTFORMDL さとりの浮かべる満面の笑みに、肉食獣の愉悦を感じて冷や汗が浮かぶ
				PRINTFORML 「『早まったか』？　ええ、そうですよ、早まったんですよ」
				PRINTFORMDL 一瞬、無かった事にしようかと考え、同時、全身にサードアイの触手が絡みついた
				PRINTFORML 「逃がしませんからね。うふふ、主様大好きです」
				PRINTFORMDL 良いと言った自分が悪いと内省しつつ、さとりに身を委ねた
			ELSE
				PRINTFORML 「主様、そこまで言われては、我慢しませんよ？」
				PRINTFORMDL うっとりとした表情ですり寄ってくるさとり
				PRINTFORMDL どことなくアブナい雰囲気に、口元が引きつってしまう
				PRINTFORML 「主様の体中を弄くり回して、快楽の虜にしましょうか」
				PRINTFORML 「それとも、主様をおもちゃにして私の快楽を求めましょうか」
				PRINTFORMDL 嬉しそうに笑いながら呟くさとりに、思わず苦笑が浮かんだ
			ENDIF
		ELSEIF 陥落状態() == 3
			PRINTFORML 「一度口にした言葉は、取り消せませんよ？」
			PRINTFORMDL しごく楽しげなさとりに、冷や汗が浮かんだのを自覚する
			PRINTFORML 「さて、なにからしましょうか」
			PRINTFORMDL それでも、楽しげなさとりの様子に、たまには良いかと体から力を抜いた
		ELSEIF 陥落状態() == 2
			PRINTFORML 「……ふん」
			PRINTFORMDL サードアイの触手で緊縛してくるさとりに、思わず変態かと口にしてしまう
			PRINTFORML 「……自分から望んでおいて何を偉そうに」
			PRINTFORMDL そう良いながら、にじり寄るさとりの顔に、楽しげな笑みが浮かんでいる
		ELSE
			PRINTFORML 「まあ、構いませんが。途中でイヤだと言っても無駄ですからね」
			PRINTFORMDL 冷めた表情で呟いたさとりがのしかかってきた
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;一日の終了時(AFTERTRAニーの前)、面識がなければ呼び出されない
;==================================================
@M_KOJO_EVENT_K49_31(ARG,ARG:1)
;口上主はTARGET
;ARGは会ってない日数
;何日以上会ってなかったら愚痴を言うとかできます
;CFLAG:オナバレで分岐入れてもよさそう
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;今日会っていない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG
		CFLAG:1493 = ARG
		;一日目（よくある
		IF ARG == 1
			IF GETBIT(CFLAG:1490,5) && GET_MAPID(CFLAG:MASTER:現在位置) != GET_MAPID(CFLAG:現在位置) && !RAND:2
				IF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 『もしもし主様、どうして今日は会ってくれなかったんですか？』
						PRINTFORML 『「……」、って主様は本当にそればっかり』
						PRINTFORML 『主様、愛しています。今度はちゃんと会ってくださいね？』
					ELSE
						PRINTFORML 『もしもし主様。「……」、どうしてか解りますか？』
						PRINTFORML 『今日は主様とお会い出来なかったから、どうしても声が聞きたかったんです』
						PRINTFORML 『「……」、主様と一日会えないだけで、心が苦しくて仕方が無いんですよ』
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 『もしもし「……」とくに用事はないですけど、%CALLNAME:MASTER%の声が聞きたかったので』
					PRINTFORML 『「……」、一日会えなかっただけで寂しい、なんて私の柄ではなかった筈なんですけどね』
				ENDIF
			ELSE
				IF 陥落状態() >= 4
					PRINTFORML 「……主様と一日でも会えないなんて残念ね」
					PRINTFORML 「きっと、主様はそんなコト考えてもいないでしょうけど」
					PRINTFORML 「はぁ……愛しています、主様」
				ELSEIF 陥落状態() == 3
					PRINTFORML 「……まあ、あの人にも生活があるものね」
					PRINTFORML 「……たった一日会えない位で、落ち込むなんて、ね」
				ELSEIF 陥落状態() == 2
					PRINTFORML 「……せいせいするわね」
					PRINTFORML 「はぁ」
				ENDIF
			ENDIF
		;一週間（拠点違いならよくある？
		ELSEIF ARG == 7
			IF GETBIT(CFLAG:1490,5) && GET_MAPID(CFLAG:MASTER:現在位置) != GET_MAPID(CFLAG:現在位置) && !RAND:2
				IF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 『ぬ～し～さ～ま～、な・ん・で、会ってくれないんですか！』
						PRINTFORML 『主様ギュッとして、すりすりしてれろじゅぱして、ぬぽぢゅぽしてほしいのに』
						PRINTFORML 『「……」、全部主様が相手してくれないから悪いんです！』
					ELSE
						PRINTFORML 『主様……、私に、どこか至らぬところがありましたか？』
						PRINTFORML 『「……」、なら、どうして会ってくださらないんですか？』
						PRINTFORML 『主様が望むならどんなことでも受け入れます。ですから会いたいです』
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 『こんばんは、%CALLNAME:MASTER%はお元気ですか？』
					PRINTFORML 『「……」それはよかった。それなら、たまには会いに来てくれませんか？』
				ELSEIF 陥落状態() == 2
					PRINTFORML 『もし、もし……「……」、別に用なんてないですけど』
					PRINTFORML 『「……」、っ！　バカな事を言わないでください！　仏心なんて出すんじゃありませんでした！』
				ENDIF
			ELSE
				IF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 「……主様、私の事、嫌いになったんですか？」
						PRINTFORML 「……なんで、会ってくれないんですか？」
						PRINTFORML 「主様、主様ぁ」
					ELSE
						PRINTFORML 「主様、愛しています。主様、どうして、会ってくださらないんですか」
						PRINTFORML 「……はぁ…………、こんな事が、こんなにも苦しいなんて」
						PRINTFORML 「これならいっそ……、いえ、そんなことを考えては駄目」
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「恋慕の情は、たった一時間を千年に匹敵させる毒薬……か」
					PRINTFORML 「一週間も会えないなんて、……哀しいわね」
				ELSEIF 陥落状態() == 2
					PRINTFORML 「せいせいする、せいせいしてるわよ」
					PRINTFORML 「なのになんでこんな」
				ENDIF
			ENDIF
		;一ヶ月（意図的に避けないと難しい？
		ELSEIF ARG == 30
			IF GETBIT(CFLAG:1490,5) && GET_MAPID(CFLAG:MASTER:現在位置) != GET_MAPID(CFLAG:現在位置) && !RAND:2
				IF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 『ぬしさまのばかあほおたんこなす』
						PRINTFORML 『「……」……主様が会ってくれないからです』
						PRINTFORML 『主様、わたし、いらないなら、邪魔なら、そう言ってください』
					ELSE
						PRINTFORML 『主様……、私の存在が、迷惑なら、そう言ってください』
						PRINTFORML 『「……」？　なら、どうして一月も放置してるんですか』
						PRINTFORML 『……はぁ、これだけされても、主様を嫌いになれない自分を嫌いになりそうです』
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 『「…………」、%CALLNAME:MASTER%の声が、聞きたくなっただけですよ』
					PRINTFORML 『……逢いたい、です。会って欲しい、です』
				ELSEIF 陥落状態() == 2
					PRINTFORML 『一月もこないとか、珍しいですね。できればそのまま来ないでください』
					PRINTFORML 『「……」別に、%CALLNAME:MASTER%とは違って忙しいので』
				ENDIF
			ELSE
				IF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 「なんで、なんで逢ってくれないんですか主様」
						PRINTFORML 「主様のいぢわる、大好きなのに、こんなに大好きなのに」
						PRINTFORML 「主様のばかぁ」
					ELSE
						PRINTFORML 「……はぁ、主様、どうして逢ってくれないのですか」
						PRINTFORML 「きっと、他意は無いと言うのでしょうけど」
						PRINTFORML 「なのに、嫌いにはなれないなんて」
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「……はぁ……、避けられているのかしら」
					PRINTFORML 「あの人には、他にも思いを懸ける人もいますし、しょうが無いのでしょうね」
				ELSEIF 陥落状態() == 2
					PRINTFORML 「……はぁ。なんであんな輩の事を」
					PRINTFORML 「無視すれば良いだけ、なのに」
				ENDIF
			ENDIF
		;それ以降は五分の一
		ELSEIF ARG > 30 && !RAND:5
			IF GETBIT(CFLAG:1490,5) && GET_MAPID(CFLAG:MASTER:現在位置) != GET_MAPID(CFLAG:現在位置) && !RAND:2
				IF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 『ぐす、ひく、ぬしさま、ぬしさまぁ』
						PRINTFORML 『「……」……、ぬしさまが、きてくれないから、です、あってくれないからです』
						PRINTFORML 『わた、わたし、わたし、ぬしさまの、めーわくなんです、か』
					ELSE
						PRINTFORML 『主様、こちらから逢いに行っても顔を合わせることすらしてくれないのは何故です』
						PRINTFORML 『「……」そうやって、私を嬲り者にしたいのですか？』
						PRINTFORML 『「……」はぁ……、嘘をつかない主様の言葉を、信じたいです』
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 『もしもし、少しは構ってくれてもいいんじゃないですか？』
					PRINTFORML 『「……」唐突にもなります。わざと避けられるのは不快です』
				ELSEIF 陥落状態() == 2
					PRINTFORML 『「……」別に用はないですよ、ただの嫌がらせです』
					PRINTFORML 『「……」、っ、ふざけるのも大概にしてください』
				ENDIF
			ELSE
				IF 陥落状態() >= 4
					IF 陥落状態() == 5
						PRINTFORML 「主様、主様ぁ……ひくっ、ぐす……なんで、なんで」
						PRINTFORML 「逢いたい、逢いたいです、主様、ぐす……」
						PRINTFORML 「ぬしさま、ぬしさまぁ……」
					ELSE
						PRINTFORML 「……主様、私の事、嫌いになりましたか？」
						PRINTFORML 「恋人を一月以上も顔を合わせてくれないなんて、そういうことですよね」
						PRINTFORML 「違うと言うなら、せめて一目だけでも会いたいです」
					ENDIF
				ELSEIF 陥落状態() == 3
					PRINTFORML 「逢いに行っても避けられる、そんな相手に懸想するなんてね」
					PRINTFORML 「ふふ、バカみたい……ほんと、ばか、みたい…………ぐす」
				ELSEIF 陥落状態() == 2
					PRINTFORML 「……本当にせいせいしてるんだから、きにもしてないんだから」
					PRINTFORML 「…………はぁ……」
				ENDIF
			ENDIF
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今日会っている（別マップ時だけ
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0 && GET_MAPID(CFLAG:MASTER:現在位置) != GET_MAPID(CFLAG:現在位置)
		IF CFLAG:1493 >= 30
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「はぁ……、主様ぁ」
					PRINTFORML 「毎日でも逢いたいのに、またほったらかされるのかな」
					PRINTFORML 「いぢわる……主様のいぢわる……」
				ELSE
					PRINTFORML 「ふぅ、やっぱり主様と逢えるだけで、心が癒やされるわね」
					PRINTFORML 「……できるなら、毎日会いたいし、いっそ、監禁して手元に……」
					PRINTFORML 「と、さすがにそんなコトをしたら博麗の巫女に殴り込まれるかしら」
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「ふふ、やっと会えたわね。こんなことで嬉しくなるんだからバカみたい」
				PRINTFORML 「……でも、もうすこし頻繁に逢いたいところね」
			ELSEIF 陥落状態() == 2
				PRINTFORML 「……本当、最低なんだから、なのになんで」
				PRINTFORML 「嬉しくない、あんなのと会えたのなんて不快なだけ、なの、に……」
			ENDIF
		ELSEIF CFLAG:1493 >= 7
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「むー、本当に、主様はいぢわるなんだから」
					PRINTFORML 「こんな可愛くて、望めばどんなＨなことでもする恋人がいるのに」
					PRINTFORML 「釣った魚に餌をやらないなんて、流行らないんだから」
				ELSE
					PRINTFORML 「はぁ、全く、主様にも困ったものです」
					PRINTFORML 「恋人を放っておいて、ふらふらふらふらと」
					PRINTFORML 「いい加減、怒っても良いかしら」
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「せめて、もう少し逢える時間が欲しいわね」
				PRINTFORML 「あの人にソレを求めるのは間違っているけれど」
			ELSEIF 陥落状態() == 2
				PRINTFORML 「ふん、気持ち悪い。いなくなれば良いのに」
				PRINTFORML 「そう、それだけのコトなのに」
			ENDIF
		ELSEIF !CFLAG:1493
			IF 陥落状態() >= 4
				IF 陥落状態() == 5
					PRINTFORML 「んふふ、今日も主様と逢えた」
					PRINTFORML 「やっぱり主様とは毎日あいたいなぁ」
					PRINTFORML 「……家に連れ込んで監禁しようかしら」
				ELSE
					PRINTFORML 「やっぱり、主様とは毎日逢いたいわね」
					PRINTFORML 「はぁ、こちらに居を移すか、こちらから居を移すか、どちらが良いかしら」
					PRINTFORML 「もう本当に主様にも困ったものです」
				ENDIF
			ELSEIF 陥落状態() == 3
				PRINTFORML 「うふふ、今日はあの人に会えたし、明日は何か良いことがありそうね」
				PRINTFORML 「できれば、明日も逢いたいところだけど」
			ELSEIF 陥落状態() == 2
				PRINTFORML 「はぁ、あんなのと遭遇するなんて気分が悪いわ」
				PRINTFORML 「明日は良いことがあれば良いのだけれど」
			ENDIF
		ENDIF
		CFLAG:1493 = 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1

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

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

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

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

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

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

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_K49_LOST_VIRGIN_STOP
;-------------------------------------------------
PRINTFORML
RETURN 1

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

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

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