path: ERB/대사_메시지관련/개인대사/063 카게로/M_KOJO_K63_自慰系(あなた)コマンド_t.ERB


code:
;※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
;汎用喘ぎ声関数
;@KX_AEGI(ARGS,ARG)
;
;○式中関数として呼べる喘ぎ声
;○CALL HPH_PRINT,@"「%KX_AEGI()%」"
;　とか
;　CALL PRINT_STR,@"「%KX_AEGI()%」"
;　とかいう形式で呼び出しすれば、ハートマークにも対応可。
;
;・第一引数は喘ぎ時のシチュエーション
;	ARGS == "控えめ"みたいに喘ぎ時のシチュエーションを손가락定。
;
;
;・第二引数は最大喘ぎ回数の制限
;	特に손가락定しないなら、PALAM:욕정に応じて変化
;	「%KX_AEGI("んほお")%おまんこズボズボされてこわれちゃうのぉっ！！！」
;	のように記述した時に
;	「あ～～～～～っ！！んおおおお～～～～～っ！！しゅごひっ！！しゅごひのぉっ！！！！おま
;	んこズボズボされてこわれちゃうのぉっ！！！」
;	みたいに変なタイミングで改行が挟まらないように制御したい
;※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
;----------------------------------------------------------------------------------------
;
;----------------------------------------------------------------------------------------

@K65_AEGI(ARGS,ARG)
#FUNCTIONS
#DIMS AEGI					; 喘ぎ声本体
#DIM RAND_MAX				; 喘ぎ回数の손가락定
#DIMS AEGI_TYPE,10			; 喘ぎ声タイプの손가락定
#DIMS IKITSUGI_TYPE,10		; 息継ぎタイプの손가락定
#DIMS MATSUBI_TYPE,10		; 末尾タイプの손가락定
#DIM NUM_TYPEA				; 喘ぎ声タイプの要素数
#DIM NUM_TYPEI				; 息継ぎタイプの要素数
#DIM NUM_TYPEM				; 末尾タイプの要素数

;初期化
VARSET AEGI
VARSET LOCAL
VARSET AEGI_TYPE
VARSET IKITSUGI_TYPE
VARSET MATSUBI_TYPE

;喘ぎ回数の손가락定
IF ARG == 0
	RAND_MAX = 2 + RAND:3 + (PALAM:욕정 >= 500) + (PALAM:욕정 >= 3000) + (PALAM:욕정 >= 30000)
ELSE
	RAND_MAX = ARG
ENDIF

;----------------------------------------------------------------------------------------
;喘ぎ声タイプの손가락定
;第一引数で손가락定したシチュごとに喘ぎ声/息継ぎ/末尾タイプを定義する。
;----------------------------------------------------------------------------------------

SELECTCASE ARGS
	CASE "控えめ"
		IF CUP:TARGET:쾌M > 0
			AEGI_TYPE:0 '= "吐息", "キス軽め", "キス軽め", "キス軽め"
		ELSE
			AEGI_TYPE:0 '= "吐息", "控えめ", "控えめ"
		ENDIF
		IKITSUGI_TYPE:0 '= "、", "、",  "っ、",  "っ…",  "…",  "…"
		MATSUBI_TYPE:0 '= "",  "",  "っ…",  "…", "…",  "ッ…"
	CASE "フェラ音"
		AEGI_TYPE:0 '= "吐息",  "キス",  "ディープキス", "ディープキス"
		IKITSUGI_TYPE:0 '= "、",  "っ、",  "…",  "っ…",  "ッ、"
		MATSUBI_TYPE:0 '= "",  "…"
		;기교が高い場合、じゅぼ音も加える。
		IF ABL:TARGET:기교 > 4
			AEGI_TYPE:4 '= "ディープフェラ","ディープフェラ"
			IKITSUGI_TYPE:5 '= "っ…！","…っ！"
			MATSUBI_TYPE:3 '= "っ…！","…っ！"
			;정액중독高い場合、ハートマーク付与
			IF ABL:TARGET:정액중독 > 4
				IKITSUGI_TYPE:7 '= "HPH", "っHPH"
				MATSUBI_TYPE:5 '= "HPH", "っHPH"
			ENDIF
		ENDIF
	;追加用
	;CASE ""
	;	AEGI_TYPE:0 '=
	;	IKITSUGI_TYPE:0 '=
	;	MATSUBI_TYPE:0 '=

	CASEELSE
		IF CUP:TARGET:쾌M > 0
			AEGI_TYPE:0 '= "吐息", "キス", "キス","キス軽め"
			IKITSUGI_TYPE:0 '= "、", "…","っ、","ッ、"
			MATSUBI_TYPE:0 '= "", "…っ", "…"

			SIF ABL:TARGET:기교 > 4
				AEGI_TYPE:4 '= "吐息", "ディープキス", "ディープキス"
		ELSE
			AEGI_TYPE:0 '= "吐息", "控えめ"
			IKITSUGI_TYPE:0 '= "、" ,"…", "っ、","ッ、"
			MATSUBI_TYPE:0 '= "", "っ…", "…"
		ENDIF
ENDSELECT

NUM_TYPEA = 10 - MATCH(AEGI_TYPE,"")
NUM_TYPEI = 10 - MATCH(IKITSUGI_TYPE,"")
NUM_TYPEM = 10 - MATCH(MATSUBI_TYPE,"")

;연모時はハートの抽選率UP
IF TALENT:연모 && NUM_TYPEI <=9
	IKITSUGI_TYPE:NUM_TYPEI '= "HPH"
	NUM_TYPEI += 1
ENDIF
IF TALENT:연모 && NUM_TYPEM <=8
	MATSUBI_TYPE:NUM_TYPEM '= "HPH", "っHPH"
	NUM_TYPEM += 1
ENDIF

;발정時はハートの抽選率UP
IF TCVAR:발정 && NUM_TYPEI <=8
	IKITSUGI_TYPE:NUM_TYPEI '= "HPH", "っHPH"
	NUM_TYPEI += 2
ENDIF
IF TCVAR:발정 && NUM_TYPEM <=8
	MATSUBI_TYPE:NUM_TYPEM '= "HPH", "っHPH"
	NUM_TYPEM += 2
ENDIF

WHILE (RAND_MAX - LOCAL) > 0

;----------------------------------------------------------------------------------------
;喘ぎ声本体部
;

SELECTCASE AEGI_TYPE:(RAND:NUM_TYPEA)
	CASE "吐息"
		SELECTCASE RAND:8
			CASE 0
				AEGI += "は"
			CASE 1
				AEGI += "はぁ"
			CASE 2
				AEGI += "はふ"
			CASE 3
				AEGI += "ふ"
			CASE 4
				AEGI += "ふぅ"
			CASE 5
				AEGI += "ん"
			CASE 6
				AEGI += "んん"
			CASE 7
				AEGI += "く"
		ENDSELECT
	CASE "控えめ"
		SELECTCASE RAND:11
			CASE 0
				AEGI += "あ"
			CASE 1
				AEGI += "ふ"
			CASE 2
				AEGI += "や"
			CASE 3
				AEGI += "ぁん"
			CASE 4
				AEGI += "はぁ"
			CASE 5
				AEGI += "ぅん"
			CASE 6
				AEGI += "ああ"
			CASE 7
				AEGI += "あぅ"
			CASE 8
				AEGI += "ひぅ"
			CASE 9
				AEGI += "う"
			CASE 10
				AEGI += "ぁ"
			CASE 11
				AEGI += "んぅ"
		ENDSELECT
	CASE "喘ぎ"
		SELECTCASE RAND:11
			CASE 0
				AEGI += "あん"
			CASE 1
				AEGI += "きゃう"
			CASE 2
				AEGI += "はぁん"
			CASE 3
				AEGI += "ふぁあ"
			CASE 4
				AEGI += "やぁ"
			CASE 5
				AEGI += "あうぅ"
			CASE 6
				AEGI += "ひあ"
			CASE 7
				AEGI += "あぁ"
			CASE 8
				AEGI += "くぅ"
			CASE 9
				AEGI += "ああ"
			CASE 10
				AEGI += "はあぁ"
		ENDSELECT
	CASE "キス"
		SELECTCASE RAND:8
			CASE 0
				AEGI += "ちゅ"
			CASE 1
				AEGI += "ちゅう"
			CASE 2
				AEGI += "ちゅぅ"
			CASE 3
				AEGI += "ちゅる"
			CASE 4
				AEGI += "ちゅむ"
			CASE 5
				AEGI += "ちゅく"
			CASE 6
				AEGI += "にゅちゅ"
			CASE 7
				AEGI += "んちゅ"
			CASE 8
				AEGI += "んむ"
		ENDSELECT
	CASE "キス軽め"
		SELECTCASE RAND:3
			CASE 0
				AEGI += "ちゅ"
			CASE 1
				AEGI += "ちゅ"
			CASE 2
				AEGI += "ちゅぅ"
		ENDSELECT
	CASE "ディープキス"
		SELECTCASE RAND:14
			CASE 0
				AEGI += "ちゅりゅ"
			CASE 1
				AEGI += "れりゅ"
			CASE 2
				AEGI += "りゅじゅ"
			CASE 3
				AEGI += "ちゅるるぅ"
			CASE 4
				AEGI += "ちゅぅ～"
			CASE 5
				AEGI += "にゅる"
			CASE 6
				AEGI += "れるれるぅ"
			CASE 7
				AEGI += "れるりゅぅ"
			CASE 8
				AEGI += "にゅりゅぅ"
			CASE 9
				AEGI += "りゅぷ"
			CASE 10
				AEGI += "ちゅく"
			CASE 11
				AEGI += "にゅじゅ"
			CASE 12
				AEGI += "れるぅ"
			CASE 13
				AEGI += "ぬちゅ"
			CASE 14
				AEGI += "れるれるぅ"
		ENDSELECT
	CASE "ディープフェラ"
		SELECTCASE RAND:11
			CASE 0
				AEGI += "じゅぶ"
			CASE 1
				AEGI += "じゅぼ"
			CASE 2
				AEGI += "くぷ"
			CASE 3
				AEGI += "くぽ"
			CASE 4
				AEGI += "じゅるちゅぅ"
			CASE 5
				AEGI += "ちゅぶぶぅ"
			CASE 6
				AEGI += "じゅりゅぅ～～"
			CASE 7
				AEGI += "ぐぽ"
			CASE 8
				AEGI += "むぐ"
			CASE 9
				AEGI += "ずりゅうう"
			CASE 10
				AEGI += "にゅぽ"
		ENDSELECT
	CASEELSE
		AEGI += "ほげ"
ENDSELECT

;RAND_MAX回喘ぎ声代入後、末尾へ
SIF RAND_MAX - LOCAL <= 1
	BREAK

;息継ぎの挿入
AEGI += IKITSUGI_TYPE:(RAND:NUM_TYPEI)

LOCAL++
WEND

;末尾部の挿入
AEGI += MATSUBI_TYPE:(RAND:NUM_TYPEM)

RETURNF AEGI

repo_name: purugi/eraTWKR

path: ERB/대사_메시지관련/개인대사/065 모미지/K65_自動喘ぎ.ERB

license: mit


code:
;-------------------------------------------------
; eraTheWorld proto4.520用 椛口上（キャラクターの名前を入れる、下にコンセプトなど一言あれば入れる）
;-------------------------------------------------
;他者による修正、加筆、改変については、同梱のライセンス条項に従ってください。
;当口上への加筆・改変の際には、同梱の更新情報.txtに変更内容を記載して頂けると助かります。
;
;◇デフォルト能力
;	従順2,教養1,戦闘能力3
;	[処女][キス未経験][気丈][自制心][保守的][貞操観念][痛みに強い][献身的][小柄体型][C敏感][貧乳][酒豪][イヌミミ][居場所察知]
;	自慰経験5
;
;◇キャラコンセプト
;	[発情]ってのは実に良い響きだなァ！
;
;	椛はまじめな下っ端天狗さんだよ
;	でも酒の席で同僚天狗たちからあけすけなエロトークをされまくっていろいろ溜まってるよ（現状特に生かされていない脳内設定）
;
;◇ちょっとした追加要素
;	ENCOUNTERおよびUPDATEの際にバストサイズを変更可能に。
;	もみぱいのサイズは諸説入り乱れておりますゆえ。
;
;	媚薬を飲ませると[発情]します。
;	お茶に一服盛ってもうふふ中に渡してもOKです。

;**** FlagManagement **********************************************************
;本口上にて使用しているCFLAG・TCVAR等
;
;CFLAG:1001 UPDATE判定時のバストサイズ変更選択肢の有無
;CFLAG:1002 MASTERNAME:65の設定
;CFLAG:1800 弾幕勝負イベント進行用フラグ
;
;TCVAR:350 MASTERの射精カウンタ　EX:MASTER:사정で参照するとほかの子とシて射精した回数も含まれちゃうからね。
;TCVAR:351 弾幕勝負イベント・ハンデ管理用変数
;
;******************************************************************************

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

;RESULTS = _TEST_

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

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

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

;CFLAG:X:면간대사있음 = 0
;CFLAG:X:시간정지대사있음 = 0

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

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

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

IF !CFLAG:65:1001
	PRINTFORML 모미지의 가슴 사이즈를 변경할 수 있습니다.
	PRINTFORML 변경하시겠습니까？
	PRINTFORML
	PRINTFORML [0] 한다 (UPDATE때에 다시 변경할 수 있습니다)
	PRINTFORML [1] 보류한다
	PRINTFORML [2] 이제 변경하지 않는다
	$INPUT_LOOP_K65_BS
	INPUT
	IF RESULT == 0
		PRINTFORML
		PRINTFORML [0] 작은 몸집에 빈유,좋죠　(TW디폴트)
		PRINTFORML [1] 보통이 좋죠
		PRINTFORML [2] 로리 거유, 좋죠
		$INPUT_LOOP_K65_ENCOUNTER
		INPUT
		IF RESULT == 0
			PRINTFORMW 모미지는 [빈유]입니다.
			TALENT:65:105 = -1
		ELSEIF RESULT == 1
			PRINTFORMW 모미지는 [빈유]도 [거유]도 아닙니다.
			TALENT:65:105 = 0
		ELSEIF RESULT == 2
			PRINTFORMW 모미지는 [거유]입니다.
			TALENT:65:105 = 1
		ELSE
			GOTO INPUT_LOOP_K65_ENCOUNTER
		ENDIF
	ELSEIF RESULT == 1
		PRINTFORMW 모미지의 가슴 사이즈 변경을 보류합니다.
	ELSEIF RESULT == 2
		PRINTFORMW 앞으로, 이 선택지는 표시되지 않습니다.
		CFLAG:65:1001 = 1
	ELSE
		GOTO INPUT_LOOP_K65_BS
	ENDIF
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K65
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
;経験の変更は齟齬が出る場合がありますので、CSVを修正し同梱する事を推奨します

PRINTFORML
PRINTFORML 모미지의 가슴 사이즈를 변경할 수 있습니다.
PRINTFORML （덧붙여、UPDATE시 가슴 사이즈를 변경할 수 있습니다）
PRINTFORML
PRINTFORML [0] 작은 몸집에 빈유, 좋죠　(TW디폴트)
PRINTFORML [1] 보통이 좋죠
PRINTFORML [2] 로리 거유、좋죠
$INPUT_LOOP_K65_ENCOUNTER
INPUT
IF RESULT == 0
	TALENT:65:105 = -1
PRINTFORMW 모미지는 [빈유]입니다.
ELSEIF RESULT == 1
	TALENT:65:105 = 0
	PRINTFORMW 모미지는 [빈유]도 [거유]도 아닙니다.
ELSEIF RESULT == 2
	TALENT:65:105 = 1
	PRINTFORMW 모미지는 [거유]입니다
ELSE
	GOTO INPUT_LOOP_K65_ENCOUNTER
ENDIF

;仕事中
IF CFLAG:행동 == 5
	PRINTFORML %CALLNAME:MASTER%(이)가 산길을 걸으며 산책하고 있는데, 자그마난 소녀가 길가에 서 있는 것을 발견했다.
	PRINTFORML 은백색의 머리카락을 바람에 흩날리며, 정수리의 이누미미로 끊임없이 주위를 살피고 있었다.
	PRINTFORMW 아무래도, 그녀는 초계중인 백랑텐구인 것 같다.
	PRINTFORML
	PRINTFORML %CALLNAME:MASTER%로부터 쏟아지는 호기심 가득한 시선을 눈치챘는지, 그녀는 주황색 눈동자를 이쪽으로 돌리고는 꾸벅 인사를 했다.
	PRINTFORML 무척이나 자연스럽고 초연한 몸짓에, 자신 또한 그녀에게 인사를 건네고 말았다.
	PRINTFORML 익숙한 움직임으로 미루어 볼 때, 그녀는 오랫동안 초계 임무에 종사하고 있을지도 모른다.
	PRINTFORML
	PRINTFORML %CALLNAME:MASTER%(은)는 백랑텐구 소녀에게 초면 인사를 했다.
	PRINTFORML 「이거 정말, 처음 뵙겠습니다... 정중한 인사, 감사합니다」
	PRINTFORMW 「최근 이곳에 오신 분이시군요. 소문으로 들었습니다」
	PRINTFORML
	PRINTFORML 「저는 이누바시리 모미지. 요괴의 산에 사는 백랑텐구입니다」
	PRINTFORML 훈련된 모습으로부터 일전하여, 그녀는 붙임성 있는 미소를 지어왔다.
	PRINTFORML 꽤나 온·오프가 뚜렷한 아가씨인 것 같다.
	PRINTFORMW %CALLNAME:MASTER%(은)는 잘 부탁한다고 말하며 미소를 돌려주었다.
	PRINTFORML
	PRINTFORMW
;それ以外
ELSE
	SELECTCASE TALENT:65:105
		;ひんにゅー
		CASE IS < 0
			PRINTFORML
		;ふにゅー
		CASE 0

		;きょにゅー
		CASEELSE

	ENDSELECT
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;デート帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K65_1(ARG,ARG:1)
;口上主はTARGET
;地の文表示
;CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;下駄の鼻緒が切れちゃいました→顔が近づく、目と目が合う…　この椛はそういうベタベタな感じでいいんだよ…
	PRINTL
	PRINTFORML 「앗...」
	PRINTFORMW …데이트에서 돌아오는 길에, 갑자기 모미지의 모습이 사라졌다…
	PRINTL
	PRINTFORML 「아야야… 죄송해요, 넘어져버렸습니다…」
	PRINTFORML CALLNAME:MASTER%(은)는 당황하며 모미지에게 가까이 다가가서, 그녀를 걱정했다.
	PRINTFORML 「죄송해요, 하지만 괜찮아요… 조금 멍때리는 바람에…」
	PRINTFORMW 「…앗」
	PRINTFORML 돌연, 모미지는 발밑으로 시선을 돌렸다.
	PRINTFORMW 시선의 끝을 따라가니, 나막신의 끈이 끊어져 있었다.
	PRINTFORML 「…아하하, 죄송합니다… 딱히, 이런 때에 끊어지지 않았어도…」
	PRINTFORML 변명하는 듯이 웃는 모미지를 달래면서, %CALLNAME:MASTER%(은)는 나막신의 상태를 살펴보았다.
	PRINTFORMW 다행히도, 갖고 있는 도구로 임시 수선은 할 수 있을 것 같다.
	PRINTFORML 「아…」
	PRINTFORMW 모미지가 말 하는 것이 먼저였는가, %CALLNAME:MASTER%(이)가 모미지 쪽을 돌아보는 것이 먼저였는가.
	PRINTFORML
	PRINTFORMW 어느 쪽이 빨랐든, 나막신에 정신이 팔려있었던 %CALLNAME:MASTER%의 얼굴은 모미지의 얼굴 바로 옆에 있어서.
	PRINTFORML
	CALL HPH_PRINT,@"「츄웃…HPH」","L"
	PRINTFORMW 눈치챘을 때에는、두 사람의 입술이 살포시 겹쳐져 있었다.
	PRINTFORML ……
	PRINTFORMW …
	PRINTFORMW 다음 순간, 펑 하는 소리를 내며 모미지의 얼굴이 새빨갛게 물들었다.
	PRINTFORML 「아, 그…！！그게에에에에에에에엣！！！！！！！」
	PRINTFORML 「대체할 나막신！！！ 대체할 나막신이！！ 집에！！ 있으니까요오오오！！！」
	PRINTFORML 「저！ 가지러 다녀 올게요！！」
	PRINTFORMW 모미지의 모습이 일순간에 산쪽으로 사라져버렸다…
	PRINTFORMW ………
	PRINTFORMW ……
	PRINTFORMW …
	PRINTFORML 한참을 달려 침착해진 모미지는, 가는 손가락 끝을 가볍게 입술에 대고 있었다…
	PRINTFORMW 「…어떡하지. 이런, 기분……」
	PRINTFORML
	PRINTFORML 안절부절하고, 다시 한번 뛰고 싶기도 하고, 여기에 머물러 조용히 고동을 느끼고 싶은 것 같기도 했다.
	PRINTFORMW %CALLNAME:MASTER%에게 품었던 사랑의 설렘은, 모미지가 지금까지 경험해 본 적이 없는 감각이었다…
	;キスをキャンセルしたい場合は以下を開放
	;TCVAR:키스캔슬 = 1
ENDIF
RETURN 1

;==================================================
;デート帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K65_2(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_2(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;告白内容
	;この告白内容表示後に受けるかどうかの選択分が表示されます
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		;初告白
		IF CFLAG:1100 < 2
			CFLAG:1100 = 2
		;2度目以降
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=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

ENDIF
RETURN 1

;==================================================
;デート帰り
;==================================================
@M_KOJO_SPEVENT_K65_3(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_3(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印3>2レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_EVENT_K65_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:빡침
			PRINTFORMW
		ELSEIF BASE:MASTER:체력 <= 800
			PRINTFORML 「앗…」
			PRINTFORMW 「왠지 모르게 발걸음이 불안한 것 같은데… %CALLNAME:MASTER%씨, 괜찮으신가요…？」
		ELSEIF BASE:MASTER:기력 <= 0
			PRINTFORMW 「피곤하신 것 같네요… 빨리 주무시는 편이 좋을거라고요？」
		;MASTERの自室が山頂
		ELSEIF MAIN_MAP == 8
			SELECTCASE RAND:2
				CASE 0

				CASE 1
					PRINTFORMW 「\@ TIME:2 >= 5 && TIME:2 <= 7 ? 안녕하세요 # 안녕하세요 \@, %CALLNAME:MASTER%씨」
			ENDSELECT
		ELSE
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「아, 실례하겠습니다」
					PRINTFORMW 모미지는 꾸벅 고개를 숙였다.
				CASE 1
					PRINTFORMW 「\@ TIME:2 >= 5 && TIME:2 <= 7 ? 안녕하세요 # 안녕하세요 \@, %CALLNAME:MASTER%씨」
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて一緒に入る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて出て行った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で遭遇した
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;仕事中
		IF CFLAG:행동 == 5

		;山頂
		ELSEIF CFLAG:현재위치/100 == 8
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「\@ TIME:2 >= 5 ? 안녕하세요 # 안녕하세요 \@、%CALLNAME:MASTER%씨」
					PRINTFORMW 「등산하러 오셨나요？」
				CASE 1
					PRINTFORMW 모미지는 %CALLNAME:MASTER%의 모습을 알아차리곤, 가볍게 인사를 건냈다.
			ENDSELECT
		ELSE
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;他キャラとデート中に遭遇した
	;ARG:1にデート相手
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;[思慕]以上なら千里眼でMASTERをチラ見するくらいはしてるだろうし
		;MASTERとデート相手がシてるかどうかってくらいなら視ちゃってるんじゃないかな…
		IF (CFLAG:(ARG:1):기정사실 & 合意_うふふ) && 陥落状態() >= 1
			IF TALENT:연인
				PRINTFORML 「안녕하세요, %CALLNAME:MASTER%씨」
				PRINTFORML 「저… 언제나 당신을 지켜보고 있으니까요?」
				PRINTFORMW 모미지는 웃는 얼굴을 하고 있지만, 분명히 눈이 웃지 않고 있었다…
				;BASE:분노 +=
			ELSE
				PRINTFORML 「앗…」
				PRINTFORMW 모미지는 %CALLNAME:MASTER%(와)과 %CALLNAME:(ARG:1)%에게 인사를 하고서, 허둥지둥 물러났다…
				IF RAND:2
					PRINTFORML （그 두 사람, 그런 관계인거지…）
					PRINTFORMW （…사고라고 해도, 저런 마음을 보게 되다니, 나…）
				ENDIF
			ENDIF
		ELSE
			PRINTFORMW 모미지는 %CALLNAME:MASTER%(와)과 %CALLNAME:(ARG:1)%에게 인사를 하고는, 싱긋 미소를 지으며 가버렸다…
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K65_2(ARG,ARG:1)
CALL MESSAGE_GOODMONING(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;非同棲かつ相手が先に起きてる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;TARGET私室にMASTERが入っている（恋慕時添い寝中就寝時のみ？
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が起きている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が寝ている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERが起きていて、相手が起きてきた
	;添い寝時TARGET起床はこちら（TARGET衰弱or添い寝中TARGET睡魔負け後そのままMASTERが起き続けた上で相手が起床した場合限定
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;-------------------------------------------------
		;非同棲
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;同棲中
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;自室に帰る（定時になって寝る）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;眠そうにしている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;睡眠中（起きていないので会話というよりは寝言？）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;イタズラ中
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 4
		;PRINTFORMW
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;衰弱中（恋慕付き拠点内キャラがMAIN_MAPで衰弱状態になった場合か、お招き部屋で相手が衰弱した場合に発生
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（部屋まで運ばれる）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが自室まで戻ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;そのまま着替えて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他キャラとのＨを止めさせて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;非在住TARGETがMAIN_MAPで休憩
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;前のターンから一緒の部屋にいる状態で相手が寝る（お招き部屋含む（
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORMW
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;移動時すれちがい
;==================================================
@M_KOJO_EVENT_K65_4(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=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_K65_5(ARG,ARG:1)
;口上主はTARGET
;ARGに入ってきたキャラ（人数が膨大なので、自己把握自己責任で
;--------------------------------------------------
;記入チェック（=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
	;その他（キャラ指定なし
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を目撃した（馴れ合い度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;負けじと参加（馴れ合い度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;気まずそうに立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を見られた（目撃者の馴れ合い度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が負けじと参加（目撃者の馴れ合い度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;押し倒した
;==================================================
@M_KOJO_EVENT_K65_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
			PRINTFORML
			IF TCVAR:발정
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「…왜 그러시는건가요, 정말」
						PRINTFORML 「제가 근질근질하는 것을 알고 있는 주제에, 이곳저곳 더듬거나 쿡쿡 찌르거나…」
						CALL HPH_PRINT,@"「제대로, 책임져 주세요…HPH」", "W"
					CASE 1
						CALL HPH_PRINT,@"「하ー앗、하ー앗…%CALLNAME:MASTER%씨이…HPH」", "L"
						PRINTFORML 자그마난 몸으로부터 나왔다곤 상상도 할 수 없는 힘으로 억눌려, %CALLNAME:MASTER%(은)는 꼼짝도 못하게 되었다.
						CALL HPH_PRINT,@"「하도록 하죠…？아…HPH」", "L"
						PRINTFORML 사랑스럽고 부드러운 목소리로 모미지는 애정을 요구해왔다. 하지만, 그 눈은 완전히 가라앉아 있었다.
						PRINTFORMW …%CALLNAME:MASTER%에게 거부권은 없는 것 같았다.
					CASE 2
						PRINTFORML 「……혹시, 이런 식으로 제게 밀쳐 넘어지는 것을 기대하셨던 건가요？」
						CALL HPH_PRINT,@"「%CALLNAME:MASTER%씨는 엣찌……HPH」", "W"
				ENDSELECT
			ELSE
				;IF GROUPMATCH(PREVCOM, 310, 313, 314, 315,316)
				;	PRINTFORML 「%CALLNAME:MASTER%さんはひどい人です」
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「…왜 그러시는건가요, 정말」
						PRINTFORML 「이곳저곳 더듬거나 쿡쿡 찌르거나…」
						PRINTFORMW 「저라고 해도, 언제까지나 참을 수 있는 것은 아니니까요…」
					CASE 1
						PRINTFORML 「…우우」
						PRINTFORML 「이렇게 달아올라진 상태로는, 수습이 되지 않습니다…」
						PRINTFORMW 「%CALLNAME:MASTER%씨, 당분간 어울려 주세요…」
				ENDSELECT
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERに抱きついた（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;なだめられた（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;-------------------------------------------------
		;抜け出した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード満足終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード強制終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;抜け出す失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;好きにして状態から抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			IF TCVAR:발정
				PRINTFORML 「정말. 도망치려고 하면, 안된, 다고요」
				CALL HPH_PRINT,@"「먼저 말을 꺼낸 것은 %CALLNAME:MASTER%씨였는데, 자지가 바보가 될 때까지 용서해 주지 않을거에요HPH」", "W"
			ELSE
				PRINTFORML 「정말… 이제와서 겁을 먹으신건가요…？」
				CALL HPH_PRINT,@"「안됩니다。엣찌한 %CALLNAME:MASTER%씨가 반성 할 때까지, 잔뜩 혼내 줄 테니까요…」", "W"
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;欲求不満が高くて抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			IF TCVAR:발정
				PRINTFORML 「정말. 도망가려고 해도, 안～돼, 라고요」
				CALL HPH_PRINT,@"「좀 더 많~이 쥐어짜내서、좀 더 많~이 사정을 해주지 않으면, 만족할 수 없어요…HPH」", "W"
			ELSE
				PRINTFORML 「우우… 이렇게 흥분한 상태로는, 어디에도 갈 수 없다고요…」
				PRINTFORMW 「좀 더… 좀 더만, 조금만 더, 어울려 줄 수 없는건가요…」
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;浴場で遭遇
;==================================================
@M_KOJO_EVENT_K65_11(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=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
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出される（怒り）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕・衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される（衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;仕事開始（職場へ移動する）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF EX:질내정액 + EX:애널내정액 >= 100
			;MASTERが山頂にいる
			IF CFLAG:MASTER:현재위치/100 == 8
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「그러니까, 수고하셨습니다…」
						PRINTFORML 모미지의 후배처럼 보이는 백랑텐구는 수컷 냄새에 조금 얼굴을 찡그렸지만,
						PRINTFORML 그 발생원을 눈치채자 얼굴을 새빨갛게 물들며, 인사를 하는 둥 마는 둥 하고는 떠났다…
						PRINTFORML 「…우우」
					CASE 1
						PRINTFORML 「저기, 수고하셨습니다…」
						PRINTFORML 쭈뼛쭈뼛 다가오는 모미지를 보면, 동료처럼 보이는 백랑텐구는 히죽히죽 미소를 띄며 그녀의 어깨를 두드리곤 떠났다…
				ENDSELECT
			ELSE
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML （이렇게 가득 차서… 분명 동료들에게 들켜버려…）
					CASE 1
						PRINTFORML （우우… 너무 걸으면, 흘러내릴 것 같아…）
				ENDSELECT
			ENDIF
		ELSE
			SELECTCASE RAND:3
				CASE 0
				PRINTFORML 「아, 벌써 시간이 이렇게…」
				CASE 1
				PRINTFORML 「오늘은 어떤 것이 발견될까요…」
				CASE 2
				PRINTFORML 「자, 열심히 순찰하러 가도록 하죠！」
			ENDSELECT
		ENDIF
		PRINTFORML
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;業務中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF EX:질내정액 + EX:애널내정액 >= 100
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML （눈치채지…않았, 지？）
					PRINTFORML 모미지는 안절부절하면서 주위를 둘러보고 있다.
				CASE 1
					PRINTFORML （우… 너무 걸으면, 흘러내릴 것 같아…）
				CASE 2
					PRINTFORML \@ EX:질내정액 >0 ? 자궁 # 항문 \@안의 정액이 신경 쓰이는지, 모미지는 일에 열중하지 못하는 것 같다…
			ENDSELECT
		ELSE
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 모미지는 늠름한 표정으로 주위를 둘러보고 있다.
				CASE 1
					PRINTFORML 칼을 메고, 꼿꼿이 등줄기를 편 모미지의 모습은 작지만 위압감을 느끼게 한다.
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;仕事終了
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		SELECTCASE RAND:3
			CASE 0
			PRINTFORML 「오늘은 여기까지네요」
			CASE 1
			PRINTFORML 「교대 시간이네요」
			CASE 2
			PRINTFORML 「오늘도 무사히, 근무 종료입니다」
		ENDSELECT
	RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		PRINTFORML （배고프다…）
		PRINTFORML （%CALLNAME:MASTER%씨 쪽에서 맛있을 것 같은 냄새가 나네…）
		PRINTFORMW （그렇지만, 「조금만 줄 수 있나요？」라는 말을 하면 식욕이 강한 아가씨라고 생각할지도 모르고…）
		PRINTFORML
		PRINTFORMW 꼬르르르륵……
		PRINTFORML
		PRINTFORMW 모미지의 배소리가, 주위에 울려퍼졌다…
		PRINTFORML
		PRINTFORMW 어쩐지 견딜 수 없게 된 %CALLNAME:MASTER%(은)는, 아무 말 없이 음식을 건내주었다…
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;未実装（押し倒しコマンドに統合？
	;MASTERが押し倒した（ウフフ開始時）
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;逢瀬終了（ウフフ終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		;椛がダウンして終了
		IF BASE:체력 < 500
			;おなかたぷたぷ
			IF 充填率(65,1) >= 50
				PRINTFORML 「하아―… 하아―… 하앗-……」
				CALL HPH_PRINT,@"「うあ、ぁっ……HPH」", "W"
				PRINTFORML 피폐해진 모미지가 몸을 이완시키자, 여러번을 걸쳐 흘러들어간 농후한 액체가
				PRINTFORMW 꿀럭꿀럭 질구에서 흘러나와, 지면을 적셨다…
			;MASTERが10回以上射精
			;技巧がアップするとだいたい条件を満たしてしまうので表示頻度は1/3か1/4くらいでもいいかもしれないなーと。
			ELSEIF TCVAR:350 > 3 && RAND:3 == 0
				;IF TCVAR:발정
				;
				;ELSE
					PRINTFORML 「하앗~…이, 이젠 무리…」
					PRINTFORMW 체력의 한계에 이르른 모미지는, 추욱\@ OUTROOF(CFLAG:현재위치) ? %CALLNAME:MASTER%에게 몸을 기댔다. # 누워버렸다. \@
					PRINTFORMW 「우우… 어째서 그렇게 몇번이나 낼 수 있는건가요…」
					PRINTFORMW 「……제가 너무나도 사랑스럽기 때문에, 라니……」
					PRINTFORMW 「…그런 거, 치사해요」
				;ENDIF
			ELSEIF TALENT:연모
				IF TCVAR:발정
					PRINTFORMW 「」
				ELSE
					PRINTFORMW 「」
				ENDIF
			ELSE

			ENDIF
		;イキすぎ
		ELSEIF EX:V절정 > 15 && BASE:체력 < MAXBASE:체력/2 && BASE:기력 <= 0
		ELSEIF TALENT:연모
		ELSE
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;添い寝を始めた（開始時）(存在せず
	;記入チェック
	;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
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;時止め終了時
;==================================================
@M_KOJO_EVENT_K65_17(ARG,ARG:1)
;口上主はTARGET
;排他と明記されていないモノは状況によっては連続で表示されるので注意
;ARGに射精状況
;ARG:1に射精状態
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;ARG=1～3は排他
	;謎の快感
	;記入チェック（=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
		;精液中毒低精飲
		IF ARG:1 == 1
		;精液中毒低吐き出し
		ELSEIF ARG:1 == 2
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
		;精液中毒高精飲
		ELSEIF ARG:1 == 4
		;濃厚精液＆精液中毒低吐き出し
		ELSEIF ARG:1 == 5
		;濃厚精液＆精液中毒高精飲
		ELSEIF ARG:1 == 6
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;幼稚持ち＆精液経験100未満
		IF ARG:1 == 1
		;通常ぬぐい取り
		ELSEIF ARG:1 == 2
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;ぬぐい取り
		IF ARG:1 == 1
		;舐めとり
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚アナル射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;Ａ感覚2以下
		IF ARG:1 == 1
		;ソレ以外
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚処女喪失】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚膣内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;非処女膣内射精ピルなし
		IF ARG:1 == 1
		;非処女膣内射精ピルあり
		ELSEIF ARG:1 == 2
		;処女膣内射精
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K65_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TCVAR:발정
			PRINTFORML 「아우…그,우읏～」
			PRINTFORML 「지금 이대로라면, 정말로 아기가 생겨버리니까요…」
			PRINTFORMW 「부디, 피임만은… 제대로, 해주세요…」
		ELSE
			PRINTFORML 「저기… 음…」
			PRINTFORML 「피임은, 확실하게 해주세요…」
			PRINTFORMW 모미지는 %CALLNAME:MASTER%의 눈을 빤히 바라보고 있다…
		ENDIF
		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
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K65_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=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
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K65_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=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
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K65_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		PRINTFORMW 잡무를 마치고 잠자리에 든 모미지는, 졸면서 하루의 일을 되새기고 있었다.
		PRINTFORML （오늘도 %CALLNAME:MASTER%씨의 이야기는 재미있었어…）
		PRINTFORMW （내일도 또, 만날 수 있을까…）
		PRINTFORML
		PRINTFORML 문득 깨닫고 나니, %CALLNAME:MASTER%에 대해서 생각하고 있었다.
		PRINTFORMW 그런 순간들이 최근 늘어나고 있다고 모미지는 느끼고 있었다.
		PRINTFORMW （나…\@ TALENT:MASTER:성별 == 2 ? 그 # 그녀 \@를, 좋아하는 걸까…）
		PRINTFORML
		PRINTFORMW 술렁술렁.
		PRINTFORML 여느때와 다름없는 나뭇잎이 바람에 스치는 소리가, 오늘 밤은 묘하게 귀에 맴도는 것 같다는 생각이 들어.
		PRINTFORMW 모미지는 잠들지 못하고, 그저 뱅글뱅글 사고에 빠졌다.
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;セフレ取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K65_22(ARG,ARG:1)
;口上主はARG
;ARG:0に自慰状況
;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
	;-------------------------------------------------
	;無知持ち（自慰経験(調教自慰経験は差し引き)による分岐あり
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		LOCAL:2 = EXP:자위경험 - EXP:조교자위경험
		;無知消去イベントあり（表示は一度だけ
		IF LOCAL:1 >= 25
		;地の文分岐。書きたい場合は[SKIPSTART][SKIPEND]を削除してください
		[SKIPSTART]
		ELSEIF LOCAL:1 >= 20
		ELSEIF LOCAL:1 >= 15
		ELSEIF LOCAL:1 >= 10
		ELSEIF LOCAL:1 >= 5
		[SKIPEND]
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質あり自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;-------------------------------------------------
		;Ｃ敏感orＣ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｖ敏感orＶ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ａ敏感orＡ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｂ敏感orＢ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部位指定無し
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 5
			PRINTFORML
			RETURN 1
		ENDIF
		;その他
		;上の分岐を一切書かずに、ここに書くことで陥落素質あり自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;-------------------------------------------------
		;尻穴膣腔同時
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;膣腔のみ
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;その他
		;上の分岐を一切書かずに、ここに書くことで自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;我慢
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K65_23(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
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K65_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_K65_25(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_K65_26(ARG,ARG:1)

;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;見られた瞬間
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;何もしない
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;そのまま続行
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		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
		;-------------------------------------------------
		CASE 6
		;事後お泊り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
	ENDSELECT
ENDIF

;==================================================
;相手からデートのお誘い
;==================================================
@M_KOJO_EVENT_K65_27(ARG,ARG:1)
;口上主はLOCAL
;ARG:1は目的地
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;誘い文句
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;脱衣口上
;==================================================
@M_KOJO_EVENT_K65_28(ARG,ARG:1)
;口上主はTARGET
;ARGに脱がし方選択
;ARG:1（ARG=3の場合のみあり）地の文の反応
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;全裸にする
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;下着姿にする
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;半脱ぎ
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;パンツちょうだい
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			SELECTCASE ARG:1
				;-------------------------------------------------
				CASE 0
				;交換です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 1
				;OK（嬉々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 2
				;OK（渋々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 3
				;嫌です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				RETURN 1
			ENDSELECT
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;怒り口上
;==================================================
@M_KOJO_EVENT_K65_29(ARG,ARG:1)
;口上主はTARGET
;ARGはTARGETの度胸で分岐
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
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
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
	;疲れた
		PRINTFORML
		IF TCVAR:발정
			PRINTFORML 「하앗~-… 하앗~-…… 우우……」
			PRINTFORML 모미지는 볼을 상기시킨 채, 거친 숨을 몰아쉬며 %CALLNAME:MASTER%의 가슴팍에 쓰러졌다.
			PRINTFORMW 그녀의 몸은 아직도 성욕으로 타오르고 있지만, 이젠 체력이 남아있지 않은 것 같다…
		ELSE
			PRINTFORML 「저기… 제가 먼저 시작해놓고 이런 말을 하는 것은 실례일지도 모릅니다만…」
			PRINTFORMW 「조금, 지쳐버렸습니다……」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
	;満足して解放
		PRINTFORML
		IF TCVAR:발정
			PRINTFORML 「하아~… 하아~…… 네에, 만족했습니다……」
			PRINTFORML 「…또, 하도록 하죠？」
			PRINTFORML 모미지는 볼을 상기시킨 채, 싱긋 미소를 지었다.
			PRINTFORMW ……역시, 이쪽에는 거부권따위 없는 것 같다.
		ELSE
			PRINTFORML 「후웃-……」
			PRINTFORM 「……읏！！죄송해요 죄송해요！！저, 도대체 무슨 말을……
			SIF ABL:욕망 > 3
				PRINTFORM 하지마안, 또 해 주시는거죠……？
			PRINTFORMW 」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
	;満足したところを押し倒された
		PRINTFORML
		IF TCVAR:발정
			PRINTFORML 「꺄……！？」
			PRINTFORML 갑작스러운 상황에 놀란 표정을 짓던 모미지였지만, 상황을 이해하자 난처한 듯 미소를 지었다.
			PRINTFORML 「그렇게나 했는데, 아직도 부족하신가요…？」
			CALL HPH_PRINT,@"「...정말. %CALLNAME:MASTER%씨는 짐승...HPH」", "L"
			PRINTFORMW 발정으로 녹아내린 눈동자에, 고혹적인 빛이 깃들었다…
		ELSE
			PRINTFORML %CALLNAME:MASTER%(은)는 만족한 듯이 숨을 몰아쉬던 모미지를 넘어뜨렸다！
			PRINTFORML 「꺄……！？」
			PRINTFORML 갑작스러운 상황에 경악을 감추지 못하던 모미지였지만, 상황을 이해하자 난처한 듯 미소를 지었다.
			PRINTFORML 「그렇게나 했는데, 아직도 부족하신가요…？」
			CALL HPH_PRINT,@"（우우, %CALLNAME:MASTER%씨는 역시 대단하시구나아...HPH）", "W"
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
	;壊れるまでしてあげる
		PRINTFORML
		IF TCVAR:발정
			PRINTFORML 「어… 아직도 하고 싶으신가요？」
			PRINTFORML %CALLNAME:MASTER%(을)를 내려다 보는 모미지의 눈동자에 기학적인 빛이 머문다.
			PRINTFORML 「정말, %CALLNAME:MASTER%씨는 변태…」
			PRINTFORML 「알았습니다.%CALLNAME:MASTER%씨가 텅 비게되어 자지를 못쓰게 될 때까지,
			CALL HPH_PRINT,@" 전부 짜내어버릴 테니까요...HPH」", "W"
		ELSE
			PRINTFORML 「어… 아직도 하고 싶으신기요？」
			PRINTFORML %CALLNAME:MASTER%(을)를 내려다보는 모미지는 놀라움에 눈이 휘둥그레졌다.
			PRINTFORML 「…그렇게나 기분이 좋으셨나요？」
			PRINTFORML %CALLNAME:MASTER%(이)가 고개를 끄덕이자, 상기된 모미지의 뺨이 한층 더 붉게 달아올랐다.
			PRINTFORML 「정말, %CALLNAME:MASTER%씨는 변태…」
			PRINTFORMW （뭔가, 굉장히 기쁘네…）
		ENDIF

		RETURN 1
	ENDIF
ENDIF
RETURN 1

[SKIPSTART]
;-------------------------------------------------
;オナバレ遭遇時の地の文。
;デフォルトのものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;置き換える気がないならスルー。
;-------------------------------------------------
@M_KOJO_EVENT_K65_ONABARE_1(ARG)
;-------------------------------------------------
IF ARG
	PRINTFORML A만지작거리고 있는 경우
ELSE
	PRINTFORML V만지작거리고 있는 경우
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレでそのまま続けてもらう場合の地の文。
;デフォルトのものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;置き換える気がないならスルー。
;-------------------------------------------------
@M_KOJO_EVENT_K65_ONABARE_2(ARG)
;-------------------------------------------------
IF ARG
	PRINTFORML A만지작거리고 있는 경우
ELSE
	PRINTFORML V만지작거리고 있는 경우
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレなし崩しックスの地の文。
;デフォルトのものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;置き換える気がないならスルー。
;-------------------------------------------------
@M_KOJO_EVENT_K65_ONABARE_3(前戯１,本番はどっちか,回数,注入量)
;-------------------------------------------------
#DIM 前戯１
;1=C 2=B 3=M
#DIM 本番はどっちか
;0でＶ、1でＡ
#DIM 注入量
#DIM 回数

SELECTCASE 前戯１
	CASE 1
		PRINTFORML Ｃ고문
	CASE 2
		PRINTFORML Ｂ고문
	CASE 3
		PRINTFORML Ｍ고문
ENDSELECT

IF 本番はどっちか
	PRINTFORML A그리고 실전
ELSE
	PRINTFORML V그리고 실전
ENDIF
;-------------------------------------------------
[SKIPEND]

path: ERB/대사_메시지관련/개인대사/065 모미지/M_KOJO_K65_イベント.ERB


path: ERB/대사_메시지관련/개인대사/065 모미지/M_KOJO_K65_カウンター.ERB


path: ERB/대사_메시지관련/개인대사/065 모미지/M_KOJO_K65_コマンド.ERB


code:
;
;セクハラ系コマンド
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;310,尻を撫でる
;TFLAG:193(1=不快(TALENT:臆病なら涙目) 2&&3=恥ずかしがる(TALENT:男嫌い兼MASTERが男なら、身をすくめる) 4=されるがまま)
;CFLAG:우후후==2&&TCVAR:20(パンツ無し顔面騎乗(70=クンニ強制 71=フェラチオ強制 72=アナル奉仕) 35=スカート内見せつけ 52=素股)
;CFLAG:우후후==2&&TEQUIP:식스나인(パンツありTCVAR:20(70～72)はこちら)
;PREVCOM(305=膝枕
;TFLAG:400(1=デート先or地底のモブが反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K65_310
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_310_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_310_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSEIF CFLAG:수면
	ELSE
		IF TCVAR:발정
			IF CFLAG:기정사실 & 合意_うふふ
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「아앙, 정말…」
						PRINTFORMW 모미지는 욕정에 찬 눈빛으로 이쪽을 응시하고 있다…
					CASE 1
						PRINTFORML 「하앗~, 후, 으응…」
						PRINTFORMW 아담한 엉덩이가 애무되자, 모미지는 뜨거운 한숨을 흘리고 있다…
					CASE 2
						CALL HPH_PRINT,@"「쿠우, 응…%CALLNAME:MASTER%씨이…HPH」", "L"
						PRINTFORMW 모미지는 %CALLNAME:MASTER%에게 기댄 체, 몸을 비비고 있다…
				ENDSELECT
			ELSE
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「지금은 안돼요, 안된다고요…」
						PRINTFORMW 모미지는 눈을 글썽거리며, 그저 %CALLNAME:MASTER%의 손가락을 참고 있다…
					CASE 1
						PRINTFORML 「후아앗…！」
						PRINTFORMW 발정한 모미지는, 아담한 엉덩이를 기어가는 쾌락에 못 이겨 목소리를 높이고 말았다…
				ENDSELECT
			ENDIF
		;膝枕直後
		ELSEIF PREVCOM == 305
			PRINTFORMW 「햣…！그런 못된 장난을 계속 하신다면, 이젠 무릎베개를 안 해줄 거라고요…？」
		ELSEIF TALENT:연모 && RAND:4 > 0
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「가, 갑자기 뭐하는 짓인가요」
					PRINTFORML 「엣… 시, 싫지는 않지만… 하, 우읏, 으응… 정말……」
					PRINTFORMW %CALLNAME:MASTER%(은)는 기분이 풀릴 때 까지 부드러운 모미지의 엉덩이를 즐겼다.
				CASE 1
					PRINTFORML 「하아, 후, 으응…」
					PRINTFORMW 자그마난 엉덩이가 애무되자, 모미지는 뜨거운 한숨을 흘리고 있다…
				CASE 2
					PRINTFORML 「그런 못된 장난은 그만둬 주세요…」
					PRINTFORML 모미지는 부끄럽다는 듯이 힐끔힐끔 주변을 둘러보았지만,
					PRINTFORMW %CALLNAME:MASTER%의 애무를 거부하는 일은 없었다…
			ENDSELECT
		ELSE
			SELECTCASE TFLAG:193
				;不快
				CASE 1
					PRINTFORML 「그만 좀 하세요！」
					PRINTFORMW 모미지는 %CALLNAME:MASTER%의 손을 떨쳐냈다.
				;恥ずかしがる
				CASE 2,3
					SELECTCASE RAND:2
						CASE 0
							PRINTFORMW 「저기, 그…」
						CASE 1
							PRINTFORMW 「부, 부끄러우니까요…」
					ENDSELECT
				;されるがまま
				CASE 4
					PRINTFORML 「웃, 흐읏…」
					PRINTFORMW 모미지는 조금 몸을 비틀며, 용서를 빌듯이 %CALLNAME:MASTER%(을)를 응시했다…
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;311,抱き付く
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:우후후==2&&TCVAR:20(32=前から抱きつく 60=ディープキス 73=ぱふぱふ 74=乳合わせ 77=乳を吸わせる ＶＡ性交(85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ) 86=だいしゅきホールド)
;
;TFLAG:400(1=デート先or地底のモブが反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K65_311
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_311_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_311_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSEIF CHK_DATENOW(CFLAG:LOCAL:데이트중)
	ELSEIF CFLAG:수면
	ELSE
		IF CFLAG:우후후 == 2
			SELECTCASE TCVAR:20
				;ディープキス
				CASE 60
					PRINTFORML 혀를 얽히게 하고 꼭 안아주자, 모미지는 기쁜듯이 안겨왔다…
					CALL HPH_PRINT,@"「응훗, 츄, 츄릅, 핥짝 츗, 푸핫……저기, 한 번 더…, 응, 츄우웃…HPH」", "W"
				;だいしゅきホールド
				CASE 86
					CALL HPH_PRINT,@"「읏HPH 앗HPH 좀더엇HPH 죰더어엇HPH」", "L"
					PRINTFORMW 자그마난 몸을 껴안고 좁을 질내를 휘저으면, 모미지는 환의에 찬 외침을 지르며 스스로 허리를 밀어 붙여왔다…
				CASEELSE
					SELECTCASE RAND:2
						CASE 0
							PRINTFORMW 「하앗~…%CALLNAME:MASTER%씨이, 따뜻하시네요…」
						CASE 1
							PRINTFORMW 「좀 더 세게, 껴안아 주세요…」
					ENDSELECT

			ENDSELECT
		ELSEIF TALENT:연인 && RAND:2
			IF TCVAR:발정
				SELECTCASE RAND:2
					CASE 0
						CALL HPH_PRINT,@"「%K65_AEGI("控えめ",3)%…저기, %CALLNAME:MASTER%씨이…HPH」","L"
						PRINTFORMW %CALLNAME:MASTER%에게 꼭 안겨진 체, 모미지는 쭈뼛쭈뼛 허벅지를 비비고 있다…
					CASE 1
						CALL HPH_PRINT,@"「%K65_AEGI("控えめ")%…하앗…HPH」","L"
						PRINTFORMW 모미지는 %CALLNAME:MASTER%의 몸을 껴안으면서, 부드러운 신체를 칠하고 있다…
						SIF RAND:3 == 0
							PRINTFORMW 그녀의 냄새를 남기는 것 같은 열렬한 포옹은, 마치 마킹과 같았다…
				ENDSELECT
			ELSE
				SELECTCASE RAND:2
					CASE 0
						CALL HPH_PRINT,@"「응…HPH」","L"
						PRINTFORMW 「계속, 이렇게 있고 싶어요…」
					CASE 1
						PRINTFORML 「우응…♪」
						CALL HPH_PRINT,@"「안아주세요…좀 더, 강하게…HPH」","W"
				ENDSELECT
			ENDIF
		ELSEIF TALENT:연모
			IF TCVAR:발정
				IF BASE:MASTER:발기 > 999 && CFLAG:기정사실 > 0 && RAND:2 == 0
					PRINTFORML 「아는,%CALLNAME:MASTER%씨의…이렇게 되어 버린다」
					CALL HPH_PRINT,@"「저기, 어딘가…사람이 없는 곳으로 가지 않으실래요…HPH」", "W"
				ELSE
					PRINTFORML （이렇게 안기기만 했을 뿐인데, 뱃속이 큥큥거려…）
					PRINTFORMW （…%CALLNAME:MASTER%씨를 원해서, 자궁이 쑤시고 있어…）
				ENDIF
			ELSE
				IF BASE:MASTER:발기 > 999 && CFLAG:기정사실 > 0 && RAND:2 == 0
					PRINTFORMW 「저,%CALLNAME:MASTER%씨…닿고, 있어요…」
					SIF PALAM:욕정 >= PALAMLV:4
						PRINTFORMW （우우…나도 이상한 기분이 되어버렸어…）
				ELSE
					SELECTCASE RAND:3
						CASE 0
							CALL HPH_PRINT,@"「응…HPH」", "L"
							PRINTFORMW 「%CALLNAME:MASTER%씨, 좋은 냄새가 나네요…」
						CASE 1
							PRINTFORMW 「에헤헤, %CALLNAME:MASTER%씨, 따뜻하다…」
						CASE 2
							PRINTFORML 「%CALLNAME:MASTER%씨이…」
							PRINTFORMW 모미지는 %CALLNAME:MASTER%의 가슴에 머리를 묻고 있다…
					ENDSELECT
				ENDIF

			ENDIF
		ELSEIF TALENT:사모
			IF TCVAR:발정
				PRINTFORML 「저, 저기이…」
				PRINTFORMW 모미지는 쭈뼛쭈뼛 허벅지를 비비고 있다…
			ELSE
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「우우…」
						PRINTFORMW 모미지는 뺨을 붉히며, 가만히 있다.
					CASE 1
						PRINTFORMW 모미지는 쭈뼛쭈뼛 하면서 %CALLNAME:MASTER%의 등에 팔을 돌리곤, 끌어안겨 왔다…
				ENDSELECT
			ENDIF
		;・非陥落時
		;親密>5 突然の事に驚いたのかじたばたと身体を揺らしている…
		ELSEIF ABL:친밀 > 5
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「가, 갑자기 무슨 짓인가요…？」
					PRINTFORMW 갑자기 안겨져서, 모미지는 당황하고 있다.
				CASE 1
					PRINTFORML 「우우…」
					PRINTFORMW 모미지는 곤란하다는 반응을 보이지만, 피하려는 의지는 없는 것 같다.
			ENDSELECT
		;親密<=5 大声を上げて%CALLNAME:MASTER%を突き飛ばした
		ELSE
		SELECTCASE RAND:2
			CASE 0
				PRINTFORMW 「꺄아！？ 노, 놀래키지 말아 주세요」
			CASE 1
				PRINTFORML 「꺄아！？」
				PRINTFORML 돌연 배후에서 껴안자, 놀라서 버둥거린 모미지의 팔꿈치가 %CALLNAME:MASTER%의 명치에 깔끔하게 들어갔다…
				PRINTFORMW 「괘, 괜찮으신가요！？」
		ENDSELECT
		ENDIF
	ENDIF

ENDIF
RETURN 1
;==================================================
;312,キスする
;TFLAG:193(99=拒絶(キス不可) 1=大成功 0=成功 -1=失敗)
;CFLAG:우후후==2&&TCVAR:20(32=前から抱きつく 50=手淫 60=キス 性交(85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ) 86=だいしゅきホールド)
;PREVCOM(305=膝枕
;TFLAG:400(1=デート先or地底のモブが反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K65_312
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_312_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_312_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSEIF CFLAG:수면
	ELSEIF CFLAG:TARGET:동침중
		PRINTFORML 「응…」
		CALL HPH_PRINT,@"「에헤헤…HPH」", "W"
	;拒絶
	ELSEIF TFLAG:193 == 99
		PRINTFORML 「가, 가깝다고요…？」
		PRINTFORMW 모미지는 몸을 빼며, 미심쩍은 듯이 %CALLNAME:MASTER%(을)를 바라보고 있다…
	ELSE
		;初めて
		IF FIRSTTIME(SELECTCOM)
			;デートキスイベント済み
			IF EXP:TARGET:키스경험 > 1
				PRINTFORML 「응읏…」
				PRINTFORML 「…%CALLNAME:MASTER%씨로부터 키스해 주는 것은, 이게 처음이네요」
				PRINTFORMW 「에헤헤, 어쩐지 기쁩니다」
			ELSE
				PRINTFORML 「응…！？」
				PRINTFORML 「가, 갑자기 무슨 짓을…！？」
				PRINTFORML （아, 이건, 퍼스트 키스…？）
				PRINTFORMW 모미지는 멍청한 표정으로 자신의 입술을 만지고 있다.
			ENDIF
		ELSEIF CFLAG:우후후 == 2
			SELECTCASE TCVAR:20
				;だいしゅきホールド
				CASE 86
					CALL HPH_PRINT,@"「읏！？응우읏…응츄읏, 츄우우웃HPH」","L"
					PRINTFORML 꽉 달라붙는 그녀에게 응해 %CALLNAME:MASTER%(이)가 입맞춤을 하면,
					PRINTFORMW 모미지는 감격에 겨운 듯 숨을 삼키며, 입술에 달라붙어 왔다…
				;キス
				CASE 60
					CALL HPH_PRINT,@"「응읏, 우, 후후…츄, 츄웃HPH 핥짝, 핥짝핥짝…HPH」", "L"
					PRINTFORMW %CALLNAME:MASTER%(이)가 키스로 답하면, 모미지는 한층 더 열렬하게 혀를 얽혔다…
				CASEELSE
					SELECTCASE RAND:2
						CASE 0
							PRINTFORML 「츄릇, 츄, 츄웃, 핥짝…」
							PRINTFORMW 모미지는 열중하며 %CALLNAME:MASTER%(와)과 입맞춤을 하고 있다.
						CASE 1
							CALL HPH_PRINT,@"「우무, 푸… 키스라니, 굉장히 기분이 좋네요HPH 츄, 츄부, 츄무…」", "W"
					ENDSELECT
			ENDSELECT
		ELSEIF TCVAR:발정
			SELECTCASE RAND:2
				CASE 0
					CALL HPH_PRINT,@"「하앗, %CALLNAME:MASTER%씨이, 츄, 츄우웃…HPH」", "L"
					PRINTFORMW 모미지는 적극적으로 혀를 얽혀오며, 키스의 유열에 잠겨 있다…
				CASE 1
					CALL HPH_PRINT,@"「츄루, 응츄, 츄, 핥짝…HPH」", "L"
					PRINTFORMW （%CALLNAME:MASTER%씨와의 키스, 굉장히 기분 좋아…）
					SIF CFLAG:기정사실 & 合意_うふふ
						PRINTFORMW （하지만, 참을 수 없게 되어버릴 것 같아…）
			ENDSELECT
		ELSEIF ABL:친밀 >= 5
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「움, 츄웃…」
					PRINTFORM 모미지는
					SIF TALENT:MASTER:체형 >= 0
						PRINTFORM 까치발을 들어
					PRINTFORMW %CALLNAME:MASTER%(와)과 키스를 즐기고 있다…
				CASE 1
					PRINTFORML 「츄웃…에헤헤…」
					PRINTFORMW 모미지는 살짝 볼을 붉히며 미소를 지었다.
			ENDSELECT
		ELSE
		    PRINTFORMW 「우응…！？…푸웃」
			PRINTFORMW 「그러니까, 그…」
		ENDIF
	ENDIF

ENDIF
RETURN 1
;==================================================
;313,胸愛撫
;CFLAG:우후후==2&&TCVAR:20(27=谷間を見せる 33=胸を揉ませる 53=パイズリ(小分岐は地の文EVENT_MESSAGE_COM_セクハラ.ERB参照) 73=ぱふぱふ 77=乳を吸わせる 性交(85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ) 86=だいしゅきホールド)
;ABL:B감각(2未満=性的には感じてない 5未満=多少感じてる 5以上=カイカン)
;TFLAG:400(1=デート先or地底のモブが反応する)
;乳のサイズでも変わる場合があるので、地の文EVENT_MESSAGE_COM_セクハラ.ERB参照
;台詞＋胸サイズごとのフレーバーテキストって形式が無難かしらね
;==================================================
@M_KOJO_MESSAGE_COM_K65_313
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_313_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_313_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70

	ELSEIF CFLAG:수면

	ELSEIF CFLAG:우후후 == 2
		IF TCVAR:발정
			SELECTCASE TCVAR:20
				;胸を揉ませる
				CASE 33
				SELECTCASE RAND:3
					CASE 0
						CALL HPH_PRINT,@"「후읏, 우…아핫HPH」", "L"
						PRINTFORMW 모미지는 눈을 반짝이며 당신의 손을 보다 강하게 가슴으로 짓눌렀다.
					CASE 1
					;きょにゅー以上
						IF TALENT:가슴사이즈 > 0
							PRINTFORML 「에헤, 가슴에는 꽤나 자신이 있다고요…」
							PRINTFORML 가슴팍에 밀어붙인 %CALLNAME:MASTER%의 손바닥으로 자신의 풍만한 가슴을 주무르며,
							PRINTFORMW 모미지는 유열의 표정을 짓고 있다…
						;ひんにゅー以下
						ELSEIF TALENT:가슴사이즈 < 0
							CALL HPH_PRINT,@"「하아…앗HPH 가, 가슴이, 기분…죻아요오…HPH」", "L"
							PRINTFORMW 욕정해 예민해진 유두를 짓누르듯, 모미지는 %CALLNAME:MASTER%의 손바닥을 가슴팍으로 밀어 붙인다…
						;ふにゅー
						ELSE
							CALL HPH_PRINT,@"「%CALLNAME:MASTER%씨잇, 좀 더, 강하게에…ㅅHPHHPH」", "L"
							PRINTFORMW 그녀의 요구에 응해 보다 강하게 가슴을 주물러 주자, 모미지는 기쁜 듯이 몸을 떨었다.
						ENDIF
					CASE 3
						CALL HPH_PRINT,@"「후웃, 앗HPH 젖꼭지, 젖꼭지이이잇HPH」", "L"
						PRINTFORMW 긴장한 유두를 손톱 끝으로 부드럽게 긁으면, 모미지는 교성을 지르며 쾌락에 젖어 갔다…
				ENDSELECT
				;パイズリ
				CASE 53
					SELECTCASE RAND:3
						CASE 0
							CALL HPH_PRINT,@"「햐응！읏, 하앗, 좀 더어엇…HPH」", "L"
							PRINTFORMW %CALLNAME:MASTER%에게 유방을 희롱당해, 모미지는 괴로운 듯 한 한숨을 내쉬면서도 가슴으로 봉사를 계속하고 있다.
						CASE 1
							CALL HPH_PRINT,@"「아핫…HPH 가슴에, %CALLNAME:MASTER%씨의 냄새, 묻혀주세요…HPH」", "W"
						CASE 2
							PRINTFORML 「앙, 정말, 지금은 제가 %CALLNAME:MASTER%씨를 탓하고 있으니까요오…」
							CALL HPH_PRINT,@"「너무, 히양HPH 장난지지 말아주세요…」", "W"
					ENDSELECT
				;乳を吸わせる
				CASE 77
					SELECTCASE RAND:2
						CASE 0
							CALL HPH_PRINT,@"「후앗HPH 그렇게 젖꼭지를 쭈욱 빨면, 자궁이 울린다고요…HPH」", "W"
						CASE 1
							CALL HPH_PRINT,@"「꺗HPH 아, 후앗HPH 하앗HPH 히ー얏HPH %CALLNAME:MASTER%씨잇…」", "L"
							PRINTFORML 단단해진 유두를 입에 넣어 빨거나 굴려주면, 모미지는 감격에 겨운 듯 %CALLNAME:MASTER%의 머리를 껴안았다.
							PRINTFORMW 발정으로 달아오른 몸을 움찔움찔 떨면서, 모미지는 %CALLNAME:MASTER%(을)를 응시하는 것에 집중하고 있다…
					ENDSELECT
				;だいしゅきホールド
				CASE 86
					SELECTCASE BASE:PLAYER:2
						CASE 0 TO 2999
							;PRINTFORML %CALLNAME:PLAYER%は%CALLNAME:TARGET%と深く繋がったまま強く抱き合い、熱い口付けを交わした
							;PRINTFORML %CALLNAME:TARGET%は結合の時間をより長くしたいのか、ゆったりとしたストロークを開始した……
						CASE 3000 TO 9999
							;PRINTFORML %CALLNAME:PLAYER%は%CALLNAME:TARGET%と深く繋がったまま強く抱き合い、熱い口付けを交わした
							;PRINTFORML %CALLNAME:TARGET%は我慢できない様子で激しく腰を振り始めた
							;PRINTFORML 接合部からはとめどなく愛液が迸り、辺りにはグチュグチュと水音が響いている……
						CASEELSE
							SELECTCASE RAND:2
							CASE 0
								PRINTFORML 강렬한 사장감을 재촉당하며, %CALLNAME:MASTER%(은)는 모미지의 가슴을 힘껏 움켜쥐었다.
								CALL HPH_PRINT,@"「하앗HPH %CALLNAME:MASTER%씨잇…HPH %CALLNAME:MASTER%씨잇…ッHPH」", "L"
								PRINTFORMW 발정해버린 모미지의 몸은 그 아픔마저 쾌감으로 받아들여, 그녀는 더욱 흥분해 간다…
							CASE 1
								CALL HPH_PRINT,@"「와줘HPH 와줘엇HPHHPH %CALLNAME:MASTER%씨로 나를 가득 채워줘엇HPH」", "L"
								PRINTFORMW 모미지는 유두가 만지작거려지는 쾌감에 농락당하면서도, %CALLNAME:MASTER%의 자지를 찾아 생식기를 서로 밀착시켰다…
						ENDSELECT
					ENDSELECT
				;その他
				CASEELSE
					SELECTCASE RAND:3
						CASE 0
							CALL HPH_PRINT,@"「햣, 아핫…HPH %CALLNAME:MASTER%씨에게 만져지면, 굉장히 엣찌해…HPH」", "L"
							PRINTFORMW 모미지는 %CALLNAME:MASTER%(이)가 만질 때마다 뜨거운 한숨을 흘리고 있다.
						CASE 1
						;そういえばこの子[痛みに強い]ついてるのよね
							CALL HPH_PRINT,@"「에헷…더 세게, 찌부러뜨릴 정도로 주물러도 괜찮아요…HPH」", "L"
							CALL HPH_PRINT,@"「좀 더 흥분되도록, 좀 더 녹아내리게, 좀 더, 좀 더……HPH」", "W"
						CASE 2
							CALL HPH_PRINT,@"「햐앙HPH 그렇게 젖꼭지를 꼬집어버리면, 자궁이 큥큥거려요…HPH」", "W"
					ENDSELECT
			ENDSELECT
		;うふふ(not発情)
		ELSE
			SELECTCASE TCVAR:20
				;胸を揉ませる
				CASE 33
					SELECTCASE RAND:2
						CASE 0
							CALL HPH_PRINT,@"「히얏……젖꼭지 꼬집혀버려엇…히읏HPH」", "W"
						CASE 1
						;きょにゅー以上
							IF TALENT:가슴사이즈 > 0
								CALL HPH_PRINT,@"「후후…좋아하는만큼, 쓰담쓰담 해주세요…HPH」", "W"
							;ひんにゅー以下
							ELSEIF TALENT:가슴사이즈 < 0
								PRINTFORML 「응…이런 가슴이라도, 흥분해 주시나요…？」
								PRINTFORMW %CALLNAME:MASTER%(이)가 수긍하자, 모미지는 싱글벙글 웃으며 %CALLNAME:MASTER%에게 달라붙어 왔다.
							;ふにゅー
							ELSE
								CALL HPH_PRINT,@"「후후…좋아하는만큼, 쓰담쓰담 해주세요…HPH」", "W"
							ENDIF
					ENDSELECT
				;パイズリ
				CASE 53
					SELECTCASE RAND:2
						CASE 0
							CALL HPH_PRINT,@"「하응！？…정말, 심술쟁이라니까요…HPH」", "W"
						CASE 1
							PRINTFORML 「응읏…！！」
							PRINTFORML 「…좋아요…%CALLNAME:MASTER%씨가 가분이 좋아질 수 있도록, 움직이세요…」
							PRINTFORMW 「조금 아파도, 저는 괜찮으니까요…」
					ENDSELECT
				;だいしゅきホールド
				CASE 86
					SELECTCASE BASE:PLAYER:2
						CASE 0 TO 2999
							;PRINTFORML %CALLNAME:PLAYER%は%CALLNAME:TARGET%と深く繋がったまま強く抱き合い、熱い口付けを交わした
							;PRINTFORML %CALLNAME:TARGET%は結合の時間をより長くしたいのか、ゆったりとしたストロークを開始した……
						CASE 3000 TO 9999
							;PRINTFORML %CALLNAME:PLAYER%は%CALLNAME:TARGET%と深く繋がったまま強く抱き合い、熱い口付けを交わした
							;PRINTFORML %CALLNAME:TARGET%は我慢できない様子で激しく腰を振り始めた
							;PRINTFORML 接合部からはとめどなく愛液が迸り、辺りにはグチュグチュと水音が響いている……
						CASEELSE
							SELECTCASE RAND:2
							CASE 0
								CALL HPH_PRINT,@"「…읏！！이렇게, 딱딱하게 되었을 때 가슴을 만지면 안돼엣…HPH」"
								IF NOWEX:TARGET:V절정 || NOWEX:TARGET:B절정
									PRINTFORML
									CALL HPH_PRINT,@"「나도, 가버려어엇…HPH」", "W"
								ELSE
									PRINTFORMW
								ENDIF
							CASE 1
									CALL HPH_PRINT,@"「～～～～흐읏！！%CALLNAME:MASTER%씨잇HPH %CALLNAME:MASTER%씨이잇…HPH」", "L"
									PRINTFORML 강렬한 사정감을 자극받은 %CALLNAME:MASTER%의 가슴을 움켜쥐고,
									PRINTFORMW 모미지는 감격을 하는 듯한 교성을 지르며 성기끼리 바짝 밀착시켰다…
						ENDSELECT
					ENDSELECT
				;その他
				CASEELSE
					SELECTCASE RAND:3
						CASE 0
							CALL HPH_PRINT,@"「핫, 아…HPH」", "L"
							PRINTFORMW 모미지는 %CALLNAME:MASTER%(을)를 만질 때마다 뜨거운 한숨을 흘리고 있다.
						CASE 1
							CALL HPH_PRINT,@"「에헷, 좀 더 만져주세요…HPH」", "W"
						CASE 2
							CALL HPH_PRINT,@"「젖꼭지, 좋아요오…ㅅHPH」", "W"
					ENDSELECT
			ENDSELECT
		ENDIF
	;うふふ中でない
	ELSE
		;ABL:B감각(2未満=性的には感じてない 5未満=多少感じてる 5以上=カイカン)
		IF TCVAR:발정
			;「%CALLNAME:TARGET%はくすぐったそうにしている…」
			IF ABL:B감각 < 2
				;きょにゅー以上
				IF TALENT:가슴사이즈 > 0
					PRINTFORML 모미지의 풍만한 가슴에 %CALLNAME:MASTER%의 손이 파묻히고 있다…
					PRINTFORMW 「응읏…어쩐지, 간질간질하네요……」
				;ひんにゅー以下
				ELSEIF TALENT:가슴사이즈 < 0
					PRINTFORMW 「…후우, 읏…햣, 간지러워요……」
				;ふにゅー
				ELSE
					PRINTFORMW 「우우, 왠지 간질간질거려요…」
				ENDIF
			;「%CALLNAME:TARGET%は愛撫に熱い吐息を漏らし始めている…」
			ELSEIF ABL:B감각 < 5
				;台詞部分　後にフレーバーテキストが続く
				SELECTCASE RAND:2
					CASE 0
						CALL HPH_PRINT,@"「아핫…만지는 방식이 굉장하시네요오……HPH」"
					CASE 1
						CALL HPH_PRINT,@"「앙…HPH」", "L"
						PRINTFORML 「최근, 가슴을 만지는 것 만으로도 기분이 좋아져요…」
						CALL HPH_PRINT,@"「%CALLNAME:MASTER%씨 때문이라고요…HPH」"
				ENDSELECT
				;1/2で胸サイズに合わせたフレーバーテキスト
				;だってロリ巨乳用のOPPAI_DESCRIPTIONがないっぽいんだもの！
				IF RAND:2 == 0
					PRINTFORML
					;きょにゅー以上
					IF TALENT:가슴사이즈 > 0
						SELECTCASE RAND:2
							CASE 0
								PRINTFORMW 몸집이 작은 모미지의 풍만한 가슴이, %CALLNAME:MASTER%의 손가락에 따라 푸릉푸릉 형태를 바뀌어 간다…
							CASE 1
								PRINTFORMW 모미지는 때때로 몸을 움찔거리며, 커다란 가슴을 즐기는 %CALLNAME:MASTER%을 열정적인 시선으로 바라보고 있다.
						ENDSELECT
					;ひんにゅー以下
					ELSEIF TALENT:가슴사이즈 < 0
						PRINTFORMW 귀엽게 부푼 끝부분에 손가락을 대자, 모미지의 한숨이 한층 더 가빠졌다…
					;ふにゅー
					ELSE
						PRINTFORMW 형태가 좋은 가슴이 희롱당해, 모미지는 움찔움찔 몸을 떨고 있다.
					ENDIF
				ELSE
					PRINTFORMW
				ENDIF
			;「%CALLNAME:TARGET%はトロンとした表情になってされるがままになっている…」
			ELSE
				;台詞部分　後にフレーバーテキストが続く
				SELECTCASE RAND:4
					CASE 0
						PRINTFORML 「앙…아, 안돼요, 끝을 그렇게 만지며언…！」
						CALL HPH_PRINT,@"「참을 수 없게 되어버려요오…하아, 후으, 쿠읏HPH」"
					CASE 1
						CALL HPH_PRINT,@"「히얏, 앙…아앙HPH 아핫, 만지는 방식이 야해요…HPH」"
					CASE 2
						;袖なし上着って字面を見た瞬間から隙間に手を突っ込んでもみもみしてえって思い続けてたんだよォ！
						IF EQUIP:기모노 == 1
							PRINTFORML %CALLNAME:MASTER%(은)는 윗도리의 겨드랑이에 손을 넣어, 모미지의 %OPPAI_DESCRIPTION(65)%(을)를 마구 주물렀다.
							PRINTFORML 「왓…틈 사이로 손을 넣다니 %CALLNAME:MASTER%씨는 엣찌♪」
							CALL HPH_PRINT,@"「앗, 잠, 그렇게 만져버리며언HPH 응, 아앗…HPH」"
						ELSE
							CALL HPH_PRINT,@"「후아앗…가슴, 기분 좋아요…HPH」"
						ENDIF
					CASE 3
						IF CFLAG:기정사실 & 合意_うふふ
							PRINTFORML 「응…%CALLNAME:MASTER%씨가 자구 만지니까, 완전히 예민해져 버렸어요…」
							CALL HPH_PRINT,@"「책임져, 주세요…HPH」"
						ELSE
							CALL HPH_PRINT,@"「응…좀 더 세게 만져도 괜찮아요…HPH」"
						ENDIF
				ENDSELECT
				;1/2で胸サイズに合わせたフレーバーテキスト
				IF RAND:2 == 0
					PRINTFORML
					;きょにゅー以上
					IF TALENT:가슴사이즈 > 0
						SELECTCASE RAND:2
							CASE 0
								PRINTFORMW 자그마난 몸을 %CALLNAME:MASTER%에게 맡겨, 모미지는 애무의 쾌락에 잠겨있다…
							CASE 1
								PRINTFORMW 봉긋하게 여문 가슴을 만지작거리면、모미지는 아양을 떨듯이 자그마한 몸을 %CALLNAME:MASTER%에게 문질렀다…
							CASE 2
								PRINTFORMW 개발된 풍만한 가슴을 희롱하면, 모미지는 황홀해 하고 있다…
						ENDSELECT
					;ひんにゅー以下
					ELSEIF TALENT:가슴사이즈 < 0
						SELECTCASE RAND:2
							CASE 0
								PRINTFORMW 자그마난 몸을 %CALLNAME:MASTER%에게 맡기며, 모미지는 애무의 쾌락에 잠겨 있다…
							CASE 1
								PRINTFORMW 사랑스럽게 부푼 끝을 만질 때마다, 모미지는 움찔움찔 몸을 떨며 열띤 한숨 내쉬었다…
						ENDSELECT
					;ふにゅー
					ELSE
						SELECTCASE RAND:2
							CASE 0
								PRINTFORMW 자그마난 몸을 %CALLNAME:MASTER%에게 맡기며, 모미지는 애무의 쾌락에 잠겨 있다…
							CASE 1
								PRINTFORMW 개발된 가슴을 희롱하자, 모미지는 열띤 한숨을 내쉬고 있…
						ENDSELECT
					ENDIF
				ELSE
					PRINTFORMW
				ENDIF
			ENDIF
		;非うふふ中かつ非発情
		ELSE
			;「%CALLNAME:TARGET%はくすぐったそうにしている…」
			IF ABL:B감각 < 2
				;きょにゅー以上
				IF TALENT:가슴사이즈 > 0
					PRINTFORML 모미지의 풍만한 가슴에%CALLNAME:MASTER%의 손바닥이 파묻히고 있다…
					PRINTFORMW 「아, 너무 세게 만지면 아파요…」
				;ひんにゅー以下
				ELSEIF TALENT:가슴사이즈 < 0
					PRINTFORMW 「…아뇨, 이런 가슴을 만지면, 즐거운 것일까요…」
				;ふにゅー
				ELSE
					PRINTFORMW 「우우, 어쩐지 간질거려요…」
				ENDIF
			;「%CALLNAME:TARGET%は愛撫に熱い吐息を漏らし始めている…」
			ELSEIF ABL:B감각 < 5
				;台詞部分　後にフレーバーテキストが続く
				SELECTCASE RAND:2
					CASE 0
						PRINTFORM 「후읏, 응…마, 만지는 방식이 야하다고요……」
					CASE 1
						PRINTFORML 「앙…」
						PRINTFORM 「이, 이상한 소리를 내버렸잖아요오…」
				ENDSELECT
				;1/2で胸サイズに合わせたフレーバーテキスト
				IF RAND:2 == 0
					PRINTFORML
					;きょにゅー以上
					IF TALENT:가슴사이즈 > 0
						SELECTCASE RAND:2
							CASE 0
								PRINTFORMW 자그마난 모미지의 풍만한 가슴이, %CALLNAME:MASTER%의 손끝에 따라서 푸릉푸릉 형태를 바꾸고 있다…
							CASE 1
								PRINTFORMW 모미지는 가끔 몸부림을 치면서도, 얌전히 %CALLNAME:MASTER%에게 커다란 가슴을 농락당하고 있다.
						ENDSELECT
					;ひんにゅー以下
					ELSEIF TALENT:가슴사이즈 < 0
						PRINTFORMW 사랑스럽게 부푼 끝부분에 손가락을 대자, 모미지의 한숨이 한층 더 가빠졌다…
					;ふにゅー
					ELSE
						PRINTFORMW 형태가 좋은 가슴을 만지작거리자, 모미지는 움찔움찔 몸을 떨고 있다.
					ENDIF
				ELSE
					PRINTFORMW
				ENDIF
			;「%CALLNAME:TARGET%はトロンとした表情になってされるがままになっている…」
			ELSE
				;台詞部分　後にフレーバーテキストが続く
				SELECTCASE RAND:4
					CASE 0
						PRINTFORML 「앙…아, 안돼요, 끝을 그렇게 만져버리며언…！」
						PRINTFORM 「기, 기분이 엄청 좋아지고 있어요오…후앗, 응, 후읏…！」
					CASE 1
						PRINTFORM 「에헤헤, 많이 귀여워해 주세요…」
					CASE 2
						;袖なし上着ってのを見た瞬間から隙間に手を突っ込んでもみもみしてえって思い続けてたんだよォ！
						IF EQUIP:기모노 == 1
							PRINTFORML %CALLNAME:MASTER%(은)는 윗도리의 겨드랑이에 손을 넣어, 모미지의%OPPAI_DESCRIPTION(65)%(을)를 마구 주물렀다.
							PRINTFORM 「앗…틈 사이로 손을 넣으면 안된다고요…！후앗…！」
						ELSE
							PRINTFORM 「후아아…가슴, 기분 좋아요…」
						ENDIF
					CASE 3
						IF CFLAG:기정사실 & 合意_うふふ
							PRINTFORML 「응…%CALLNAME:MASTER%씨가 자꾸 만지니까, 완전히 예민해져 버렸어요…」
							CALL HPH_PRINT,@"「책임져, 주세요…HPH」"
						ELSE
							PRINTFORM 「응…좀 더 세게 만져도 괜찮아요…」
						ENDIF
				ENDSELECT
				;1/2で胸サイズに合わせたフレーバーテキスト
				IF RAND:2 == 0
					PRINTFORML
					;きょにゅー以上
					IF TALENT:가슴사이즈 > 0
						SELECTCASE RAND:2
							CASE 0
								PRINTFORMW 자그마난 몸을 %CALLNAME:MASTER%에게 맡겨, 모미지는 애무의 쾌락에 잠겨있다…
							CASE 1
								PRINTFORMW 봉긋하게 여문 가슴을 만지작거리면、모미지는 아양을 떨듯이 자그마한 몸을 %CALLNAME:MASTER%에게 문질렀다…
							CASE 2
								PRINTFORMW 개발된 풍만한 가슴을 희롱하면, 모미지는 황홀해 하고 있다…
						ENDSELECT
					;ひんにゅー以下
					ELSEIF TALENT:가슴사이즈 < 0
						SELECTCASE RAND:2
							CASE 0
								PRINTFORMW 자그마난 몸을 %CALLNAME:MASTER%에게 맡기며, 모미지는 애무의 쾌락에 잠겨 있다…
							CASE 1
								PRINTFORMW 사랑스럽게 부푼 끝을 만질 때마다, 모미지는 움찔움찔 몸을 떨며 열띤 한숨 내쉬었다…
						ENDSELECT
					;ふにゅー
					ELSE
						SELECTCASE RAND:2
							CASE 0
								PRINTFORMW 자그마난 몸을 %CALLNAME:MASTER%에게 맡기며, 모미지는 애무의 쾌락에 잠겨 있다…
							CASE 1
								PRINTFORMW 개발된 가슴을 희롱하자, 모미지는 열띤 한숨을 내쉬고 있다…
						ENDSELECT
					ENDIF
				ELSE
					PRINTFORMW
				ENDIF
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;314,アナル愛撫
;CFLAG:우후후==2&&TCVAR:20(72=アナル奉仕
;CFLAG:우후후==2&&TEQUIP:식스나인(パンツありTCVAR:20(70～72)はこちら)
;ABL:A감각(2未満=受け入れられない 4未満=異物感に翻弄 4以上=カイカン)
;TFLAG:400(1=デート先or地底のモブが反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K65_314
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_314_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_314_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;315,クリ愛撫
;CFLAG:우후후==2&&TCVAR:20(35=スカートの中を見せる 70=クンニ強制 85=Ｖ挿入する 86=だいしゅきホールド 87=Ａ挿入する 88=腰振りＶ 89=腰振り
;ABL:C감각(4未満=くすぐったい 6未満=ちょっといいかも 6以上=カイカン)
;TFLAG:400(1=デート先or地底のモブが反応する)
;椛はＣ敏感！感覚が低くてもすぐイッちゃうんだ！
;==================================================
@M_KOJO_MESSAGE_COM_K65_315
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_315_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_315_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSEIF CFLAG:수면
	ELSE
		IF CFLAG:우후후 == 2
			;うふふ中かつ発情
			IF TCVAR:발정
				SELECTCASE TCVAR:20
					;70=クンニ強制
					CASE 70
						CALL HPH_PRINT,@"「아후읏, 하아앗…HPH%CALLNAME:MASTER%씨의 혀, 기분 죠아아아……HPH」", "L"
						PRINTFORMW 민감한 부분을 핥아내리면, 모미지는 좀 더 애무를 요구하며 %CALLNAME:MASTER%의 얼굴에 비소를 들이밀었다…
					CASEELSE
						SELECTCASE RAND:2
							CASE 0
								CALL HPH_PRINT,@"「꺄앗, 응, 히얏HPH %CALLNAME:MASTER%씨잇HPH 기분 조아앗HPH」", "L"
								PRINTFORMW 약점인 음핵을 간질이면, 모미지는 유열의 표정을 짓고 있다…
							CASE 1
								CALL HPH_PRINT,@"「～～～흐웃HPH 거기잇HPH 조아해요오HPH」", "W"
						ENDSELECT
				ENDSELECT
			;うふふ中かつ非発情
			ELSE
				SELECTCASE TCVAR:20
					;70=クンニ強制
					CASE 70
						PRINTFORML 「아후웃, 응읏…！%CALLNAME:MASTER%씨의, 혀, 가아앗……！」
						PRINTFORMW 민감한 부분을 핥아내리자, 모미지는 기쁜 듯이 꼬리를 흔들었다…
					CASEELSE
						SELECTCASE RAND:2
							CASE 0
								PRINTFORML 「히얏！거기는, 예민하다고요…」
								CALL HPH_PRINT,@"「꺗, 큐읏, 응, 핫！안돼, 안돼요, 그렇게 괴롭히면, 앗HPH」", "W"
							CASE 1
								PRINTFORMW 「～～～읏！하앗…！거기 만져지면, 저느은…！」
						ENDSELECT
				ENDSELECT
			ENDIF
		;うふふ中でない
		ELSE
			;非うふふ・発情
			IF TCVAR:발정
				;ABL:C감각(4未満=くすぐったい 6未満=ちょっといいかも 6以上=カイカン)
				IF ABL:C감각 < 4
					SELECTCASE RAND:2
						CASE 0
							PRINTFORMW 「아, 응! 거기, 민감하니까앗…！조금, 상냥하게엣…」
						CASE 1
							CALL HPH_PRINT,@"「꺗, 아얏, 너무 강해요오…HPH」", "W"
					ENDSELECT
				ELSEIF ABL:C감각 < 6
					SELECTCASE RAND:2
						CASE 0
							CALL HPH_PRINT,@"「꺄응…！거기, 기분 좋아요오…HPH」", "W"
						CASE 1
							CALL HPH_PRINT,@"「히야앗！그렇…게 만지작거리면, 금방 가버려엇…HPH」", "W"
					ENDSELECT
				ELSE
					SELECTCASE RAND:2
						CASE 0
							CALL HPH_PRINT,@"「꺄응…！거기, 기분 좋아요오…HPH 좀 더, 좀 더HPH」", "W"
						CASE 1
							CALL HPH_PRINT,@"「하우웃…！이거, 너무 기분 좋아요…읏HPH 허리가앗, 멋대로오…HPH」", "L"
							PRINTFORMW 발정한 모미지는 허리를 들썩이며, %CALLNAME:MASTER%의 손끝으로 민감한 음핵을 문지르도록 하고 있다…
					ENDSELECT
				ENDIF
			ELSE
				;非うふふ・非発情
				;ABL:C감각(4未満=くすぐったい 6未満=ちょっといいかも 6以上=カイカン)
				IF ABL:C감각 < 4
					SELECTCASE RAND:2
						CASE 0
							PRINTFORMW 「안된단, 말이에요옷…후앗, 응읏…！」
						CASE 1
							PRINTFORMW 「거깃, 만지작거리면 싫다고요…！햣, 앗, 앙」
					ENDSELECT
				ELSEIF ABL:C감각 < 6
					SELECTCASE RAND:2
						CASE 0
							CALL HPH_PRINT,@"「안된단, 말이에요…！그런 곳을, 문지르면, 저느은…HPH」", "W"
						CASE 1
							CALL HPH_PRINT,@"「거기, 민감하니까요오…！앗, 쿠읏, 후앗, 우응…HPH」", "W"
					ENDSELECT
				ELSE
					SELECTCASE RAND:2
						CASE 0
							CALL HPH_PRINT,@"「안되는, 데에…HPH 앙, 하읏, 쿠흣HPH」", "L"
							PRINTFORMW %CALLNAME:MASTER%의 손가락 끝이 클리토스를 어루만질 때마다, 모미지는 강렬한 쾌락에 온 몸을 움찔거리고 있다…
						CASE 1
							CALL HPH_PRINT,@"「거기, 만지면…！앗, 응읏…갖고, 싶어진다고요오…HPH」", "W"
					ENDSELECT
				ENDIF
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;316,指挿入れ
;CFLAG:우후후==2&&TCVAR:20(35=スカートの中を見せる 70=クンニ強制 87=Ａ挿入する 89=腰振りＡ
;TALENT:처녀(指挿入れ連続時喪失注意、基本拒否ぎみ)
;ABL:V감각(1未満=違和感に戸惑う 5未満=ちょっと気持ちいい 5以上＝カイカン)
;TFLAG:400(1=デート先or地底のモブが反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K65_316
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_316_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_316_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF TCVAR:파과
		PRINTFORML 「우, 앗…」
		PRINTFORML 모미지가 흐느끼는 소리를 내며, 한 줄기의 피가 그녀의 다리에 흘러내렸다.
		PRINTFORML 「………너무해요, %CALLNAME:MASTER%씨」
		PRINTFORMW 눈가에 눈물을 글썽이며, 모미지는 떨리는 목소리로 말했다.
		SIF TALENT:연모
			PRINTFORMW （처음은, %CALLNAME:MASTER%씨에게 제대로 드리고 싶었는데…）
	ELSEIF TALENT:처녀
		PRINTFORML 「싫엇…안된다고요！！」
		PRINTFORML %CALLNAME:MASTER%의 손가락끝와 입구를 파악한 순간, 화가 소리를 높였다.
		IF TALENT:연모
			PRINTFORML 「그…저, 처음이에요…그러니까…」
			PRINTFORMW 모미지는 뺨을 붉게 물들며, 매달리듯 %CALLNAME:MASTER%(을)를 응시하고 있다…
		ENDIF
	ELSEIF TCVAR:발정
		;こなれてない
		IF ABL:V감각 < 2

		;ちょっと気持ちいい
		ELSEIF ABL:V감각 < 5
		;カイカン
		ELSE
			SELECTCASE RAND:2
			ENDSELECT
		ENDIF
	ELSE
		;こなれてない
		IF ABL:V감각 < 2
		;ちょっと気持ちいい
		ELSEIF ABL:V감각 < 5
		;カイカン
		ELSE
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;317,Ｖ腰を振る
;ABL:V감각(2未満=まだ気持ち良くない 5未満=ちょっと気持ちいい 5以上=カイカン
;==================================================
@M_KOJO_MESSAGE_COM_K65_317
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_317_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_317_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;318,Ａ腰を振る（現状存在せず
;==================================================
;@M_KOJO_MESSAGE_COM_K65_318
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K65_318_1
;RETURN RESULT

;@M_KOJO_MESSAGE_COM_K65_318_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;-------------------------------------------------
;IF LOCAL

;ENDIF
;RETURN 1
;==================================================
;330,スカートめくり
;TFLAG:193(-5=拒絶（ビンタ） -3=拒絶（つねり） -1=いやがる 0=いやがる（嬉しげ） 1=受け入れ)
;TFLAG:193=1&&ABL:노출벽(5以上=人目のある場所で、自らスカートをまくり上げる 4以下=人目のある場所でめくられるさいに弱い抵抗 3以上=人目のない場所で自らスカートをまくり上げる 3未満=弱い抵抗)
;TFLAG:400(1=デート先or地底のモブが反応する)
;後ろからピラリ、ではなく、前からペラって感じ（そうじゃなかったら、めくり上げようとするのを止めて即座にビンタとか無理、めくり上げられた後にしかならないしその状況ならビンタ食らうより普通に弾幕で一発ＫＯにならないほうがおかしい
;==================================================
@M_KOJO_MESSAGE_COM_K65_330
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_330_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_330_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSE
	ENDIF
ENDIF
RETURN 1

path: ERB/대사_메시지관련/개인대사/065 모미지/M_KOJO_K65_セクハラコマンド.ERB


path: ERB/대사_메시지관련/개인대사/065 모미지/M_KOJO_K65_ハードなコマンド.ERB


code:
;-------------------------------------------
;刻印取得
;-------------------------------------------
@M_KOJO_MESSAGE_MARKCNG_K65
;このままだと地の文が表示されません
;地の文を表示したい方は、下記のコメントアウトを削除して下さい
CALL MARK_MESSAGE
;苦痛刻印
IF TFLAG:22 == 1
	PRINTFORMW
ELSEIF TFLAG:22 == 2
	PRINTFORMW
ELSEIF TFLAG:22 == 3
	PRINTFORMW
ENDIF

;時姦刻印
IF TFLAG:시간각인취득 == 1
	PRINTFORMW
ELSEIF TFLAG:시간각인취득 == 2
	PRINTFORMW
ELSEIF TFLAG:시간각인취득 == 3
	PRINTFORMW
ENDIF

;快楽刻印
IF CFLAG:MASTER:장난 == 2
ELSE
	;PRINTFORML %CALLNAME:TARGET%は覚えたての快楽に身を打ち震わせていた……
	;%CALLNAME:TARGET%は快楽刻印LV1を得た
	IF TFLAG:23 == 1
		PRINTFORMW
	;%CALLNAME:TARGET%は快楽の余韻に顔を緩ませていた……
	;%CALLNAME:TARGET%は快楽刻印LV2を得た
	ELSEIF TFLAG:23 == 2
		PRINTFORMW
	;%CALLNAME:TARGET%は強烈な快楽に身も心も焦がしているようだ……
	;%CALLNAME:TARGET%は快楽刻印LV3を得た
	ELSEIF TFLAG:23 == 3
		PRINTFORMW
	ENDIF
ENDIF

;不埒刻印
;快楽による刻印
;LV1
;%CALLNAME:TARGET%は思わず可愛らしい嬌声を上げたかと思うと、こちらから目を逸らした……
;%CALLNAME:TARGET%は不埒刻印LV1を得た
IF TFLAG:24 == 11
	PRINTFORMW

;LV2
;%CALLNAME:TARGET%は快楽に震えながら、物欲しげな視線を送っていた……
;%CALLNAME:TARGET%は不埒刻印LV2を得た
ELSEIF TFLAG:24 == 12
	PRINTFORMW

;LV3
;%CALLNAME:TARGET%は快楽に乱れながらも、さらなる行為を懇願してきた……
;%CALLNAME:TARGET%は不埒刻印LV3を得た
ELSEIF TFLAG:24 == 13
	PRINTFORMW

;屈服、恭順による刻印
;LV1
;%CALLNAME:TARGET%は媚びるような視線を%CALLNAME:MASTER%に投げかけた……
;%CALLNAME:TARGET%は不埒刻印LV1を得た
ELSEIF TFLAG:24 == 31
	PRINTFORMW

;LV2
;%CALLNAME:TARGET%はもっと%CALLNAME:MASTER%に喜んでもらいたいようだ……
;%CALLNAME:TARGET%は不埒刻印LV2を得た
ELSEIF TFLAG:24 == 32
	PRINTFORMW

;LV3
;%CALLNAME:TARGET%はどこか陶然とした表情でじっと%CALLNAME:MASTER%を見つめている……
;%CALLNAME:TARGET%は不埒刻印LV3を得た
ELSEIF TFLAG:24 == 33
	PRINTFORMW
ENDIF

;反発刻印
IF TFLAG:21 == 1
	PRINTFORMW
ELSEIF TFLAG:21 == 2
	PRINTFORMW
ELSEIF TFLAG:21 == 3
	PRINTFORMW
ENDIF

path: ERB/대사_메시지관련/개인대사/065 모미지/M_KOJO_K65_刻印取得.ERB


path: ERB/대사_메시지관련/개인대사/065 모미지/M_KOJO_K65_加虐系コマンド.ERB


path: ERB/대사_메시지관련/개인대사/065 모미지/M_KOJO_K65_奉仕系コマンド.ERB