code:
;-------------------------------------------------
; eraTheWorld 4.821用 豊姫口上（キャラクターの名前を入れる、下にコンセプトなど一言あれば入れる）
;-------------------------------------------------
;他者による修正、加筆、改変については、同梱のライセンス条項に従ってください。

;幼い頃大好きだった近所のお姉ちゃん
;結婚して家を出てから疎遠になっていたけど、色々あって帰って来たらしい
;久しぶりに挨拶に行ったあなたを出迎えてくれたのは、あの頃と変わらないままのお姉ちゃんで……
;そんなイメージで書きました（嘘

;ひたすら甘えさせてくれる年上のお姉ちゃんのイメージで書きました（本当

;------ ｷﾘﾄﾘ ｶｲｼ -----------
;eraTheWorld proto4.07パッチ取り込み用 Ver1.13
;テンプレートの使い方
;初めに置換コマンド等により K99 を K(キャラNo) に変更して下さい
;キャラNoはCSVフォルダのCharaファイルを参照　例(霧雨 魔理沙の場合)：K99 =置換=> K11
;
;------ ｷﾘﾄﾘ ｵﾜﾘ -----------

;**** FlagManagement **********************************************************
;本口上にて使用しているCFLAG・TCVAR等
;
;TCVAR:99:350 フェムトファイバーの説明で使用
;TCVAR:99:399 押し倒した時・押し倒し返した時に口上を切り替える為に使用
;CFLAG:99:1000 反感減少スイッチ 初対面の選択肢で『はい』を選ぶとONに
;CFLAG:99:1998 口上側の地の文オンオフ制御で使用
;CFLAG:99:1999 UPDATEに使用
;
;******************************************************************************

;### 口上存在判定 ###################################
@M_KOJO_K99(ARG)
;別人版を作成する際はこのテンプレではなく別人版用口上テンプレをご利用ください

;口上存在判定です、けしてコメントアウトしないでください
;他の処理は一切行わないように
RETURN 1

;### 口上基本フラグ設定 #############################
@M_KOJO_FLAGSETTING_K99
;基本フラグ設定はここで行ってください
;共通の口上フラグは必要な箇所のコメントアウトを外してご利用ください
;口上専用フラグはご自由に
;Xにはキャラ番号を入れてください

;眠姦口上有、時間停止口上有、なりきりに1を入れると、それぞれ時間停止時、眠姦時、なりきり時にコマンド口上が読み込まれるように
;入れないと時間停止時、眠姦時、なりきり時は一切喋りません
;CFLAG:X:眠姦口上有 = 0
;CFLAG:X:時間停止口上有 = 0
;CFLAG:X:なりきり口上有 = 0

;破瓜キャンセル口上有に1を入れると、@M_KOJO_EVENT_KX_LOST_VIRGIN_STOPでキャンセルの成否を操作できます
;CFLAG:X:破瓜キャンセル口上有 = 0

;口上内抱き寄せ判定_初回と口上内抱き寄せ判定_通常に1を入れると、M_KOJO_EVENT_KX_PERMISSIONで押し倒しの成否を操作できます
;CFLAG:X:口上内抱き寄せ判定_初回 = 0
;CFLAG:X:口上内抱き寄せ判定_通常 = 0

;押し倒し禁止に1を入れると、自分から押し倒してこなくなります
;恋慕・セフレ・ヤリマンのどれかがあれば押し倒してくる
IF TALENT:99:연모 || TALENT:99:섹프 || TALENT:99:걸레
	CFLAG:99:덮침금지 = 0
;素質が無い場合は押し倒してこない
ELSE
	CFLAG:99:덮침금지 = 1
ENDIF

;来訪不能に1を入れると、来訪してこなくなります
IF !CFLAG:99:안면
	CFLAG:99:내방불능 = 1
ELSE
	CFLAG:99:내방불능 = 0
ENDIF

;押し倒した時・押し倒し返した時で口上を切り替える為の処理
;口上存在判定でやるのはマズい気がするけどこれしか思いつかない…
IF !CFLAG:우후후
	TCVAR:99:399 = 0
ENDIF

;### 口上色判定 ###################################
@M_KOJO_COLOR_K99

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

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

IF CFLAG:99:안면 == 1 && CFLAG:99:1999 == 0
	CALL TOYOHIME_SETTINGS
	CFLAG:99:1999 = 1
ENDIF

PRINTL
PRINTFORMDL 섹스 시에 표시되는 토요히메 구상의 대화나 인용문 이외의 기타 문장의 표시・비표시를 변경할 수 있습니다
PRINTFORMDL ※구상으로서는 표시를 권장하지만、필요 없다고 생각하는 분은 [표시하지 않음]을 선택해 주십시오.
PRINTL
CALL ASK_YN("표시한다","표시하지 않는다")
SELECTCASE RESULT
	CASE 0
		CFLAG:99:1998 = 0
		PRINTFORMDL 표시하도록 변경했습니다
	CASE 1
		CFLAG:99:1998 = 1
		PRINTFORMDL 표시하지 않도록 변경했습니다
ENDSELECT
PRINTFORMDW 재차 변경하고 싶다면 한번 더 [UPDATE]를 눌러주세요

RETURN 1

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

;月で遭遇
IF (CFLAG:MASTER:현재위치 / 100) == 10
	;月に住んでる
	IF MAIN_MAP == 10
		PRINTFORMW 「아아、%CALLNAME:MASTER%。이곳의 생활에는 익숙해졌나요？」
		PRINTFORMDL 상냥하게 인사해온 여성에게 %마스터는% 급히 절을 한다
		PRINTFORMDL 그녀의 이름은 와타츠키노 토요히메 [와타츠키노토요히메]
		PRINTFORMDW 달에서 길을 잃고 헤메이다、쫓기고 있던 %마스터를% 숨겨준 생명의 은인이다
		PRINTFORMW 「그렇게 어려워하지 않아도 돼요。그러는 편이、서로 말하기 쉽겠죠？」
		PRINTFORMDL %CALLNAME:MASTER%에게 행운이었던 것은、이 와타츠키노 토요히메라는 여성이 지상의 인간을 이해한다는 것이었다
		PRINTFORMDW 말에 따르면 『내가 숨겨 주지 않았다면 당신은 확실히 처형되었을 것』 이라고 한다
		PRINTFORMW 「그보다、당신도 별난 사람이군요。지상으로 돌아가고 싶지 않다니」
		PRINTFORMW 「당신같은 지상의 백성은 이것으로 두번째에요」
		PRINTFORMDW 도와주신 은혜를 갚고 싶어서다。그렇게 말하자 토요히메는 킥킥거리며 웃었다
		PRINTFORMW 「후후훗、재밌는 사람。역시 당신을 숨겨주길 잘한 것 같아요」
		PRINTFORMW 「당신이라면 동생이나 토끼들과도 금세 마음을 터놓고 지낼 것 같군요。그런 생각이 드네요」
		PRINTFORMDL 만난지 얼마 안 된 인간에게 왜 이다지도 친절하게 대해 주는 걸까
		PRINTFORMDW %마스터는% 토요히메에 대해、조금 특별한 감정을 갖기 시작했다……
	;それ以外
	ELSE
		;ほぼ儚月抄の初登場シーンまんまな気がする……
		PRINTFORML
		PRINTFORMW 「――도리불언 일지라도、하자혜성한다」
		PRINTFORMW 「복숭아와 오얏은 맛있는 열매를 맺기 때문에、아무 말을 안 해도 자연스레 사람들이 모여든다」
		PRINTFORMW 「이제 조금……조금만 더 있으면 맛있는 복숭아로의 길이 생겨……」
		PRINTFORMW
		PRINTFORMDW 『지상의 인간 따위가 와타츠키님에게 무슨 용무다』
		PRINTFORMDL 호화로운 저택의 문 앞에서 %마스터는% 곤란을 겪고 있었다
		PRINTFORMDW 맛있어 보이는 복숭아가 열린 나무를 발견했기 때문에 안에 들여보내 달라고 해봤지만……
		PRINTFORMDW 『당장 떠나거라。이곳은 너같은 지상의 인간이 있어 봤자 좋은 곳이 아니다』
		PRINTFORMDL 당연하달까、이렇게 문전박대를 당했던 것이다
		PRINTFORMDL 어디 침입할 만한 곳이 없을까
		PRINTFORMDW %마스터는% 주위를 둘러보다、문득 하늘을 올려다보니……
		SETCOLOR C_RED
		FONTBOLD
		PRINTFORML
		PRINTFORML
		PRINTFORML 물컹
		PRINTFORML
		PRINTFORMW
		FONTREGULAR
		RESETCOLOR
		CALL M_KOJO_COLOR_K99
		PRINTFORMDW 『저、저기？ 토요히메님！？』
		PRINTFORMW 「복숭아를 주우며 운동하고 있다가、뭔가 대문쪽이 시끄러워서 보러왔어」
		PRINTFORMW 「자 그럼、뭐 때문에 티격태격 하고 있었나」
		PRINTFORMDW 『아니、그 저기……토요히메님의 발밑에 정신을 잃은 지상의 인간이 어떻게든 안에 들어오려고 해서……』
		PRINTFORMW 「지상의 인간……？」
		PRINTFORMDL 그 말을 듣고 토요히메가 시선을 아래로 돌린다
		PRINTFORMDW 거기에는 발에 밟힌 채로 있는 %CALLNAME:MASTER%의 모습이 있었다……
		PRINTFORMDL
		PRINTFORMDL ……………
		PRINTFORMDL ………
		PRINTFORMDL …
		PRINTFORMDW
		PRINTFORMW 「미안해요。설마 사람이 있을 줄은 몰라서……」
		PRINTFORMDL %마스터는% 저택에 초대되어 토요히메와 차를 마시고 있다
		PRINTFORMDL 다행이도、눈에 띌만한 상처는 없었다。허리가 좀 아픈 것은 틀림없이 기분 탓일 것이다
		PRINTFORMDW %마스터는% 토요히메에게 튼튼한 것이 장점이라며 씩 웃어 보였다
		PRINTFORMW 「그래서、당신은 지상에서 왔다고 하던데……」
		PRINTFORMW 「어떻게 여기까지 온 거야？」
		PRINTFORMDW %마스터는% 복숭아를 먹으며 여기까지의 경위를 설명했다
		PRINTFORMW 「과연……」
		PRINTFORMW （이대로 지상으로 돌려 보내는 것도 좋지만……）
		PRINTFORMW 「어머나、피곤하시죠？ 천천히 가도 되니까요」
		PRINTFORMW 「게다가……저도 당신에게 흥미가 있으니」
		PRINTFORMDW 무엇이냐고 토요히메에게 물어보니……
		PRINTFORMW 「우ー응……이런 말 하면 동생한테 혼날 것 같은데……」
		PRINTFORMW 「한가하니까요。할 것이 없어서요」
		PRINTFORMDW 그녀는 어이없는 말을 했다
		PRINTFORMW 「그러니까、당신을 많이 알려줄래요？」
		PRINTFORMW 「여기까지 자력으로 왔는걸요。평범한 인간일 리가 없잖아요？」
		PRINTFORMW 「……후훗、그렇게 딱딱하게 굳지 않아도 괜찮아요」
		PRINTFORMW 「그냥 저랑 이야기나 나누면 되니까」
		PRINTFORMDL 그렇게 말하며、토요히메는 %CALLNAME:MASTER%에게 피식 웃어 보였다
		PRINTFORMDL %CALLNAME:MASTER%로서는 딱히 거절할 이유도 없고、복숭아를 대접받은 답례도 있다
		PRINTFORMDL 그리고、이런 미인과 대화할 수 있다는 것만으로도 이득이다
		PRINTFORMDW %마스터는% 또 한 개의 복숭아를 집어들며、토요히메를 향해 자세를 고쳐 앉았다……
		RESETCOLOR
	ENDIF
;それ以外
ELSE
	PRINTFORML 「안녕하세요。와타츠키노 토요히메라고 합니다」
	PRINTFORMW 「앞으로 잘 부탁해」
ENDIF
CFLAG:99:1999 = 1
CALL TOYOHIME_SETTINGS
RETURN 1

;==================================================
;豊姫の設定変更用関数
;==================================================
@TOYOHIME_SETTINGS

PRINTL
PRINTFORMDL 토요히메의 소질・경험 등을 권장하는 쪽으로 변경하시겠습니까？
PRINTFORMDL ※토요히메가 고백해 오지 않습니다
PRINTFORMDL ※처녀의 경우는 비처녀가 됩니다
PRINTFORMD ※키스・처녀상실이력이 있어
CALL COLORMESSAGE(@"과거 사랑하는 사람에게 바쳤다",C_PINK,0,1)
PRINTFORMDL 로 표시됩니다
PRINTFORMDL ※소질에 대식가 특성이 추가됩니다
PRINTFORMDL ※성희롱커맨드 등、일부 명령어 실행 시의 반감이 대폭 감소합니다
PRINTFORMDL ※변경하지 않을 경우、구상과 실제 행동에 괴리감이 발생합니다 「역주。처녀 관련 구상이 없으니 무조건 변경하세요」
PRINTL
CALL ASK_YN("변경한다","변경하지 않는다")
SELECTCASE RESULT
	CASE 0
		SETBIT CFLAG:[[토요히메]]:데이트후이벤트플래그 , 1
		CFLAG:99:1000 = 1
		CFLAG:99:처녀상실기념일 = -1
		CFLAG:99:첫키스상실기념일 = -1
		CSTR:99:처녀상실이력 = 일찍이 사랑했던 사람에게 바쳤다
		CSTR:99:첫키스상실이력 = 일찍이 사랑했던 사람에게 바쳤다
		TALENT:99:키스미경험 = 0
		TALENT:99:대식가 = 1
		EXP:99:키스경험 += 20
		EXP:99:V성교경험 += 10
		SIF TALENT:99:처녀 == 1
			TALENT:99:처녀 = 0
		PRINTFORMDW 변경했습니다
	CASE 1
		PRINTFORMDW 변경하지 않았습니다
ENDSELECT

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;デート帰りにファーストKISS（合意も付く）
;※ちょっと急展開すぎるから後で書き直すかも
;==================================================
@M_KOJO_SPEVENT_K99_1(ARG,ARG:1)
;口上主はTARGET
;地の文表示
;CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
CALL M_KOJO_COLOR_K99
	;好感度3000未満はキスキャンセル
	IF CFLAG:99:호감도 < 3000
		TCVAR:키스캔슬 = 1
	;成功
	ELSE
		PRINTFORMDL
		PRINTFORMDL 데이트를 하고 돌아오는 길、아쉬움을 느낀 %마스터는% 토요히메를 불러 세우고
		PRINTFORMDL 그녀의 몸을 끌어당겨、그대로 그 입술을 빼앗았다……
		PRINTFORMDW
		;ズキュウウウン
		PRINTFORMW 「으응！？ 아…… 으…… 음」
		PRINTFORMDL ……좀 억지로인 것 아닐까
		PRINTFORMDW 그런 생각도 들었지만、토요히메는 일절 저항하지 않았다
		PRINTFORMW 「하……응……후우……츄우……웃」
		PRINTFORMDL 오히려 라고 할까、그녀는 더욱 깊이 깊이 입술을 포게왔다
		PRINTFORMDW 마치 『나도 참고 있었던거야』 라고 말하고 싶다는 듯이……
		PRINTFORMDW ………
		PRINTFORMW 「하아아……저기、%CALLNAME:MASTER%……」
		PRINTFORMDW 드디어 입술을 뗀 토요히메가 뜨거운 시선으로 바라본다
		PRINTFORMW 「데이트……벌써 끝내도 좋은거야……？」
		PRINTFORMW 「나는……좀 더 당신과 함께 있고 싶은데……」
		PRINTFORMDL ……이건、혹시 그런 권유인가
		PRINTFORMDW %마스터는% 만약을 위해、토요히메에게 확인을 구했다
		PRINTFORMW 「………후훗、말하게 하고 싶은거야？」
		PRINTFORMDL 꿀꺽、%마스터는% 군침을 삼킨다
		PRINTFORMDW
		;選択肢
		CALL ASK_YN("어떻게 하지","흐름에 몸을 맡긴다")
		;判定
		SELECTCASE RESULT
			;どうしよう
			CASE 0
				PRINTFORMW 「………풋、후후훗」
				PRINTFORMDL 말문이 막혀 있자……토요히메가 푸훗 웃음을 터뜨렸다
				PRINTFORMDW 그제서야、%마스터는% 놀림받은 것을 깨달았다
				PRINTFORMW 「미、미안합니다……후후훗」
				PRINTFORMW 「처음엔 놀리려는 마음이 아니었는데……아、아야야야얏！」
				PRINTFORMDL 자신의 얼굴이 빨갛게 달아오르는 것을 느낀 %마스터는% 쑥쓰러움을 감추기 위해 토요히메의 관자놀이를 빙글빙글 공격했다
				PRINTFORMDW 토요히메는 아픔에 소리를 지르면서도、어딘가 즐거운 듯이 그것을 받아들이고 있었다
			;流れに身を任せる
			CASE 1
				PRINTFORMDL 여기까지 왔다면、이제 가볼 수 밖에……
				PRINTFORMDW 각오를 다진 %마스터는% 꼬옥 안겨드는 토요히메의 어깨를 껴안았다
				PRINTFORMW 「키득키득、그러시다면……」
				CALL HPH_PRINT,@"「여기서부터는、어른의 데이트를 즐겨볼까요……HPH」","W"
				PRINTFORMDL ……………
				PRINTFORMDL ………
				PRINTFORMDW …
				IF !TALENT:MASTER:비동정
					FONTBOLD
					SETCOLOR 255,100,255
					PRINTFORMW 동정상실
					FONTREGULAR
					RESETCOLOR
					TALENT:MASTER:비동정 = 1
				ENDIF
				PRINTFORML
				CALL COLORMESSAGE(@"토요히메와의 합의를 얻었다",C_PINK,0,1)
				PRINTFORMW
				SETBIT CFLAG:99:기정사실 , 1
				EXP:99:키스경험 += 5
				EXP:99:절정경험 += 1
				EXP:99:V성교경험 += 3
				EXP:MASTER:키스경험 += 5
				EXP:MASTER:사정경험 += 1
				EXP:MASTER:삽입경험 += 3
				TIME += 240
		ENDSELECT
	ENDIF
ENDIF
RESETCOLOR
RETURN 1

;==================================================
;デート帰りに告白（恋人が付く）
;この口上は現時点で豊姫側から告白することを想定していません
;==================================================
@M_KOJO_SPEVENT_K99_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
		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_K99_3(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_3(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		;同棲
		IF CFLAG:MASTER:초기위치 == CFLAG:99:초기위치
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「자、피곤하죠？」
					PRINTFORML 「식사 할까？ 목욕 할까？ 아니면……」
					PRINTFORMDL %CALLNAME:MASTER%에게 달라붙어、바지런히 돌봐주는 토요히메
					PRINTFORMDW 마치 남편에게 헌신하는 아내 같다고 %마스터는% 생각했다
				CASE 1
					PRINTFORML 「오늘도 즐거웠어」
					PRINTFORMW 「또 가기로 해요。%CALLNAME:MASTER%♪」
				CASE 2
					PRINTFORML 「자 그럼、이따 봐♪」
					PRINTFORMDW 토요히메는 %CALLNAME:MASTER%에게 윙크를 하고、먼저 방으로 돌아갔다
			ENDSELECT
		;通常
		ELSE
			;연모
			IF TALENT:연모
			   SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「언제든 만날 수 있어、만나러 갈 수 있다고…… 알고는 있는데」
						PRINTFORML 「역시 섭섭해요。당신과 헤어진다는 것은요」
						PRINTFORMDL 떠나지 않으려고 차마 발걸음을 떼지 못하는 토요히메에게 %CALLNAME:MASTER%이 건넨 말은……
						;選択肢
						CALL ASK_M("나도 외로워", 1, "다시 금방 찾아올게", 1, "꺼져", TALENT:MASTER:새드)
						;判定
						SELECTCASE RESULT
							;自分も寂しい
							CASE 0
								PRINTFORML 「……후훗、나와 똑같네」
								PRINTFORML 「조금만 더…… 같이 있어도 될까？」
								PRINTFORMDL 두 사람은 손을 꼭 잡고 다시、가벼운 산책길에 나섰다
								PRINTFORMDW 호젓한 산책 도중、%마스터는% 토요히메와 많은 이야기를 나눴다……
								;１時間経過
								TIME += 60
							;またすぐに会いに来る
							CASE 1
								PRINTFORML 「……응」
								PRINTFORML 「계속 기다릴게。당신을 말야」
								PRINTFORMDW 귀로에 오르는 %마스터를%、토요히메는 언제까지나 전송하고 있었다
							;失せろ（ｷﾞﾛｯ
							CASE 2
								PRINTFORML 「너、너무하네…… 어떻게 그럴 수가……」
								PRINTFORMDW 토요히메는 상당한 쇼크를 받았다
								;好感度と信頼度が１０下がる
								CALL CHANGE_CFLAG(2, 99, -10)
								CALL CHANGE_CFLAG(4, 99, -10)
						ENDSELECT
					CASE 1
						PRINTFORML 「앗…… 벌써 도착했구나」
						PRINTFORML 「……저기、혹시 괜찮다면」
						PRINTFORMDL 『오늘은 즐거웠다』 %마스터가% 기분 좋은 목소리로 그렇게 말하자
						PRINTFORMDW 토요히메는 꺼내려던 말을 도로 삼키며 「나도야」 라고 미소를 지었다
					CASE 2
						PRINTFORML 「……응… 이제 괜찮아」
						PRINTFORML 「또、데이트 하러 가요」
						PRINTFORMDW 아쉬워하는 토요히메와 입을 맞추고 헤어졌다
				ENDSELECT
			;사모
			ELSEIF TALENT:사모
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「고마워。이쯤이면 괜찮아」
						PRINTFORML 「또 언제든지 불러줘。기다릴게♪」
						PRINTFORMDL 아무래도 토요히메는 즐겨준 것 같다
						PRINTFORMDW %마스터는% 마음속으로 살짝 해냈다 포즈를 취했다……
					CASE 1
						PRINTFORML 「다음에 언제 데이트 갈까나」
						PRINTFORML 「내일이든、모레든……아、지금 당장 갈래？」
						PRINTFORMDW 『오늘은 이만 끝내기로 하자』라고 말하자 토요히메는 아쉬움을 떨치지 못했다
					CASE 2
						PRINTFORML 「%CALLNAME:MASTER%、기다려」
						PRINTFORML 「……으응…… 오늘의 감사야」
						PRINTFORMDL 돌아갈 때、토요히메가 뺨에 츄 하고 뽀뽀를 해주었다
						PRINTFORMDW %마스터가% 손가락으로 문지르자、아직 토요히메의 온기가 남아있는 것 같았다……
				ENDSELECT
			;それ以外
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「그럼、조심히 들어가」
						PRINTFORML 「기회가 되면、또 데이트 해요」
						PRINTFORMDW 살랑살랑 손을 흔드는 토요히메에게 %마스터는% 손을 흔들어 주고 헤어졌다
					CASE 1
						PRINTFORML 「하아…… 조금 늦어버렸네」
						PRINTFORML 「요리히메、화내지 않았으면 좋겠는데……」
						PRINTFORMDL 달의 사자의 리더라는 입장은 여러 가지로 귀찮아 보인다
						PRINTFORMDW %마스터가% 생각한 것을 말로 전하자、토요히메는 「그렇죠」라며 곤란하다는 듯이 웃었다
					CASE 2
						PRINTFORML 「오늘은 즐거웠어」
						PRINTFORML 「다음에 또 데려가줘」
						PRINTFORMDL 토요히메는 겉치레 말이 아니라、진심으로 그렇게 말하고 있다
						PRINTFORMDW ……라는 생각이 들었다
				ENDSELECT
			ENDIF
		ENDIF
		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_K99_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		$TOYOHIME_ENCOUNTER
		;既に会っている場合は非表示
		IF !TCVAR:99:오늘만났는지
			;연모
			IF TALENT:연모
				;TIME:2에서 아침, 점심, 저녁 선택
				SELECTCASE TIME:2
					;朝
					CASE 1,2
						PRINTFORML 「어머、안녕。%CALLNAME:MASTER%」
						PRINTFORMW 「자、이리와。함께 이야기 나눠봐요♪」
					;昼～夕
					CASE 3,4,5
						PRINTFORML 「%CALLNAME:MASTER%、이쪽이야 이쪽♪」
						PRINTFORMDW 토요히메는 %마스터를% 의식하며、때때로 손을 흔들었다
					;夜
					CASE 6,7
						PRINTFORML 「아아、%CALLNAME:MASTER%。와주었구나」
						PRINTFORML 「이제 시간이 이렇기도 해서、오늘은 못 만날지도 라고 생각했는데……」
						PRINTFORMDW %마스터가% 인사하자、토요히메는 기쁜 듯이 종종걸음으로 달려왔다
				ENDSELECT
			;思慕
			ELSEIF TALENT:사모
				PRINTFORM 「응、%CALLNAME:MASTER%。
				;TIME:2で朝昼晩を選択
				SELECTCASE TIME:2
					;朝
					CASE 1,2
						PRINTFORML 오늘은 빠르구나」
					;昼～夕
					CASE 3,4,5
						PRINTFORML 오늘은 웬일이야？」
					;夜
					CASE 6,7
						PRINTFORML 저녁 식사는 벌써 끝냈어？」
				ENDSELECT
				PRINTFORMDW 토요히메는 %마스터를% 알아채자、기쁜 듯이 미소지었다
			;それ以外
			ELSE
				;TIME:2で朝昼晩を選択
				SELECTCASE TIME:2
					;朝
					CASE 1,2
						PRINTFORML 「안녕。%CALLNAME:MASTER%」
						PRINTFORML 「오늘은 꽤 빠르네」
						PRINTFORMDW 토요히메는 아직 졸린 것 같다。일어난지 얼마 안 된 걸까
					;昼～夕
					CASE 3,4,5
						PRINTFORML 「어머、%CALLNAME:MASTER%」
						PRINTFORMW 「마침 한가로운 시간을 주체할 수 없었어。괜찮다면 말벗이 되어 줄래？」
					;夜
					CASE 6,7
						PRINTFORML 「안녕하세요。%CALLNAME:MASTER%」
						PRINTFORMW 「이런 시간에 무슨 일이실까？」
				ENDSELECT
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;既に会っている場合は非表示
		IF !TCVAR:99:오늘만났는지
			;연모
			IF TALENT:연모
				;TIME:2で朝昼晩を選択
				SELECTCASE TIME:2
					;朝
					CASE 1,2
						PRINTFORML 「안녕。%CALLNAME:MASTER%」
						PRINTFORML 「자아 어서、좀 더 이리로 와줘」
						PRINTFORML 「당신 얼굴 좀 자세히 보여줄래？」
						PRINTFORMW 「……우응。오늘도 역시 멋져♪」
					;昼～夕
					CASE 3,4,5
						PRINTFORML 「아아、%CALLNAME:MASTER%。겨우 만났다」
						PRINTFORML 「어디에도 없길래、걱정되서 찾고 있었어」
						PRINTFORMDW 도를 넘은 토요히메의 과보호에、%마스터는% 곤란하다는 듯 웃을 수 밖에 없었다……
					;夜
					CASE 6,7
						PRINTFORML 「됐어…… 너무해。%CALLNAME:MASTER%은 참」
						PRINTFORML 「계속 기다렸는데？ 당신을 말이야」
						PRINTFORMDW 그렇게 말하며、토요히메는 %CALLNAME:MASTER%의 팔을 꽉 안아왔다
				ENDSELECT
			;思慕
			ELSEIF TALENT:사모
				;TIME:2で朝昼晩を選択
				SELECTCASE TIME:2
					;朝
					CASE 1,2
						PRINTFORML 「안녕。%CALLNAME:MASTER%」
						PRINTFORML 「응、오늘은 좀 이르다고？우후훗♪」
						PRINTFORMW 「당신을 보고 싶다는 생각을 하다가、몸이 멋대로 잠에서 깨버린 거야」
					;昼～夕
					CASE 3,4,5
						PRINTFORML 「어머나、거기 있는 건 %CALLNAME:MASTER%？」
						PRINTFORMW 「뭐 하고 있었어？ 나도 끼워줘♪」
					;夜
					CASE 6,7
						PRINTFORML 「안녕하세요。%CALLNAME:MASTER%」
						PRINTFORML 「이런 시간에 이런 데서 만나다니……」
						PRINTFORMW 「후훗、뭔가 운명을 느끼네♪」
				ENDSELECT
			;それ以外
			ELSE
				;TIME:2で朝昼晩を選択
				SELECTCASE TIME:2
					;朝
					CASE 1,2
						PRINTFORML 「어머나、%CALLNAME:MASTER%。안녕♪」
						PRINTFORMDW %마스터가% 인사를 하자、토요히메도 선뜻 인사를 돌려준다
					;昼～夕
					CASE 3,4,5
						PRINTFORML 「안녕。%CALLNAME:MASTER%」
						PRINTFORMW 「이런 데서 만나다니 기이한 일이네」
					;夜
					CASE 6,7
						PRINTFORML 「후아～ 어……어머、%CALLNAME:MASTER%」
						PRINTFORML 「밤 새지 말고、잘 자지 않으면 안 된다고？」
						PRINTFORMDW 입을 크게 벌리고 하품을 하는 토요히메는、도저히 달의 공주라고 생각되지 않았다……
				ENDSELECT
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて一緒に入る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;연모
		IF TALENT:연모
			PRINTFORMDL 머리를 감고 있는데、딸랑딸랑 문이 열리는 소리가 들렸다
			PRINTFORMDL ……혹시 누군가가 들어온걸까
			PRINTFORMDL 확인하려고 해도、거품이 들어오기 때문에 눈을 뜰 수가 없었다……
			PRINTFORMDW 『누구십니까』라고 말하려는데、등뒤에 뭉클 하고 부드러운 것이 닿았다
			PRINTFORML 「후훗、괜찮아요。그대로 계속해……」
			PRINTFORMW 「끝나면、내가 등 밀어줄께」
			PRINTFORMDL 목소리의 주인은 토요히메였다。그렇다는 건、지금 등에 닿고 있는 것은……
			PRINTFORMDW 하반신에 혈액이 모여드는 것을 느낀 %마스터는%、생각을 떨쳐버리려는 듯이 벅벅 머리를 문질렀다……
		;それ以外
		ELSE
			PRINTFORMDL 딸랑딸랑 소리에 깜짝 놀라 문쪽으로 고개를 돌려보니……
			PRINTFORMDW 무려、실오라기 하나 걸치지 않은 모습의 토요히메가 서 있었다
			PRINTFORML 「아라 %CALLNAME:MASTER%。탕의 상태는 어때？」
			PRINTFORML 「에？ 방금 들어왔는데 나가라고？」
			PRINTFORML 「뭐야뭐야、딱딱한 소리 하지 말고요」
			PRINTFORMW 「목욕 같이 하시죠？」
			PRINTFORMDW 토요히메는 가볍게 몸을 물로 흘리고 나서、당연하다는 듯이 %CALLNAME:MASTER%의 곁에 허리를 내리고 앉았다
		ENDIF
		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
		GOTO TOYOHIME_ENCOUNTER
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;他キャラとデート中に遭遇した
	;ARG:1にデート相手
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;既に会っている場合は非表示
		IF !TCVAR:99:오늘만났는지
			;永琳とデート
			IF FLAG:데이트상대 == 72
				PRINTFORML 「……야고코로님도 의외로……」
				PRINTFORML 「아아、아니아니에요！아무것도 아닙니다」
				PRINTFORML 「그럼、다녀오세요」
			;依姫とデート
			ELSEIF FLAG:데이트상대 == 98
				PRINTFORML 「어머어머、귀녀도 또한 여간내기가 아니군요」
				PRINTFORML 「후후훗、부끄러워하지 않아도 돼요」
				PRINTFORML 「그럼、제 여동생을 잘 부탁드립니다」
			;鈴仙orレイセンとデート
			ELSEIF FLAG:데이트상대 == 52 || FLAG:데이트상대 == 100
				PRINTFORML 「\@ FLAG:데이트상대 == 52 ? 레이센(鈴仙) # 레이센 \@、실수가 없도록 하세요」
				PRINTFORML 「무슨 일이 생기면、귀녀가 그를 보호하는 거야？」
				PRINTFORML 「후훗、좋은 답변이군요。그럼 다녀오세요」
			;それ以外
			ELSE
				PRINTFORML 「어머、데이트？」
				PRINTFORML 「후훗、즐기고 오세요」
			ENDIF
			PRINTFORMDW 토요히메는 살짝 손을 흔들어 데이트 중인 두 사람을 배웅했다
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MAIN_MAP上で一日最初の挨拶
	;注、このあと通常の遭遇口上、ARG==1 OR ARG==2に接続します
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で一日最初の挨拶
	;ARG:1にデート相手、ARG:1が0の場合は非デート
	;注、このあと通常の外出先で遭遇した口上、ARG==6 OR ARG==7に接続します
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;ARG:1とデート中
		IF ARG:1
		;一人で外出
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;非同棲かつ相手が先に起きてる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;TARGET私室にMASTERが入っている（恋慕時添い寝中就寝時のみ？
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			;恋慕
			IF TALENT:연모
				GOTO TOYOHIME_OHAYO
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			;恋慕
			IF TALENT:연모
				GOTO TOYOHIME_OHAYO
			ENDIF
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が起きている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		$TOYOHIME_OHAYO
		;１５分の１の確率で朝フェラ
		IF !RAND:15
			PRINTFORMDL 뭔가 간질간질한 감각에 눈을 뜨자……
			PRINTFORMDW 무려、토요히메가 %CALLNAME:MASTER%의 사타구니에 그 고귀한 얼굴을 묻고 있었다
			CALL HPH_PRINT,@"「츄루……츄우우……후우……읏HPH」","L"
			CALL HPH_PRINT,@"「응、후……쿠후……츄루룹……앙HPH」","W"
			PRINTFORMDL 토요히메는 열심히 정성스레 페니스를 물고、핥고、빨고 있다
			PRINTFORMDL 그 교묘하고 능숙한 봉사에 견디지 못하고 사정하자、
			PRINTFORMDW 토요히메는 꿀꺽、꿀꺽 하고 목을 크게 울리며 아침의 첫번째 착즙을 삼켰다……
			PRINTFORMW
			PRINTFORMDL 몇십분 후、%마스터가% 기상하자 토요히메는 아무렇지도 않은듯 아침인사를 해왔다
			PRINTFORMDW ………빠진 %CALLNAME:MASTER%의 음모가 입가에 달라붙은 채로………
			BASE:MASTER:정력 -= 50
		;通常
		ELSE
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「응……일어났어？」
					PRINTFORML 「후훗、잘 잤나요」
					PRINTFORMW 「도대체 무슨 꿈을 꾸고 있었던 거야？」
				CASE 1
					PRINTFORMDL %마스터가% 눈을 뜨자 토요히메가 옆에서 곁잠을 자고 있었다
					PRINTFORML 「안녕。%CALLNAME:MASTER%」
					PRINTFORML 「덥다고？ 후훗♪ 뭐 좋잖아♪」
					PRINTFORMDW 잠시 꽁냥꽁냥거린 후、%마스터는% 이불 밖으로 기어나왔다
				CASE 2
					PRINTFORMDL 깨어보니 토요히메가 %CALLNAME:MASTER%에게 걸터앉아 있었다
					PRINTFORML 「아앙……좀만 더 잠들어 있었으면 좋았는데……」
					PRINTFORMDW 대체 뭘 하려고 했을까……
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が寝ている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「새근……새근……」
		PRINTFORMDL %마스터가% 눈을 뜨자、토요히메는 아직 자고 있었다
		PRINTFORMDW 편안한 숨소리를 내는 그녀를 깨우지 않기 위해、%마스터는% 조심스레 이불에서 기어나왔다
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERが起きていて、相手が起きてきた
	;添い寝時TARGET起床はこちら（TARGET衰弱or添い寝中TARGET睡魔負け後そのままMASTERが起き続けた上で相手が起床した場合限定
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;-------------------------------------------------
		;非同棲
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;同棲中
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		;共通
		;恋慕
		IF TALENT:연모
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「아아…… 이런 곳에……」
					PRINTFORML 「안성맞춤의 안는 베개가……zzz」
					PRINTFORMDL 토요히메는 %마스터를% 이불 속으로 끌어들여、안는 베개 대신으로 하고 다시 숨소리를 고르게 내기 시작했다
					PRINTFORMDW 어쩔 수 없으니、%마스터는% 조금 더 토요히메를 재워주기로 했다……
					;３０分経過
					TIME += 30
				CASE 1
					PRINTFORMDL %마스터는% 잠에서 깨어난 토요히메에게 차를 끓여 대접해 주었다
					PRINTFORML 「고마워요。%CALLNAME:MASTER%」
					PRINTFORML 「홀짝……휴……」
					PRINTFORMDW 휴우 하고 숨을 내쉬는 토요히메의 선이 고운 옆얼굴에、%마스터는% 무심코 넋을 잃고 말았다……
				CASE 2
					PRINTFORML 「저기、조금만 더…… 안 돼？」
					PRINTFORML 「이제 ５분만…… １０분만 더 있다가 일어날테니까……」
					PRINTFORMDL %마스터는% 칭얼칭얼 보채는 토요히메의 이불을 벗겨내고、빨리 옷을 갈아입으라고 재촉했다
					PRINTFORML 「하아…… %CALLNAME:MASTER%까지、최근 점점 요리히메를 닮아가고 있네……」
					PRINTFORMDW 토요히메는 마지못한 모습으로、아침 준비를 시작했다……
			ENDSELECT
		;それ以外
		ELSE
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「후아～아…… 우～응……응～……」
					PRINTFORML 「요리히메～…… 도와줘～……」
					PRINTFORMDL 토요히메는 잠에서 덜 깼는지、%마스터를% 여동생으로 착각하고 있다
					PRINTFORMDW 옷을 갈아입는 것을 도와주고、머리를 다듬어 주고…… 요리히메는 매일 아침 이러는 것일까
				CASE 1
					PRINTFORML 「응、으응～…… 후우……」
					PRINTFORML 「자 그럼、안녕히 주무세요……」
					PRINTFORMDL 재차 고른 숨소리를 내기 시작한 토요히메를 %마스터는% 억지로 잠을 깨웠다
					PRINTFORMW 「꺅…… 이제 막、꿈의 세계에서 잔치를 즐기려던 참이었는데」
				CASE 2
					PRINTFORML 「안 돼…… 아직 마음의 준비가……」
					PRINTFORML 「싫어、부탁이야、제발 안 돼에에！」
					PRINTFORMDL 이부자리를 치우려는 %CALLNAME:MASTER%와、아직 자고 싶은 토요히메
					PRINTFORMDW 두 사람의 공방은 5분 정도 치열하게 이어졌다……
					;５分経過
					TIME += 5
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;自室に帰って寝る（～は【現在地】から【キャラの自室】に戻りました）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF ARG:1
			;デート中に眠くて帰って寝る（拠点キャラのみ）
			PRINTFORMW
		ELSEIF CFLAG:우후후
			;うふふ中に眠くて自室に帰って寝る（拠点キャラのみ）
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
		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
	;-------------------------------------------------
	;衰弱して寝る（体力500以下,うふふ時はうふふ強制終了）
	;（キャラの自室以外：～を【現在地】から【キャラの自室】に運びました）
	;（キャラの自室　　：～は疲れたと言って、横になりました）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF CFLAG:우후후
			;うふふ中にダウン
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（恋慕のみ,そのまま一日が終了）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;お酒でダウン
		IF BASE:MASTER:술기운 >= MAXBASE:MASTER:술기운
			IF ARG:1
				;自室でダウン,（～が【MASTER】をベッド（布団）へと運んでくれた…）
				PRINTFORMW
			ELSE
				;部屋まで運ばれる,（～が【MASTER】を私室へと運んでくれた…）
				PRINTFORMW
			ENDIF
		;体力切れでダウン
		ELSE
			IF ARG:1
				;自室でダウン,（～が【MASTER】をベッド（布団）へと運んでくれた…）
				PRINTFORMW
			ELSE
				;部屋まで運ばれる,（～が【MASTER】を私室へと運んでくれた…）
				PRINTFORMW
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが寝るために自室まで戻ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;そのまま着替えて寝た（【TARGET】が部屋に戻ってきた→寝間着へと着替え、寝床に潜った）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から追い出して寝た（眠そうな【TARGET】に追い出された…）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF CFLAG:전턴위치 == CFLAG:현재위치
				;前のターンまで一緒に部屋にいた
				PRINTFORMW
			ELSE
				;寝るために部屋に帰ってきたところ
				PRINTFORMW
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他キャラとのＨを止めさせて寝た（【TARGET】が部屋に戻ってきた→唇をとがらせる【TARGET】に、【MASTER】は渋々【Ｈの相手】から離れた）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORMW
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;来訪キャラが拠点で休憩（～は疲れ切っている→ちょっと休んでいきなよ）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝室に居る状態でその場で寝る（～は眠気に負け、眠りについた…）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		IF CFLAG:우후후
			;うふふ中に寝る
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;拠点外で自宅前に居るキャラが自室に帰って寝る（眠くなった～は自室に帰って行きました）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 10
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;移動時すれちがい
;==================================================
@M_KOJO_EVENT_K99_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_K99_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_K99_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_K99_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_K99_8(ARG,ARG:1)
RETURN 1

;==================================================
;パンツ没収された
;==================================================
@M_KOJO_EVENT_K99_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_K99_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 TALENT:연모
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「후후훗……오늘은 저에게 맡겨줘요……」
						PRINTFORML 「당신을、기분 좋게 해줄게요……♪」
						PRINTFORMDL 밀려서 넘어지자마자、순식간에 옷이 벗겨지고……
						PRINTFORMDW 깨닫고 보니、%마스터는% 태어난 상태 그대로의 모습이었다
					CASE 1
						PRINTFORML 「저……%CALLNAME:MASTER%……」
						PRINTFORML 「오늘은、당신에게 어리광을 부려도 좋을까……？」
						PRINTFORMDL 토요히메의 풍만한 가슴이 %CALLNAME:MASTER%의 가슴팍을 아찔하게 눌러온다
						PRINTFORMDW 여기까지 와서 거절할 용기를、%마스터는% 갖고 있지 않았다……
					CASE 2
						PRINTFORML 「%CALLNAME:MASTER%……사랑해요……」
						PRINTFORML 「그러니…… 섹스합시다……♪」
						PRINTFORMDW 토요히메는 %CALLNAME:MASTER%에게 올라타、익숙한 솜씨로 옷을 벗기기 시작했다……
				ENDSELECT
			;それ以外
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「미안합니다…… 좀 흥분해서……」
						PRINTFORML 「그러니…… 당신의 몸、사용하고 싶어졌어요……♪」
						PRINTFORMDW 토요히메는 %CALLNAME:MASTER%에게 올라타、묻지도 따지지도 않고 옷을 벗기기 시작했다……
					CASE 1
						PRINTFORML 「쉬ー잇…… 괜찮아요……」
						PRINTFORML 「살ー짝、기분 좋아질 뿐이니까……♪」
						PRINTFORMDL 토요히메는 %마스터를% 밀어서 넘어뜨리고
						PRINTFORMDW 혀로 슬쩍 입맛을 다시며、옷에 손을 대기 시작했다……
					CASE 2
						PRINTFORML 「킥킥……그렇게 무방비하면……」
						PRINTFORML 「나ー 쁜 누나에게、먹혀버려요……♪」
						PRINTFORMDL 토요히메가 그렇게 속삭이며、귓가에 후우ー 하고 달콤한 입김을 불어온다
						PRINTFORMDW 몸서리 쳐지는 섬뜩한 감각에、%마스터는% 저항할 힘을 모두 잃어버렸다
				ENDSELECT
			ENDIF
			PRINTFORMW
			;押し倒し口上切り替え用のTCVAR
			TCVAR:99:399 = 1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERに抱きついた（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;なだめられた（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 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 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;好きにして状態から抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;欲求不満が高くて抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;誘ってきた（人目につかない場所に行きたがるやつ）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;ARG:1=TARGETの欲求不満度（最高1000）
		;必要ならばこれで分岐を作ってください
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;浴場で遭遇
;==================================================
@M_KOJO_EVENT_K99_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_K99_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_K99_13(ARG,ARG:1)
;口上主はTARGET
;ARG:1に残っている仕事量
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

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

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

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;TCVAR:盗み食い抑制で持っていた食物を食われるのを回避できる
	;仕様例（薬が入ってたら食わない）
	;IF DISH_DRG
	;	TCVAR:훔쳐먹기억제 = 1
	;ENDIF

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

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;未実装（押し倒しコマンドに統合？
	;MASTERが押し倒した（ウフフ開始時）
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;逢瀬終了（ウフフ終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;時間停止中
		IF FLAG:시간정지
			PRINTFORMDL
			PRINTFORMDW
		;睡眠中
		ELSEIF CFLAG:수면
			PRINTFORML
			RETURN 1
		;通常
		ELSE
			;연모
			IF TALENT:연모
				;欲情のパラメーターが１０未満
				IF PALAM:욕정 < PALAMLV:10
					CALL HPH_PRINT,@"「더 연결되고 싶었는데……HPH」","L"
					CALL HPH_PRINT,@"「그럴 수가 없네요……HPH」","L"
					PRINTFORMDW 토요히메는 의복이 정돈되자、%CALLNAME:MASTER%의 볼에 살짝 키스를 했다
				;欲情のパラメーターが１５未満
				ELSEIF PALAM:욕정 < PALAMLV:15
					CALL HPH_PRINT,@"「기분 좋았어……？HPH」","L"
					CALL HPH_PRINT,@"「……응 HPH 나도야……%CALLNAME:MASTER%……HPH」","L"
					PRINTFORMDW %마스터는% 토요히메를 뒤에서 얼싸안고서、잠시 정담을 나누었다……
				;欲情のパラメーターが最大
				ELSE
					CALL HPH_PRINT,@"「%CALLNAME:MASTER%……오늘도 멋있었어……HPH」","L"
					CALL HPH_PRINT,@"「잔뜩 사랑해줘서……전、행복해요……HPH」","L"
					PRINTFORMDW 마음도 몸도 가득 채워진 토요히메는、황홀감에 빠져 %CALLNAME:MASTER%에게 그 지체를 기대고 있다……
				ENDIF
			;それ以外
			ELSE
				;欲情のパラメーターが１０未満
				IF PALAM:욕정 < PALAMLV:10
					PRINTFORML 「잔뜩 많이 사랑해줘서 기뻤어」
					PRINTFORML 「……다음에 또、해줘요♪」
					PRINTFORMDW 토요히메는 의복을 갖춰 입고서는、살짝 %CALLNAME:MASTER%의 귓가에 속삭였다
				;欲情のパラメーターが１５未満
				ELSEIF PALAM:욕정 < PALAMLV:15
					PRINTFORML 「아야야야、허리가……」
					PRINTFORML 「하아…… 당신은 너무 원기왕성 하네요……」
					PRINTFORMDW 품 속의 토요히메가 허리를 문지르고 있다。너무 격렬하게 했던 것 같다……
				;欲情のパラメーターが最大
				ELSE
					CALL HPH_PRINT,@"「하아…… 하아……っHPH」","L"
					CALL HPH_PRINT,@"「더는…… 너무 열심히 했어요……HPH」","L"
					PRINTFORMDW 토요히메는 아직 남아있는 정사의 여운에、때때로 흠칫흠칫 하며 몸을 떨었다……
				ENDIF
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
	;-------------------------------------------------
	;事後描写
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;精液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;愛液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;事後のムード
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;服を着る
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;동침한다
;==================================================
@M_KOJO_EVENT_K99_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_K99_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
	;-------------------------------------------------
	;時間停止解除共通
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K99_18(ARG,ARG:1)
;口上主は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
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=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_K99_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
	;-------------------------------------------------
	;あなたの私室変更により同居
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K99_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:우후후
			;うふふ中に眠くて帰る
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;デート中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:우후후
			IF CFLAG:쇠약
				;うふふ中に疲れて帰る
				PRINTFORMW
			ELSE
				;うふふ中に眠くて帰る
				PRINTFORMW
			ENDIF
		ELSE
			PRINTFORMW
		ENDIF
		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
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;部屋に来ないか→「行く」を選択（～に誘われるまま、【MASTER】は【TARGET】の部屋へと向かった……）
	;（これが発生すると十中八九押し倒されます）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;部屋に来ないか→「やめとく」を選択（～は心なしか寂しそうだ……）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今夜は帰りたくないと言い出す（～は今夜は帰りたくないと言い出した…）
	;（来訪キャラの帰宅時に欲求不満と欲望が高いと発生）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今夜は帰りたくない→「泊める」を選択（～は【MASTERの自室】に泊まっていくことになりました）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今夜は帰りたくない→「泊めない」を選択、または家主が居る（【MASTER】は丁重に断った）
	;（家主が居る＝MASTERの私室に他のキャラの私室を設定している）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;疲れて帰宅（疲れきった～は帰って行きました）
	;（～は疲れ切っている→（入り口）まで送るよ でも発生）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 10
		IF CFLAG:우후후
			;うふふ中に疲れて帰る
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K99_21(ARG,ARG:1)
;口上主はARG
;CALL M_KOJO_COLOR_K99は豊姫
;SETCOLOR 0xA869BEは依姫
;SETCOLOR 0xCCDFFFはレイセン
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMDL
		PRINTFORMDL ―――고요의 바다
		PRINTFORMDW
		SETCOLOR 0xA869BE
		PRINTFORMW 「언니、또 고요의 바다에 와 있으셨군요」
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「……응、아아…… 요리히메……」
		SETCOLOR 0xA869BE
		PRINTFORMW 「대체 무슨 일이세요？ 최근、상태가 이상하신데……」
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「저기、요리히메는 좋아하는 사람 있어？」
		SETCOLOR 0xA869BE
		PRINTFORMW 「―――네엣？」
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「좋아하는 사람이라든가。연인이라든가、그런 것 말이야」
		SETCOLOR 0xA869BE
		PRINTFORMW 「이、있을 리가 없잖아요。첫째、큰언니와 달리 그런 틈조차……」
		;依姫が恋慕
		IF TALENT:98:연모
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「헤에…… 그런 것에 비해、%CALLNAME:MASTER%와 사이좋게 수다를 떨고 있던데？」
			SETCOLOR 0xA869BE
			PRINTFORMW 「윽………」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「데이트、재미있었어？ 외박까지 하고」
			SETCOLOR 0xA869BE
			PRINTFORMW 「그、그걸 어떻게」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「내쪽이 연상이니까요」
			SETCOLOR 0xA869BE
			PRINTFORMW 「상관 없다고 생각하지만……」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「그래서、%마스터를% 좋아해？」
			SETCOLOR 0xA869BE
			PRINTFORMW 「……………」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「보렴、빨리 말하지 않으면 내가 그를 빼앗아 버릴 걸？」
			SETCOLOR 0xA869BE
			PRINTFORMW 「에엣」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「사실、나도 그를 좋아해」
			PRINTFORMW 「요리히메가 필요없다면、내가 받아버릴까나ー」
			SETCOLOR 0xA869BE
			PRINTFORMW 「아、안 돼요！……아앗」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「후후훗、역시네」
			SETCOLOR 0xA869BE
			PRINTFORMW 「……전부、내다보신거군요」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「내쪽이 연상이니까」
			SETCOLOR 0xA869BE
			PRINTFORMW 「그를 좋아한다는 것은……」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「그것은 정말」
			PRINTFORMW 「하지만、요리히메가 좋아하는 사람을 빼앗을 생각은 없어요」
			SETCOLOR 0xA869BE
			PRINTFORMW 「………헛」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「내쪽이 연상이니까」
			SETCOLOR 0xA869BE
			PRINTFORMW 「그게、마음에 드십니까？」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「네에、상당히(かなり)」
			;상당히 또는 해도 좋다의 옛 표현
			;レイセンが恋慕
			IF TALENT:100:연모
				PRINTFORMW
				CALL M_KOJO_COLOR_K99
				PRINTFORMW 「……아、그러고 보니 레이센도 그를 좋아한다고 했던가」
				PRINTFORMW 「후후훗、라이벌이 너무 많아서 큰일이네♪」
				SETCOLOR 0xA869BE
				PRINTFORMW 「……네？ 에에엣！？」
			ENDIF
		;それ以外
		ELSE
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「저도 한가한 건 아니지만요。뭐 괜찮겠지」
			SETCOLOR 0xA869BE
			PRINTFORMW 「정말 왜 그러세요？ 마치……」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「그 때를 보는 것……같은？」
			SETCOLOR 0xA869BE
			PRINTFORMW 「………네」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「괜찮아요。귀녀를 혼자 두지 않을테니」
			SETCOLOR 0xA869BE
			PRINTFORMW 「그 때도 그렇게 말하셨는데요」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「윽」
			SETCOLOR 0xA869BE
			PRINTFORMW 「언니」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「……그래」
			SETCOLOR 0xA869BE
			PRINTFORMW 「저는…… 언니가 상처받는 모습을 보고 싶지 않아요」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「……응」
			SETCOLOR 0xA869BE
			PRINTFORMW 「그 때、언니는………」
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「아ー、그래그래。알겠어요 알겠습니다」
			PRINTFORMW 「이제 연인은 만들지 않는다。약속할게요」
			SETCOLOR 0xA869BE
			PRINTFORMW 「………핫」
			PRINTFORMW
			CALL M_KOJO_COLOR_K99
			PRINTFORMW 「그건 그렇다 치고、요리히메는 신경 쓰이는 사람이든가 있어？」
			SETCOLOR 0xA869BE
			PRINTFORMW 「………더는 싫어어！」
		ENDIF
		RESETCOLOR
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMDL
		PRINTFORMDL ―――면월정
		PRINTFORMDW
		SETCOLOR 0xCCDFFF
		PRINTFORMW 「저……저기ー……토요히메님？」
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「……에？ 아、왜 그래？ %CALLNAME:MASTER%……가 아니구나。레이센」
		SETCOLOR 0xCCDFFF
		PRINTFORMW 「네、네넷。부탁하신 편지를 야고코로님께 전달했으므로 보고를……」
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「그래、고마워。가봐도 좋아」
		PRINTFORMDL 예를 표하고 레이센이 물러난다
		PRINTFORMDL 안 돼。이러다 또 요리히메에게 잔소리를 듣고 만다
		PRINTFORMDW 이럴 때는 당분을……하고 복숭아에 손을 뻗으려는데
		SETCOLOR 0xA869BE
		PRINTFORMW 「실례합니다。언니、레이센이 고하길 언니의 모습이 이상하다고……」
		PRINTFORMW 「……아아、그렇군요。그런 건가요」
		PRINTFORMW 「언니에게 말씀드리지만、최근 복숭아를 너무 많이 드시는데요？」
		PRINTFORMW 「전에도 과하게 드시긴 했지만、요즘은 특히……」
		PRINTFORMDW 결국、여동생의 잔소리를 듣는 신세가 되고 말았다
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「생각할게 많으면、힘들구나……」
		SETCOLOR 0xA869BE
		PRINTFORMW 「잠깐、듣고 계시나요？」
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「그래그래。듣고 있어요ー」
		RESETCOLOR
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMDL
		PRINTFORMDL ―――어느날 있었던 일
		PRINTFORMDW
		CALL HPH_PRINT,@"「응、크으……앙HPH 후우……으응……앙HPH」","W"
		PRINTFORMDL
		PRINTFORMDL 처음은…… 그저 호기심
		PRINTFORMDL 지상의 인간인 그에게서라면、재미있는 이야기를 들을 수 있을지도 모른다
		PRINTFORMDL 정말 그것뿐이었다
		PRINTFORMDW
		CALL HPH_PRINT,@"「거기…… 좀 더 만져…… 앙HPH 아、으응……앙HPH」","W"
		PRINTFORMDL
		PRINTFORMDL 어느덧、나는 그와 몸을 겹치게 되어 버렸다
		PRINTFORMDL 귓가에 사랑이 속삭여져、나는 날아오르고 있었다
		PRINTFORMDW
		CALL HPH_PRINT,@"「우응…… 좋아…… 넣어줘……HPH 아、아아……앙HPH」","W"
		PRINTFORMDL
		PRINTFORMDL 그로부터 얼마 후…… 토끼들 사이에 불온한 소문이 퍼지게 되었다
		PRINTFORMDL 와타츠키 토요히메는 배신자로서、지상의 인간과 내통하고 있다…… 라고
		PRINTFORMDW
		CALL HPH_PRINT,@"「하앗HPH 하아앙HPH 안쪽、닿아버려……앙HPH」","W"
		PRINTFORMDL
		PRINTFORMDL 분면、소문을 낸 토끼는 나와 그가 만나는 모습을 보고 있었겠지
		PRINTFORMDL 나는 내심 초조해 하고 있었지만、어느 날을 경계로 그 소문은 뚝 그쳤다
		PRINTFORMDW
		CALL HPH_PRINT,@"「아、안에、부풀어서……앙HPH 응응응 앙HPH」","W"
		PRINTFORMDL
		PRINTFORMDL 모습을 살피러 토끼들의 연습장에 가봤더니、모두가、평소대로 태평하게 단련을 하고 있었다
		PRINTFORMDL 토끼 몇 마리가 사라진 것 같다。말을 듣자 하니、그 토끼들은 배신자였고 지상으로 추방되었다고 한다
		PRINTFORMDL 그것을 지시한 것은 요리히메 란다。나는 그녀에게 미안한 마음으로 가득찼다
		PRINTFORMDW
		CALL HPH_PRINT,@"「하아……하아……앙HPH 정말 좋아해요……%CALLNAME:MASTER%……HPH」","W"
		PRINTFORMDL
		PRINTFORMDL 그리고 지금…… 나는 오늘도 이렇게 그에게 안겨 있다
		PRINTFORMDL 추방당한 토끼들은 어떻게 되었을까。짐승에게 잡아먹히거나 하지 않았으면 좋겠는데
		PRINTFORMDW 그의 더러움을 받아들이며…… 멍하니、나는 그런 것을 생각하고 있었다
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORMDL
		PRINTFORMDL ―――어느날 있었던 일
		PRINTFORMDW
		PRINTFORMW 「응、응……」
		PRINTFORMDL 눈을 떠보니、낯선 천장이었다
		PRINTFORMDW 멍한 머리로 상황을 정리하면서 몸을 일으키려고 하자……
		PRINTFORMDW 곁에 %마스터가% 자고 있다는 것을 깨달았다
		PRINTFORMW 「아…… 나……」
		PRINTFORMDL 맞다。그에게 데이트 신청을 받고、그리고……
		PRINTFORMDW 기세에 맡겨、행위를 저지르고 만 것이다
		PRINTFORMW 「저기、일어나봐」
		PRINTFORMDL 그를 깨우려고 몸부림쳤지만、일어날 기미조차 없다
		PRINTFORMDW 얼굴을 들여다 본다。안심하고 자는 얼굴이 마치 갓난아기와 같다
		PRINTFORMW 「……킥킥、귀여운 자는 얼굴」
		PRINTFORMW 「깨우는 건 불쌍하려나…… 메모라도 남겨둘까요」
		PRINTFORMDL 그를 깨우지 않도록、조용히 이불에서 나와 몸단장을 한다
		PRINTFORMDW 이참에、벗어 던진 그의 옷도 말끔히 개어놓았다
		PRINTFORMW 「어디 보자…… 데이트、재미있었어요」
		PRINTFORMW 「또…… 또、뭐라고 써야 할까나」
		PRINTFORMDW 여러 가지를 떠올려 본 후…… 솔직한 마음을 쓰는 것이 제일이라는 결론에 이르렀다
		PRINTFORMW 「……또 가기로 해요。당신의 토요히메로부터 올림」
		PRINTFORMW 「………후훗」
		PRINTFORMW 「『당신의 토요히메로부터』라니、이거 마치 연인 같다」
		PRINTFORMDL 접은 옷 위에 쪽지를 놓고、슬그머니 방을 나선다
		PRINTFORMDW 뭔가 살금살금 몰래 하는 것 같아서、그게 좀 서운했다
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;セフレ取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMDL
		PRINTFORMDL ―――면월정
		PRINTFORMDW
		SETCOLOR 0xA869BE
		PRINTFORMW 「언니、몸이라도 안 좋으십니까？」
		PRINTFORMW 「들은 바에 의하면、최근에는 토끼들의 연습에도 얼굴을 내밀지 않는다던가……」
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「응…… 좀 그래」
		SETCOLOR 0xA869BE
		PRINTFORMW 「……무슨 일 있나요？」
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「그런 건 아닌데……」
		SETCOLOR 0xA869BE
		PRINTFORMW 「……뭐 괜찮습니다만」
		PRINTFORMW 「어느 토끼들이 정의 경중을 물어올지도 모르는데요？」
		PRINTFORMDL 일부러인 듯한 한숨을 내쉬며 요리히메가 방을 나선다
		PRINTFORMDW 성실한 그녀의 말이다。토끼들이 게으름 피우지 않나 살피러 가는 것이겠지
		CALL M_KOJO_COLOR_K99
		PRINTFORMW 「우ー응…… 뭐라고 설명해야 될까나……」
		PRINTFORMDL 좋지 않다는 건 알아
		PRINTFORMDW 달의 사자의 리더인 내가、지상의 인간에 정신이 팔려 있다니……
		PRINTFORMW 「이럴 때、야고코로님이 계셨으면……」
		PRINTFORMDW 그를 즉각 죽이라고 하셨을까
		PRINTFORMDW 거기까지 생각하고、나는 머리를 흔들었다
		PRINTFORMDL 언제까지고 야고코로님께 의지하다가는 실망시키고 만다
		PRINTFORMDW 앞으로 어떻게 할까…… 스스로의 머리로 생각하지 않으면
		PRINTFORMW 「……후훗、확실히」
		PRINTFORMW 「정의 경중을 묻는다라… 지위를 빼앗겠다는 건가、어쩔 수 없지」
		PRINTFORMDW 생각한 결과、나는 복숭아를 두 개 집어 들고서……
		PRINTFORMDW 오늘도、그에게 향하기로 결정했다
		RESETCOLOR
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;キス魔取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;동거, 비동거로 나누려고 했지만 토요히메의 능력이 있다면 나누어 쓸 필요도 없다고 생각했기 때문에 공통
		PRINTFORMDW 어느 날 늦은 밤、%마스터가% 숨이 갑갑해 눈을 떠 보자……
		PRINTFORMDW 무려、토요히메가 위에 올라타、정신없이 입술을 탐하고 있었다
		CALL HPH_PRINT,@"「휴우……HPH 아…… 깨워버렸을까……？」","W"
		CALL HPH_PRINT,@"「미안합니다…… 이제 조금만 더 하면 만족할 것 같으니까……HPH」","W"
		PRINTFORMDL 도대체 얼마나 오랫동안 이러고 있었을까
		PRINTFORMDW 그녀의 입 주위는 서로의 침으로 끈적끈적해져 있었다
		CALL HPH_PRINT,@"「응、음…… 츄…… 하아…… 앙HPH」","W"
		CALL HPH_PRINT,@"「이제 한 번만 더…… 응…… 츄…… 앙HPH」","W"
		PRINTFORMDW 몇 번이고 몇 번이고、질리지도 않고 입술을 포개 오는 토요히메
		PRINTFORMDW 결국 %마스터가% 풀려난 것은、밤이 밝아 와、하늘이 환해지기 시작할 무렵이었다……
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;自慰狂い取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		CALL HPH_PRINT,@"「응……응……앙HPH」","W"
		PRINTFORMDW 모두가 잠들어 잇을 무렵、토요히메는 언제나처럼 자신의 몸을 위로하고 있었다
		PRINTFORMDW 일단 속옷 너머로 비렬을 문질러 주어
		PRINTFORMDW 천천히、안타깝게 해서 감도를 높여나간다
		CALL HPH_PRINT,@"「앙……크으、으응……앙HPH」","W"
		PRINTFORMDW 질척……질척……하고、조용한 공간에 울려 퍼지는 음란한 물소리
		PRINTFORMDW 희미할 텐데도、그 소리만 유난히 크게 들려온다
		CALL HPH_PRINT,@"「후우……우우……앙HPH」","W"
		PRINTFORMDW 듬뿍 애액을 들이마셔、묵직해진 속옷을 벗어던지자
		PRINTFORMDW 노출된 비소는 질펀하게 녹아들어、한층 더한 자극을 요구하며 침을 흘리고 있다
		PRINTFORMDW 준비는 마쳤다。다음은……
		CALL HPH_PRINT,@"「아아…… 안 돼、참을 수 없어…… 앙HPH」","W"
		PRINTFORMDW 옆에 놓인 남성기를 본뜬 완구。길이도 굵기도、%CALLNAME:MASTER%와 동일
		PRINTFORMDW 토요히메는 순서를 건너뛰고 그것을 집어 들고서―――
		CALL HPH_PRINT,@"「으응――――― 응HPH HPH HPH」","W"
		PRINTFORMDW 주저하지 않고、\@ TALENT:포르치오성감 ? 자궁을 도려내듯이 #  \@질 안쪽 깊숙이 꽂아 넣었다
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;ポルチオ性感取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW 「하앗……응、크으…… 앙」
		PRINTFORMDW 토요히메는 몸의 욱신거림을 억제하지 못하고、손가락으로 자신의 비소를 만지고 있다
		PRINTFORMDW 질꺽…… 질꺽…… 하며 질의 얕은 곳을 할퀴듯이 애무한다
		PRINTFORMDW 얼마 전까지만 해도、이 정도로 도달할 수 있었다
		PRINTFORMDW 하지만、지금은……
		PRINTFORMW 「부족해…… 이걸로는、모자라……앙」
		PRINTFORMDW 부족하다。부족하다。부족해。
		PRINTFORMDW 이런 얕은 곳으로、어떻게 느낄 수 있단 말인가
		CALL HPH_PRINT,@"「좀 더、깊이…… 아、여기……앙HPH」","W"
		PRINTFORMDW 깔깔한 천정。여성의 가장 민감한 장소인 Ｇ스팟
		PRINTFORMDW 그곳을 무시하고…… 토요히메는 꽉꽉 열고 닫히는 자궁의 입구를 손가락으로 살짝 어루만졌다
		CALL HPH_PRINT,@"「아、아아……앙HPH 크으、으응……앙HPH」","W"
		PRINTFORMDW 이게 바로 찾고 있던 쾌락이다。이런 데가 있었던가
		PRINTFORMDW 거기에서 이제 멈추지 않는다
		PRINTFORMDW 군침을 흘리며、단정치 못하게 다리를 벌리고
		PRINTFORMDW 질꺽질꺽 손가락으로 쑤시고 휘저으며、성감대로 변한 자궁을 계속 자극하자
		PRINTFORMDW 끈적끈적한 애액이 속옷을、하반신을、침구를 흠뻑 더럽혀 간다
		PRINTFORMDW 그럼에도、토요히메는 멈추지 않았다
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;おもらし癖取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K99_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_K99_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_K99_24(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;연모
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;妊娠経験済み
		IF CFLAG:99:아이인원수
			PRINTFORML 「%CALLNAME:MASTER%。야고코로님께서 진찰해 주셨는데……」
			PRINTFORML 「……우후훗♪ 『축하해』래♪」
			PRINTFORML 「오늘 밤은 가족끼리 축하나 할까요♪」
			PRINTFORMDL 새로운 가족이 늘어난다。이보다 기쁜 일은 없다
			PRINTFORMDW %마스터는% 토요히메를 품에 안고、새로운 생명이 깃든 배를 상냥하게 어루만졌다……
		;初めて妊娠した
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%、좀 괜찮을까？」
			PRINTFORMW 「저어……당신이 원하던 것이 드디어 생겼어」
			PRINTFORMW 「……우후훗、뭔지 알아？」
			;選択肢
			CALL ASK_M("아기", 1, "마이홈", 1, "밥", 1)
			;判定
			SELECTCASE RESULT
				;子供
				CASE 0
					PRINTFORMW 「그래、맞아。우리들의 아기」
					PRINTFORMW 「그게、여기에 있어……♪」
				;マイホーム
				CASE 1
					PRINTFORMW 「우응、그것도 갖고 싶긴 한데……」
					PRINTFORMW 「지금은、이 아이가 있을 곳이라……♪」
				;ご飯
				CASE 2
					PRINTFORMW 「이제、방금 먹은 지 얼마 안 됐잖아요？」
					PRINTFORMW 「정답은……귀여운 우리 아기야♪」
			ENDSELECT
			PRINTFORMDL 토요히메가 %CALLNAME:MASTER%의 손을 잡고서、자신의 배를 만지게 했다
			PRINTFORMDW 그러자、이제 내가 아버지가 되었구나 라는 실감이 들었다
			PRINTFORMW 「어서 태어나렴……아빠와 엄마가、널 행복하게 해줄거야……♪」
			PRINTFORMDL %CALLNAME:MASTER%의 손에 자신의 손을 포개고 있는 토요히메는、진심으로 기쁜 얼굴을 하고 있다
			PRINTFORMDW 토요히메와 태어날 아이。두 사람을 반드시 행복하게 하자……%마스터는% 마음 속으로 강하게 그렇게 다짐했다
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;사모
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		$TOYOHIME_PREGNANCY
		;妊娠経験済み
		IF CFLAG:99:아이인원수
			PRINTFORML 「빨리 그 아이에게 알려주고 싶어……」
			PRINTFORML 「새로운 가족이 늘어난다고……」
			PRINTFORMDL 토요히메는 새 생명이 머문 배를 부드럽게 어루만졌다
			PRINTFORMDW 그 표정은、모성으로 가득차 있었다
		;初めて妊娠した
		ELSE
			PRINTFORMDL 하루는、방을 청소하고 있는데 토요히메가 찾아왔다
			PRINTFORMDW 대체 무슨 일 일까。%마스터가% 차를 준비하려고 하자……
			PRINTFORMW 「저기……%CALLNAME:MASTER%……」
			PRINTFORMW 「아기、생긴 것 같아……」
			PRINTFORMDL 뜬금없는 고백에 %마스터는% 눈이 휘둥그레졌다
			PRINTFORMDW 자신이 아버지가……토요히메의 배에、자신의 아이가……
			PRINTFORMW 「……괜찮아。당신 탓이 아니야」
			PRINTFORMW 「이 아니는 내가 잘……앗！？」
			PRINTFORMDL 돌연 꽉 안긴 토요히메가 놀라서 소리를 높인다
			PRINTFORMDW 아이가 생겨서 좋다。%마스터는% 솔직한 감정을 토요히메에게 전했다
			PRINTFORMW 「……고마워。%CALLNAME:MASTER%」
			PRINTFORMW 「나、건강한 아기 낳을게」
			PRINTFORMW
			PRINTFORMDL ……그 후、두 사람은 조촐하게 축하를 나눴다
			PRINTFORMDW 앞으로 태어날 새 가족을 생각하며……
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		GOTO TOYOHIME_PREGNANCY
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;出産
;==================================================
@M_KOJO_EVENT_K99_25(ARG,ARG:1)
;口上主はLOCAL
;ARG:1	何人目の子供か
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;연모
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		$TOYOHIME_CHILDBIRTH
		PRINTFORMDL
		;一人目の子供の時は以下の文が流れる
		IF ARG:1 == 1
			PRINTFORMDL 토요히메가 산기를 느끼자、%마스터는% 방 밖으로 나왔다
			PRINTFORMDW
			PRINTFORML 결코 안을 들여다 보면 안 된다。이유를 물어서도 안 된다
			PRINTFORMW 나를 생각한다면、제발 그것을 지켜주길 바래
			PRINTFORMDL
			PRINTFORMDL 출산에 입회하고 싶은 마음도 있었지만……지금은 그저 기다릴 수 밖에 없다
			PRINTFORMDW 1시간、2시간、3시간……시간이 지나간다
			PRINTFORMDW
			PRINTFORMDW ……그리고、드디어……
			PRINTFORMDW 방 안에서、갓난아기의 건강한 울음소리가 들려왔다
			PRINTFORMDL ……………
			PRINTFORMDL ………
			PRINTFORMDW …
		ENDIF
		PRINTFORMW 「그래그래…… 착한 아이네……」
		PRINTFORMW 「잔ー 뜩 먹고、커지려므나……♪」
		PRINTFORMDL 토요히메는 갓 태어난 아이에게 젖을 먹이고 있다
		PRINTFORMDW 누구를 닮았는지、굉장히 식욕이 왕성하다
		PRINTFORMW 「저기、%CALLNAME:MASTER%。이 아이의 이름을 정해주지 않을래？」
		PRINTFORMDL 내가 결정해도 좋지만、토요히메의 생각도 들어두고 싶다
		PRINTFORMDL %마스터가% 그렇게 말하자、토요히메는 「그렇네」라고 조금 생각한 후、몇 가지 후보를 언급했다
		PRINTFORMDW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;사모
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		GOTO TOYOHIME_CHILDBIRTH
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		GOTO TOYOHIME_CHILDBIRTH
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;딸딸이들킴
;==================================================
@M_KOJO_EVENT_K99_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

;オナバレックス判定用関数
;RETURN -1で強制失敗、RETURN 1で強制成功
@M_KOJO_EVENT_K99_26_1(ARGS)
#DIM 補正値
IF ARGS == "부디 모쪼록"

ELSEIF ARGS == "둘이서"

ENDIF

;使用例
;IF !TALENT:XX:연모
;	PRINTFORMW %CALLNAME:XX%はガードが堅いぞ！
;	RETURN -1
;ENDIF
;IF TALENT:MASTER:농후정액
;	PRINTFORMW %CALLNAME:XX%はちんぽに弱いぞ！
;	RETURN 1
;ENDIF
;==================================================
;相手からデートのお誘い
;==================================================
@M_KOJO_EVENT_K99_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
		;-------------------------------------------------
		CASE 3
		;部屋に誘われた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;部屋に誘われたのを受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;部屋に誘われたのを断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;脱衣口上
;==================================================
@M_KOJO_EVENT_K99_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_K99_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_K99_30(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
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
	;壊れるまでしてあげる
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;一日の終了時(AFTERTRAニーの前)、面識がなければ呼び出されない
;==================================================
@M_KOJO_EVENT_K99_31(ARG,ARG:1)
;口上主はTARGET
;ARGは会ってない日数
;何日以上会ってなかったら愚痴を言うとかできます
;CFLAG:オナバレで分岐入れてもよさそう
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;今日会っていない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今日会っている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;自由行動中
;ARG:1      0=行動中,1=完了時
;技能系の行動は技能レベルが1以上なら発生
;==================================================
@M_KOJO_EVENT_K99_32(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
	CASE 0
		;▼考え事,（～は考えに耽っている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 1
		;▼遊ぶ,（～は走り回っている。）
		;※[유치]持ちのみ
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 2
		;▼식사,（～は食事を摂っている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 3
		;▼つまみ食い（～はこっそりつまみ食いをしている。）
		;※[요정]持ちとルーミア、こいし、幽々子、紫苑のみ
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 4
		;▼청소,（～はテキパキと部屋の掃除をしている。）
		;※[청소부]持ちまたは汚臭耐性-1以下のみ
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 5
		;▼運動,（～は張り切って運動している。）
		;※[음악지식]持ちは除く（演奏になる）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 6
		;▼독서,（～は黙々と本を読んでいる。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 7
		;▼요리,
		IF !ARG:1
			;行動中
			IF Activity_Duration:TARGET > 30
				;料理中（～は軽快に料理をしている。）
				PRINTFORML
			ELSE
				;食事中（～は作った料理を食べている。）
				PRINTFORML
			ENDIF
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 8
		;▼演奏
		;※[음악지식]持ちのみ（TALENT:音楽知識で変化）
		;1,～は小気味よく演奏している。
		;2,～は気ままに歌っている。
		;3,～は華麗に踊っている。
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 9
		;▼採集,（～使える素材を探している。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 10
		;▼釣り,（～はのんびり釣りをしている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 11
		;▼実験,（～は怪しい実験をしている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 12
		;▼のんびり,（～はのんびりしている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 13
		;▼晩酌,（～はまったりとお酒を飲んでいる。）
		;※酒耐性0以上のみ
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 14
		;▼買い物,（～は気ままに買い物している。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 15
		;▼説教,（～はじっと聞いている…）
		;※신령・蓬莱人は除く
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 16
		;▼落とし穴,（～は落とし穴を増やしている）
		;※三月精・チルノ・クラウンピースのみ
		;それ以外は落ちる側
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時,
			;（仕掛け人（失敗時）,誰も引っかからないので～は飽きてしまったようだ…）
			;（落ちた側（戦闘能力2～4）,～はすぐに穴から飛び出して周りをキョロキョロ見回している…）
			PRINTFORML
		ENDIF
	CASE 17
		;▼雪だるま作り
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;ハッピーニューイヤー
;年越しの瞬間に同じ部屋に居ると発生
;==================================================
@M_KOJO_EVENT_K99_33(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	PRINTFORMW
ENDIF
RETURN 1

;==================================================
;技能レベルアップ
;各ABL値はレベルアップ後の値になってます
;==================================================
@M_KOJO_EVENT_K99_34(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
	CASE 1
		;戦闘技能
		PRINTFORMW
	CASE 2
		;화술기능
		PRINTFORMW
	CASE 3
		;청소기능
		PRINTFORMW
	CASE 4
		;교양
		PRINTFORMW
	CASE 5
		;요리기능
		PRINTFORMW
	CASE 6
		;채집Lv
		PRINTFORMW
	CASE 7
		IF ARG:1 == 0
			;음악기능
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【음악지식】取得
			PRINTFORMW
		ELSEIF ARG:1 == 2
			;【相対音感】取得
			PRINTFORMW
		ENDIF
	CASE 8
		;낚시Lv
		PRINTFORMW
	CASE 9
		IF ARG:1 == 0
			;조제Lv
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【조합지식】取得
			PRINTFORMW
		ENDIF
	CASE 10
		;벌채Lv
		PRINTFORMW
	CASE 11
		IF ARG:1 == 0
			;指
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【능숙한손가락】取得
			PRINTFORMW
		ENDIF
	CASE 12
		IF ARG:1 == 0
			;舌
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【혀놀림】取得
			PRINTFORMW
		ENDIF
	CASE 13
		IF ARG:1 == 0
			;胸
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【음유】取得
			PRINTFORMW
		ENDIF
	CASE 14
		;腰
		PRINTFORMW
	CASE 15
		IF ARG:1 == 0
			;膣
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【음호】取得
			PRINTFORMW
		ENDIF
	CASE 16
		IF ARG:1 == 0
			;애널
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【항문광】取得
			PRINTFORMW
		ENDIF
	ENDSELECT
	PRINTL
ENDIF
RETURN 1

;==================================================
;デイリーイベント2,夢精
;親密5以上で発生（来訪キャラのみ）
;▼地の文--------------------------------------------------
;【MASTER】が夢精で汚した下着を洗っていると【TARGET】が飛んできた！
;【TARGET】はそんなもの他の洗濯物と一緒に洗わないでと抗議すると、【MASTER】の手に収まった下着をふんだくり戻っていった…
;【TARGET】　欲情の珠＋1000
;==================================================
@M_KOJO_DAILY_EVENT_K99_2(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;地の文を変えたければコメントアウト
;※コメントアウトすると欲情の珠＋1000（JUEL:11 += 1000）もカットされるので注意
CALL DAILY_MESSAGE_2(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	PRINTFORMW
ENDIF
RETURN 1

;==================================================
;デイリーイベント4,物思い
;濃厚精液状態で発生
;▼地の文--------------------------------------------------
;とりとめもない思考に耽っていた【TARGET】は、いつの間にか【MASTER】のことを考えていたことに気づいた
;【TARGET】は明日【MASTER】に会いに行くことにしたようだ
;==================================================
@M_KOJO_DAILY_EVENT_K99_4(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;地の文を変えたければコメントアウト
CALL DAILY_MESSAGE_4(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	PRINTFORMW
ENDIF
RETURN 1

;==================================================
;デイリーイベント12,特訓
;信頼100以上で発生（拠点キャラのみ）
;==================================================
@M_KOJO_DAILY_EVENT_K99_12(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;地の文を変えたければコメントアウト
;コメントアウトできるのはARG:1=1,2のみです
CALL DAILY_MESSAGE_12(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG:1
	CASE 1
		;特訓を頼まれる
		;～から新技の訓練に付き合って欲しいと言われた
		PRINTFORML
	CASE 2
		;断る
		;～は残念そうだ
		PRINTFORML
	CASE 3
		;～の攻撃！
		;※ここはWAITしないでください
		PRINTFORML
	CASE 4
		IF ARG:2
			;時間停止して回避
			PRINTFORML
		ELSE
			;回避成功
			PRINTFORML
		ENDIF
	CASE 5
		;回避失敗
		PRINTFORML
	ENDSELECT
ENDIF
RETURN 1

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

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

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

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

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

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

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

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

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

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

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

;-------------------------------------------------
;部屋描写用関数
;口上キャラのOMANEKIBEYAか拠点の描写に使います
;記入する際はコメントアウトを外してください
;-------------------------------------------------
;@K99_ROOM_DESCRIPTION
;PRINTFORML 例）生活感のない殺風景な部屋だ
;-------------------------------------------------

;==================================================
;贈り物イベント
;==================================================
@M_KOJO_EVENT_K99_GIFT(ARG, GIFT_ID, 評価点, GIFT_NAME, SENSE)
#DIM GIFT_ID
#DIM 評価点
#DIMS GIFT_NAME
#DIMS SENSE
;---------------------------------------------------------------------------------------------------
;評価点       贈り物の評価点（1～999）,口上主があげた場合でも口上主の評価点
;GIFT_NAME    贈り物の名称
;SENSE        贈り物に設定された属性。STRCOUNT(DISH_TASTE, "ほげほげ/")を使うと特定の属性を判定できます。
;GIFT_ID      これ単体では使いません。以下の式内関数を使うとデータを抽出できます（こだわりたい人用）
;　GET_GIFTDATA(GIFT_ID, "回数")    貰った（あげた）回数
;　GET_GIFTDATA(GIFT_ID, "得点")    得点（1～999）,口上テンプレ内では用意されてます。
;　GET_GIFTDATA(GIFT_ID, "日付")    貰った（あげた）日付（1～9999）
;　GET_GIFTDATA(GIFT_ID, "場所")    買った場所（デートの行き先）
;　GET_GIFTDATA(GIFT_ID, "形容詞")  形容詞番号（贈り物_形容詞.erb参照）
;　GET_GIFTDATA(GIFT_ID, "本体")    本体番号（贈り物_本体.erb参照）
;--------------------------------------------------------------------------------------------------
;デート帰りに口上主があなたに贈り物を渡す（陥落や好感度に関わらず親密5以上から発生）
;評価点は701～999（渡すキャラ本人の評価）
;--------------------------------------------------------------------------------------------------
IF ARG == 1
	;PRINTFORMW 「%GIFT_NAME%をあげるから大事に使って」
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日貰った贈り物を大事にする（700点以上）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 2
	;IF STRCOUNT(SENSE, "かわいい/")
	;	PRINTFORMW 「かわいいプレゼントを貰っちゃった」
	;ELSEIF 評価点 >= 800
	;	PRINTFORMW 「とっても素敵なプレゼントを貰っちゃった」
	;ELSE
	;	PRINTFORMW 「素敵なプレゼントを貰っちゃった」
	;ENDIF
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日貰った贈り物をお気に入りにする（↑の大事にするから続き）（700点以上かつ最高得点）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 3
	;IF STRCOUNT(SENSE, "身につける/")
	;	PRINTFORMW 「明日からこれを付けて行こうっと」
	;ELSE
	;	PRINTFORMW 「明日からこれを持って行こうっと」
	;ENDIF
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日貰った贈り物をとりあえず保管する（400～699点）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 4
	;PRINTFORMW 「とりあえず飾っておこう」
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日貰った贈り物をこっそり質に入れる（400点未満）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 5
	;PRINTFORMW 「私これ嫌いなのよね～」
	RETURN 1
ENDIF
RETURN 1

;==================================================
;벌레배틀
;ムシバトルの口上は少し特殊で、PRINTを使うのではなく、
;台詞一行のみをRESULTSに入れてください
;ムシの名前は %MUSHI_NAME% で表示できます
;ムシの名前の最長はアレキサンドラトリバネアゲハの全角14文字です
;文字数制限があります。はみ出ないように気をつけてください
;ARGは残りムシ数か順位です
;==================================================
@M_KOJO_MESSAGE_COM_K99_MUSHI_BATTLE(ARGS, ARG)
#DIM 残りムシ数
#DIM 順位
SELECTCASE ARGS
CASE "試合前"
	;-------------------------------------------------
	;キャラセレクト時,ARGは使えません
	;全角50文字くらいまで
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「ぶっとばしてさしあげますわ！」
	ENDIF
CASE "戦場に出した"
	;-------------------------------------------------
	;"【（キャラ）】は《（ムシ）》を戦場に出した！」"の直後
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「%MUSHI_NAME%！キミにきめた！」
	ENDIF
CASE "攻撃時"
	;-------------------------------------------------
	;"【（キャラ）】《（ムシ）》の『（攻撃名）』！」"の直前
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「ぶっとばせ！%MUSHI_NAME%！」
	ENDIF
CASE "倒れた時"
	;-------------------------------------------------
	;"【（キャラ）】《（ムシ）》は倒れた！！"の直後
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「ああっ！私の%MUSHI_NAME%がっ！」
	ENDIF
CASE "敗退時"
	;-------------------------------------------------
	;"【（キャラ）】敗退！！"の直後
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「私のムシが全滅めつめつ……」
	ENDIF
CASE "タイマン：勝ち"
	;-------------------------------------------------
	;順位は1位
	;全角20文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「%CALLNAME:MASTER%よわーい！」
	ENDIF
CASE "タイマン：負け"
	;-------------------------------------------------
	;順位は2位
	;全角20文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「%CALLNAME:MASTER%つよーい！」
	ENDIF
CASE "バトルロイヤル：優勝"
	;-------------------------------------------------
	;順位は1位
	;全角30文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「やったー！」
	ENDIF
CASE "バトルロイヤル：２位以下"
	;-------------------------------------------------
	;順位は2～4位
	;全角30文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「くやし～！」
	ENDIF
CASE "チーム戦：勝ち"
	;-------------------------------------------------
	;順位は1位（やられていても）
	;全角32文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「私のおかげね！」
	ENDIF
CASE "チーム戦：負け"
	;-------------------------------------------------
	;順位は2位
	;全角32文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「味方が弱い！！」
	ENDIF
ENDSELECT
SIF RESULTS != ""
	RETURN 1

path: ERB/대사_메시지관련/개인대사/099 토요히메/M_KOJO_K99_イベント.ERB