code:
;-------------------------------------------------
; eraTheWorld 4.576용모코우말
;외관 쿨, 내면 아가씨
;초부실
;행간을 읽는 정도의 능력을 필요로 합니다
;……어째서 이 컨셉 부분소는 것인가?
;-------------------------------------------------
;다른 사람에 의한 수정, 가필, 개변에 대해서는, 동고의 라이센스 조항에 따라 주세요.

;------ 오려내기 개시 -----------
;eraTheWorld proto4. 07 패치 혼잡용 Ver1. 13
;템플릿의 사용법
;처음에 치환 커맨드 등에 의해 K61 를 K(캐릭터 No)로 변경해 주세요
;캐릭터 No는 CSV 폴더의 Chara 파일을 참조예(키리사메 마리사의 경우)：K61 =치환=> K11
;
;------ 오려내기 끝 -----------

;**** FlagManagement **********************************************************
;본말에서 사용하고 있는 CFLAG·TCVAR등
[SKIPSTART]
기초 분기
IF 함락상태() >= 4
ELSEIF 함락상태() == 3
ELSEIF 함락상태() == 2
ELSEIF 함락상태() == 1
ELSE
ENDIF
CFLAG:1610 bit0·멈춰서시의 만남 말억제용, bit1·욕실시의 등 흘려 주도권 판정, bit2~3·하늘, bit4 카운터의 노래의 FIRST 제어, bit5·더부살이시의 제어
CFLAG:1611 시간경험에 의한 First 타임 제어
CFLAG:1612 시간경험에 의한 First 타임 제어
CFLAG:1613 출산후 데일리 상처 시키고 관련
CFLAG:1614 카구야 탄막승부승리시 후포상
%MASTERNAME:61%
[SKIPEND]
;
;
;
;
;******************************************************************************

;### 말존재 판정 ###################################
@M_KOJO_K61(ARG)
;別人版を作成する際はこのテンプレではなく別人版用口上テンプレをご利用ください

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

;### 口上基本フラグ設定 #############################
@M_KOJO_FLAGSETTING_K61
;基本フラグ設定はここで行ってください
;共通の口上フラグは必要な箇所のコメントアウトを外してご利用ください
;口上専用フラグはご自由に
;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:X:恋慕 && !TALENT:X:セフレ
;	CFLAG:X:押し倒し禁止 = 1
;ELSE
;	CFLAG:X:押し倒し禁止 = 0
;ENDIF

;来訪不能に1を入れると、来訪してこなくなります
;以下は面識があるまで来訪してこなくなる使用例
;IF !CFLAG:X:面識
;	CFLAG:X:来訪不能 = 1
;ELSE
;	CFLAG:X:来訪不能 = 0
;ENDIF

IF CFLAG:61:수면 && !CFLAG:61:쇠약
	CFLAG:61:1614 = 0
ELSEIF CHARANUM >= 127 && TCVAR:62:탄막승부결과 == 1 && !CFLAG:61:1614 && CFLAG:61:현재위치 != CFLAG:62:현재위치
	SETBIT CFLAG:61:1614, 0
ENDIF

;### 구상색판정 ###################################
@M_KOJO_COLOR_K61
SETCOLOR 0xFF1493

;여기서 SETCOLOR 하는 것으로 말에 첨가할 수 있습니다
;예：SETCOLOR 0xC07070

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"UPDATE 판정"
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_UPDATE_K61
;말 독자적인 UPDATE용
;ENCOUNTER 전용에 독자 분기 플래그를 가르쳤을 경우등에 부디
;UPDATE 판정으로 CFLAG등의 캐릭터 변수를 사용하는 경우, 캐릭터 번호의 지정이 필요하게 됩니다
IF 함락상태() >= 4
	CFLAG:61:345 = 1
ELSE
	CFLAG:61:345 = 0
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"계 이벤트(엑스트라 구문)
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K61
;초대면, 인사의 타이밍
;TALENT의 변경은 여기서 부디.
;경험의 변경은 어긋남이 나오는 경우가 있기 때문에, CSV를 수정해 동고 하는 일을 추천 합니다
IF GET_MAPID(CFLAG:MASTER:현재위치) == MAIN_MAP && MAIN_MAP == 4
	PRINTFORML 「……최근 여기에 정착한 괴짜가 있다 라고 (들)물었지만, %CALLNAME:MASTER%의 일?」
	PRINTFORML 「아아, 나는 후지와라모코우, 여기에 옛날부터 살고 있는 괴짜야」
	PRINTFORML 「일부러 이런 곳에 정착할 정도로이니까, 그만한 능력은 있을까지만」
	PRINTFORML 「죽림에서는 그다지 돌아 다니지 않게. 그 나름대로 위험한 곳이니까 」
	PRINTFORML 「……사랑스럽다든가, 초대면의 상대에게 말하는 대사가 아니지요」
	PRINTFORML 「뭐, 별로 서로 관계가 되지 않는다고는 생각하는데」
	PRINTFORML 「기분이 내키면 의논 상대정도는 되어」
;죽림 이외의메인 맵으로 만났다
ELSEIF GET_MAPID(CFLAG:MASTER:현재위치) == MAIN_MAP && (MAIN_MAP != 4 && MAIN_MAP != 2)
	PRINTFORML 「……%GET_MAPNAME(MAIN_MAP)%에 일반인?」
	PRINTFORML 「아아, 나는 후지와라모코우, 미혹의 죽림에 산다, 일단 인간이야」
	PRINTFORML 「이상한 가슴 소란이 해 여기에 왔지만, 그 원인은 %CALLNAME:MASTER%일 것이다」
	PRINTFORMW 「……은, 갑자기 사랑스럽다든가 말해져도 곤란한데」
	PRINTFORML 「그다지 친하지도 않은 상대에게 들어도, 기쁘지도 별 일 없기도 하고」
	PRINTFORML 「나와 사이좋게 지내고 싶어?　(은)는은, 여기에 살고 있다면, 나보다 좋은 사람은 많이 있을 것이다에」
	PRINTFORML 「뭐 , 오늘은 우들여기에 왔지만, 기본적으로 여기에 올 생각은 없으니까」
	PRINTFORMW 「아무래도 이야기를 하고 싶다고 한다면, 죽림나 마을에 발길을 옮기는 것이군」
;메인 맵이 죽림 이외 한편, 죽림에서 만났다
ELSEIF GET_MAPID(CFLAG:MASTER:현재위치) == 4
	PRINTFORML 「이런 죽림에, 일반인이 오는 것이 아니야」
	PRINTFORML 「이봐, 마을까지 보내 줄 테니까……, 는, 무엇인가 이상한 방법이 걸려 있구나」
	IF MAIN_MAP == 0
		PRINTFORML 「하쿠레이 신사에 살고 있어?　그 무녀에 주워졌어?」
	ELSE
		PRINTFORML 「몸을 지킬 방법은 몸에 익히고 있어?」
	ENDIF
	PRINTFORMW 「뭐, 그렇다면 걱정은 필요하지 않을지도 모르지만, 그렇지만 이 근처는 위험하니까」
	PRINTFORML 「이름도 없게 모습도 정해지지 않은 요괴 무리에게 식 깨져도 몰라요」
	PRINTFORML 「응?　아, 나는 후지와라모코우. 이 죽림에 살고 있었지만」
	PRINTFORML 「…………그런데 말이야, 초대면 상대에게 갑자기 사랑스럽다든가 말해지면(자) 정직 당기는데」
	PRINTFORMW 「이봐, 이 근처는 정말로 위험하기 때문에 빨리 돌아가」
	PRINTFORML 「……은, 나라고 이야기같은 것을 해도 재미있지도 별 일 없지만」
	PRINTFORMW 「그렇지만 뭐, 아무래도라고 말한다면, 의논 상대가 될 정도로라면 상관없어요」
;죽림 이외로 만났다
ELSEIF GET_MAPID(CFLAG:MASTER:현재위치) != 4
	PRINTFORML 「……에 또, 무슨 용무?」
	PRINTFORML 「나를 봐 당황하는 인간은 많지만, 그런 식으로 계속 가만히 봐 오는 사람은 없기 때문에 신경이 쓰여」
	PRINTFORML 「사랑스러워?　……헌팅이라면 거절이지만」
	PRINTFORM 「%GET_MAPNAME(MAIN_MAP)%의
	SELECTCASE GET_MAPID(MAIN_MAP)
		CASE 0,2,3
			PRINTFORML 식객?　흐응, 저기도 이상해요를 줍는 것이구나」
		CASEELSE
			PRINTFORML 거주자?　흐응, 이런 곳에 오다니  수고한 일이구나」
	ENDSELECT
	PRINTFORML 「아, 나는, 후지와라모코우. 평상시는 죽림에 있지만, 가끔 여기에 오는 용무가 있어」
	PRINTFORML 「……뭐, 이따금 의논 상대가 될 정도로라면 상관없는데」
	PRINTFORML 「나에게 상관하고 싶어하다니 이상한 인간이 있는 것이다」
ENDIF
PRINTL
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"계 이벤트
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;데이트 오는 길에 First KISS(합의도 붙는다)
;==================================================
@M_KOJO_SPEVENT_K61_1(ARG, ARG:1)
;말 주인은 TARGET
IF MARK:반발각인
	TCVAR:키스캔슬 = 1
	RETURN 1
ENDIF
;지문 표시
CALL SPEVENT_MESSAGE_1(ARG, ARG:1)
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	PRINTFORML 「…………마음대로 이런 금년이라고 미안해」
	PRINTFORML 「나에게는, 이런 일은 어울리지 않지요」
	PRINTFORML 「……%CALLNAME:MASTER%도 결국은 나를 두어, 떠나 가는데」
	PRINTFORML 「그렇지만, 그저 한때라도 좋다. 나는 %CALLNAME:MASTER%에 생각을 걸어 버렸기 때문에」
	PRINTFORML 「그러니까 , 그러니까……, 응」
	PRINTFORML 「고마워요……, 그쪽으로부터도 해 주어, 기쁜…………어, 어라?」
	PRINTFORML 「기쁜, 의에,……구……어째서,……눈물이」
	PRINTFORML
	PRINTFORML
	;키스를 캔슬하고 싶은 경우는 이하를 개방
	;TCVAR:키스캔슬 = 1
ENDIF
RETURN 1

;==================================================
;데이트 오는 길에 고백(연인이 붙는다)
;==================================================
@M_KOJO_SPEVENT_K61_2(ARG, ARG:1)
;말 주인은 TARGET
;지문 표시
CALL SPEVENT_MESSAGE_2(ARG, ARG:1)
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;고백 내용
	;이 고백 내용 표시 후에 받을지 어떨지의 선택분이 표시됩니다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		PRINTFORML 「나는, 쭉 한사람이었다」
		PRINTFORML 「아버님이 어머님의 바탕으로 오지 않게 되어, 어머님이 죽었을 때조차 문장조차 넘기지 않아서」
		PRINTFORML 「……끝에, 나와 그다지 년도 떨어지지 않은 외형의, 저녀석에게 넣고 있다고(면) (들)물으며」
		PRINTFORML 「나는 한사람이 되었다」
		PRINTFORML 「봉래의 약을 손에 넣기 위해서(때문에) 악랄한 일도 했고, 손에 넣은 뒤는 사람을 기피 했다」
		PRINTFORML 「카구야와 재회해, 서로 죽이는 것으로 , 살아있는 일로 실감을 가질 수 있게 되었지만」
		PRINTFORML 「그런데도, 사람과 깊게 접촉하는 것은 무서웠다」
		PRINTFORML 「……그렇지만, 그렇지만, 지금은 %마스터와% 접촉할 수 있는 것이 기뻐」
		PRINTFORML 「%CALLNAME:MASTER%의 근처에서 웃을 수 있는 것이 기뻐」
		PRINTFORML 「나는 %마스터를% 전송할 수밖에, 간호할 수밖에 할 수 없다」
		PRINTFORML 「그런데도, %CALLNAME:MASTER%라고 사랑하는 사이가 되고 싶다. %마스터를% 독점하고 싶다」
		PRINTFORML 「……나를, 연인으로 해, 주어?」
		PRINTFORML
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;고백 OK(연인이 붙는다)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「……정말로, 좋은거야?　……고마워요」
		PRINTFORML 「%CALLNAME:MASTER%도 나에게 말하고 싶은 것이 있다 라는?」
		PRINTFORML 「시간을, 멈추어?」
		SIF EXP:60 || EXP:61 || EXP:62 || EXP:63
			PRINTFORML 「가끔 느끼고 있었던 위화감은, 그래서야」
		PRINTFORML 「어째서, 그 일을 일부러 입에?」
		PRINTFORML 「……그렇네요, 연인에 비밀사항은 하고 싶지 않고, 하기를 바라지 않다」
		PRINTFORML 「다만 1개(살)만 부탁해도 좋을까」
		PRINTFORML 「그 힘으로 나를 만지작거리는 것도 상관없고, 다른 여자에게 손을 내지 말라고도 말하지 않는다」
		PRINTFORMW 「그렇지만, 시간을 멈추지 않을 때는, 분명하게 나의 일을 사랑하면 좋겠다」
		PRINTFORML 「네?　연인이고, 특별한 부르는 법을 해 주었으면 해?」
		PRINTFORML 「……, 부, 부끄럽지만, %마스터가% 바란다면」
		PRINTFORMW 「그래서 , (이)라고 부르면?」
		PRINTL
		PRINTL [0] 「주인(서방)님」
		PRINTL [1] 「주인님」
		PRINTL [2] 「자네님」
		PRINTL [3] 「부군」
		IF GETBIT(TALENT:MASTER:성별, 1)
			PRINTFORML [4] 「형(형) 님」
		ELSE
			PRINTFORML [4] 「자(언니(누나)) 님」
		ENDIF
		PRINTL [5] 「역시 그대로」
		$INPUT_NAMELOOP
		INPUT
		SELECTCASE RESULT
			CASE 0
				MASTERNAME:61 = 주인(서방)님
				PRINTFORML 「%MASTERNAME:61%인가……, 이래서야 마치 부부지요」
			CASE 1
				MASTERNAME:61 = 주인님
				PRINTFORML 「%MASTERNAME:61%?　메이드 플레이에서도 소망이야?」
			CASE 2
				MASTERNAME:61 = 자네님
				PRINTFORML 「%MASTERNAME:61%?　이상한 말이지만, 이것은 이것대로 좋을지도」
			CASE 3
				MASTERNAME:61 = 부군
				PRINTFORML 「%MASTERNAME:61%인가……, 설마 그렇게 말할 수 있는 상대가 생기다니」
			CASE 4
				IF GETBIT(TALENT:MASTER:성별, 1)
					MASTERNAME:61 = 오라버니
				ELSE
					MASTERNAME:61 = 누님(언니)
				ENDIF
				PRINTFORML 「%MASTERNAME:61%?　그런 식으로 부르게 하고 싶다고, 시스콘?」
			CASE 5
				MASTERNAME:61 = %CALLNAME:MASTER%
				PRINTFORML 「%MASTERNAME:61%는, 특별한 부르는 법을 갖고 싶었던 는?」
				PRINTFORML 「……그, 그렇네, 너무 특별해도 부끄럽다」
			CASEELSE
				GOTO INPUT_NAMELOOP
		ENDSELECT
		PRINTFORML 「그러면, 재차, 앞으로도 잘 부탁드립니다」
		PRINTFORMW
		CFLAG:345 = 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;고백 실패
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「그렇네요. 나 같은 것보다 멋진 사람이, %CALLNAME:MASTER%의 주위에는 많이 있고」
		PRINTFORML 「좋아, 그렇게 염려하다 충분하고 하지 않아도」
		PRINTFORML 「사람의 마음은 누구에게도 묶을 수 없는, 자기 자신에게조차 묶을 수가 없다 것」
		PRINTFORML 「누구보다도 내가 제일 잘 알고 있는 일이니까」
		PRINTFORML 「……후후, 어쩔 수 없는 것이구나. ……울고 있었던 건, 구」
		PRINTFORML 「……쿠웃……………………」
		PRINTFORML 「그런, 구……쉽고,……아……하지 말아줘 …………」
		PRINTFORML
		RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;데이트 돌아오는 길
;==================================================
@M_KOJO_SPEVENT_K61_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 함락상태() >= 4
			PRINTFORML 「연인과 시간을 보내는 것이 즐겁다니, 생각할 수도 없었어요」
			PRINTFORML 「후훗, 정말 좋아해요, %MASTERNAME:61%. 라고, 어째서 거기서 부끄러워할까」
			PRINTFORML 「두고 갈 수 있다면, 적어도 자신의 기분에 솔직해 있고 싶은 것뿐이니까 」
		ELSEIF 함락상태() == 3
			PRINTFORML 「오늘도  고마워, %마스터와% 함께 있어지는 시간은 정말로 즐겁다」
			PRINTFORML 「그렇지만, 눈 깜짝할 사이에 지나가 버려 버리는 것이 조금 아까운데」
		ELSEIF 함락상태() == 2
			PRINTFORML 「즐거웠어요, 후후, 이것은 답례……쭙」
		ELSEIF 함락상태() == 1
			PRINTFORML 「응, 이렇게 말하는 것도 가끔씩은 좋다」
		ELSE
			PRINTFORML 「……내 같은 것 불러, 즐거웠어?」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;반발각인 소거 이벤트
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「하아, 반성하고 있는 같고, 용서(허락)해 주어도 좋은가」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;반발각인 2>1 레벨 다운 이벤트
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「완전히, 이런 일로 허락했다라고 생각하지 말아 」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;반발각인 3>2 레벨 다운 이벤트
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「……해 좋은 일과 나쁜 일의 구별 정도 분명하게 붙여 두세요, 정말로 이제(벌써)」
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"계 이벤트
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;방에서 만남
;==================================================
@M_KOJO_EVENT_K61_1(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
IF GETBIT (CFLAG:1610, 0)
	LOCAL = 0
	CLEARBIT CFLAG:1610, 0
ENDIF
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;MASTER가 들어 왔다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF GETBIT(CFLAG:61:1614, 0) && !GETBIT(CFLAG:61:1614, 1)
			PRINTFORML 「카구야에 이겼다고?　나도 보고 싶었는데」
			PRINTFORML 「뭐, 뭐는 여하튼」
			SETBIT CFLAG:61:1614, 1
		ENDIF
		IF 함락상태() >= 4
			PRINTFORML 「오세요,%MASTERNAME:61%」
			PRINTFORML 「너무 가깝지 않는가  는?　사랑하는 너의 곁에 접근하는 것은 당연한 일이지요」
			PRINTFORML 「쭙, 이것으로 좋아?　좋으면, 머리 쓰다듬고 있고 가지고 싶다」
		ELSEIF 함락상태() == 3
			PRINTFORML 「응, 하는 것은 알고 있지?」
			PRINTFORML 「응……, 타인의 체온은 굉장히 안심하는군」
		ELSEIF 함락상태() == 2
			PRINTFORML 「아아, 오세요. 자, 무엇을 해볼까」
		ELSEIF 함락상태() == 1
			PRINTFORML 「자주(잘) 왔군요, 한가하면 이야기라도 할까」
		ELSE
			PRINTFORML 「아아, %CALLNAME:MASTER%인가. 아무래도」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGET가 들어 왔다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF GETBIT(CFLAG:61:1614, 0) && !GETBIT(CFLAG:61:1614, 1)
			PRINTFORML 「카구야에 이겼다고?　나도 보고 싶었는데」
			PRINTFORML 「뭐, 뭐는 여하튼」
			SETBIT CFLAG:61:1614, 1
		ENDIF
		IF 함락상태() >= 4
			PRINTFORML 「%MASTERNAME:61%, 여기에 오며」
			PRINTFORML 「쭙, 쭙……응, 맛있는, 잘 먹었어요」
			PRINTFORML 「%MASTERNAME:61%의 얼굴을 보면(자) 자제 할 수 없게 되었다 것」
		ELSEIF 함락상태() == 3
			PRINTFORML 「아, %CALLNAME:MASTER%. ……꽉」
			PRINTFORML 「괴로워?　상관 없지 않아, 달라붙을 정도」
		ELSEIF 함락상태() == 2
			PRINTFORML 「덮치기 싶어?　밀어넘어뜨려지고 싶어?　나는 어디라도 좋아」
		ELSEIF 함락상태() == 1
			PRINTFORML 「아, 꼭%CALLNAME:MASTER%에 몇개 숲이었던 거예요」
		ELSE
			PRINTFORML 「아, 응, 아무쪼록」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGET가 목욕해 와 함께 들어간다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF 함락상태() >= 4
			PRINTFORML 「아, %MASTERNAME:61%……, 우후후, 그렇게 볼 수 있는 것, 굉장히 기뻐」
			PRINTFORML 「어차피라면, 이대로 씻어 넘고 싶다」
			PRINTFORML 「그 후도, 군요?」
		ELSEIF 함락상태() == 3
			PRINTFORML 「응, 이렇게 서로의 전라를 서로 보이는 것 는 좋지요」
			PRINTFORML 「촉감 금지 , (이)라고. 그렇게 되면(자)%CALLNAME:MASTER%에는 괴롭겠지만」
		ENDIF
		IF GETBIT(CFLAG:61:1614, 0) && !GETBIT(CFLAG:61:1614, 1)
			PRINTFORML 「그런데, 카구야에 이겼다고 들었지만,사실?」
			PRINTFORML 「헤에, 진짜야. 뭐는 여하튼, 수고하셨어요」
			SETBIT CFLAG:61:1614, 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGET가 목욕해 와 나와 갔다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		IF 함락상태() == 2
			PRINTFORML 「……아, 조금 미도리만이니까, 또 다음에」
		ELSEIF 함락상태() == 1
			PRINTFORML 「!　아, 미, 미안, 곧 나가기 때문에」
		ELSE
			PRINTFORML 「……」
		ENDIF
		IF GETBIT(CFLAG:61:1614, 0) && !GETBIT(CFLAG:61:1614, 1)
			PRINTFORML 「아, 1개(살) (듣)묻고 싶지만, 카구야에 이겨도사실?」
			PRINTFORML 「자주(잘) 이길 수 있었군요」
			SETBIT CFLAG:61:1614, 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGET가 목욕해 와 내쫓아졌다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF 함락상태() == 2
			PRINTFORML 「%CALLNAME:MASTER%에 대해서 싫지 않지만, 나가있어 줘 군요?」
		ELSEIF 함락상태() == 1
			PRINTFORML 「……응, 미안. 혼자서 들어가고 싶으니까」
		ELSE
			PRINTFORML 「……나가있어 줘 일까」
		ENDIF
		IF GETBIT(CFLAG:61:1614, 0) && !GETBIT(CFLAG:61:1614, 1)
			PRINTFORML 「……카구야에 이긴 것은 대단하다고 생각하지만, 이군요」
			SETBIT CFLAG:61:1614, 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;외출처에서 조우했다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		IF 함락상태() >= 4
			PRINTFORML 「%MASTERNAME:61%, 혼자서 나가는 것은 위험하다고」
			PRINTFORML 「……그렇다면, 나라도%MASTERNAME:61%과 만나고 싶지만」
			PRINTFORML 「너무 걱정시키지 않고 가지고 싶은데」
		ELSEIF 함락상태() == 3
			PRINTFORML 「아, %CALLNAME:MASTER%. 일부러 와 주었어?」
			PRINTFORML 「만나러 와 주었어?　그것은 기쁘지만, 이 근처는 위험하기 때문에」
		ELSEIF 함락상태() == 2
			PRINTFORML 「일부러 와 주었다?　위험한 것은 하지 않고 가지고 싶지만, 기쁜데」
		ELSEIF 함락상태() == 1
			PRINTFORML 「혼자서 이런 옆까지 와본 것은 위험해요」
		ELSE
			PRINTFORML 「위험하다고 말해 」
		ENDIF
		IF GETBIT(CFLAG:61:1614, 0) && !GETBIT(CFLAG:61:1614, 1)
			PRINTFORML 「……아, 맞아 맞아, 카구야에 이겼다고?」
			PRINTFORML 「그것만큼은 칭찬해 줄게」
			SETBIT CFLAG:61:1614, 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;타캐릭터와 데이트중에 조우했다
	;ARG:1에 데이트상대
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		IF ARG:1 == 62
			IF GETBIT(CFLAG:61:1614, 0) && !GETBIT(CFLAG:61:1614, 1)
				PRINTFORML 「……흐응, 싸움에 진 개」
				HTML_PRINT "「시끄럽네요」"
				PRINTFORML 「탄막 놀이로 진 끝에에 데리고 돌아다녀져, 망신이라고 즐겁다」
				HTML_PRINT "「저것은, 우연히……」"
				PRINTFORML 「예, 예, 싸움에 진 개의 원 짖고는 상당히」
				SETBIT CFLAG:61:1614, 1
			ELSE
				PRINTFORML 「……그런 성악 묻고 싶다니, 머리 괜찮아?」
				HTML_PRINT "「당신에 따르는 들어야 하는 이유는 없네요」"
				PRINTFORML 「……흥 , 오늘은 놓쳐 줄게」
				HTML_PRINT "「그것은 이쪽의 대사」"
				PRINTFORMDL 「후후, 후후후 후후후」
			ENDIF
		ELSEIF 함락상태() >= 4
			PRINTFORML 「헤에, 다른 사람과 데이트?　좋은 신분이구나」
			PRINTFORML 「연인 그냥 둬, 첩(나)씨라고 있으면 다하고 싶다?」
			PRINTFORML 「뭐, 마음대로 하면 좋아. 내가 제일이라고 일로 변화는 없기도 하고」
		ELSEIF 함락상태() == 3
			PRINTFORML 「흐응, %CALLNAME:MASTER%도 좋아하구나」
			PRINTFORML 「……뭐, 좋아, 마음대로 하면」
		ELSEIF 함락상태() == 2
			PRINTFORML 「호색한은, %마스터를% 위한 말이구나, 나 만이라면 전혀 부족하다?」
		ELSEIF 함락상태() == 1
			PRINTFORML 「아, 다른 아이와 함께야. 사이가 좋고 좋다」
		ELSE
			PRINTFORML 「데이트중이야 저기, 방해 하면 나쁜가」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;아침에 일어 났을 때(안녕 말)
;==================================================
@M_KOJO_EVENT_K61_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 !RAND:2
				IF 함락상태() >= 4
					PRINTFORML 「안녕,%MASTERNAME:61%」
					PRINTFORML 「사랑스러운 잠자는 얼굴이구나. 좀 더 보고 있었으니까일지도」
					PRINTFORML 「아하하, 어째서 수줍을까. 좀 더 사랑스러운 얼굴도 봐 」
				ELSEIF 함락상태() == 3
					PRINTFORML 「안녕, %CALLNAME:MASTER%」
					PRINTFORML 「기분 좋음 그렇게 자고 있어」
				ENDIF
			ELSE
				IF 함락상태() >= 4
					PRINTFORML 「안녕,%MASTERNAME:61%」
					PRINTFORML 「후후, 사랑스러운 잠자는 얼굴이었다. 좀 더 보고 있었으니까」
					PRINTFORML 「부끄러워 있고?　후후, 언제나 나의 부끄러워 실무렵을 보고 있기 때문에 피차일반」
				ELSEIF 함락상태() == 3
					PRINTFORML 「안녕, %CALLNAME:MASTER%」
					PRINTFORML 「후후, 이런 것도 좋은 걸이구나」
				ENDIF
			ENDIF
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER 방에 TARGET가 들어 오고 있다(연모 없음에서도 들어 올 가능성 있어
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF 함락상태() >= 4
				PRINTFORML 「안녕,%MASTERNAME:61%」
				PRINTFORML 「그렇지만, 이런 간단하게 타인이 들어갈 수 있는 것 같은 것은 어떨까라고 생각해?」
				PRINTFORML 「아무리 때를 제지당해도, 자고 있는 한중간에는 무리이겠지」
			ELSEIF 함락상태() == 3
				PRINTFORML 「안녕, %CALLNAME:MASTER%」
				PRINTFORML 「변함없이 좋은 잠자는 얼굴이지요. ……바보 취급하고 있는 것이 아니어서, 칭찬하고 있었지만」
			ELSEIF 함락상태() == 2
				PRINTFORML 「안녕%CALLNAME:MASTER%,……후후, 아침부터 시타 있고?　나는 좋아」
			ELSEIF 함락상태() == 1
				PRINTFORML 「안녕%CALLNAME:MASTER%, 문단속 정도는 제대로 하지 않으면 안돼요」
			ELSE
				PRINTFORML 「안녕」
			ENDIF
			PRINTFORMW
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;동거(同棲) 한편 상대가 일어나고 있다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF 함락상태() >= 4
			PRINTFORML 「우후후, 안녕,%MASTERNAME:61%」
			PRINTFORML 「사랑스러운 얼굴 하고 있구나. 정말 아무리 봐도 보고 질리지 않는다」
			PRINTFORML 「……이제, 나쁜 의미가 아니고, 좋은 의미로 말하고 있었지만」
		ELSEIF 함락상태() == 3
			PRINTFORML 「안녕, %CALLNAME:MASTER%」
			PRINTFORML 「이봐, 몸치장 정돈해,\@ TALENT:MASTER:성별 == 2 ?  모습 있고 # 카이 \@실무렵 보이며」
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;동거(同棲) 한편 상대가 자고 있다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF 함락상태() >= 4
			PRINTFORML 「……응……이나……있고 ……, 나……」
			PRINTFORML 「응……―……―, 에헤헤……%MASTERNAME:61%좋아」
			PRINTFORML 「손………………라고…………에헤헤……」
		ELSEIF 함락상태() == 3
			PRINTFORML 「구―……―……용서해……라고…………」
			PRINTFORML 「……응,……, 해……라고 줘……의?」
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTER가 일어나고 있어, 상대가 일어났다
	;동침 때 TARGET 기상은 이쪽(TARGET 쇠약 or 동침중TARGET 피곤함 패배 후 그대로 MASTER가 계속 일어난 다음 상대가 기상했을 경우 한정
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;-------------------------------------------------
		;비동거(同棲)
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			IF 함락상태() >= 4
				PRINTFORML 「…………안녕,%MASTERNAME:61%」
				PRINTFORML 「……연인이고, 불만은 말할 생각은 없는데」
				PRINTFORML 「쭉 잠자는 얼굴 볼 수 있고 있었던이라고 생각하면(자), 부끄러워 있고」
			ELSEIF 함락상태() == 3
				PRINTFORML 「……안녕, %CALLNAME:MASTER%」
				PRINTFORML 「어째서, 마음대로 집에 비집고 들어가 오고 있을까」
			ENDIF
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;동거(同棲) 안
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF 함락상태() >= 4
				PRINTFORML 「……안녕,%MASTERNAME:61%」
				PRINTFORML 「아아, 눈이 깨었을 때에, 사랑하는 네가 있다니는 멋진 응일 것이다」
				PRINTFORML 「……너무 행복해, 조금 무섭다」
			ELSE
				PRINTFORML 「……%CALLNAME:MASTER%, 안녕」
				PRINTFORML 「일어났을 때에 본적이 있던 얼굴이 곧 곁에 있다 라고, 어쩐지 낯간지럽다」
			ENDIF
			PRINTFORMW
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;밤에 잘 때(휴업(휴가) 말)
;==================================================
@M_KOJO_EVENT_K61_3(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;자기 방에 돌아간다(정시가 되어 잔다)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:MASTER:현재위치 != CFLAG:311
			IF CFLAG:MASTER:311 != CFLAG:311
				IF 함락상태() >= 4
					PRINTFORML 「그러면, 나는 이제 자신의 방에 돌아가요」
					PRINTFORML 「사실은 같은 방에서 자고 일어나기 하고 싶지만」
					PRINTFORML 「기분이 바뀌면(자), 나는 언제라도 좋아. 잘자, %MASTERNAME:61%. 쭙」
				ELSE
					PRINTFORML 「휴업(휴가), %CALLNAME:MASTER%」
					PRINTFORML 「아, 이것을 잊는 곳(중)이었다. 쭙」
				ENDIF
			ELSE
				IF 함락상태() >= 4
					PRINTFORML 「그러면, 나는 먼저 돌아가지만, 빨리 돌아왔으면 좋다」
					PRINTFORML 「후후,%MASTERNAME:61%가 있으면(자), 가슴이 두근 두근 해 잘 수 없게 될 것 같지만」
					PRINTFORML 「잘자, %MASTERNAME:61%」
				ELSE
					PRINTFORML 「나는 먼저 돌아가기 때문에」
					PRINTFORML 「%CALLNAME:MASTER%도 빨리 돌아와야 해」
				ENDIF
			ENDIF
		ELSEIF CFLAG:MASTER:현재위치 == CFLAG:311
			IF 함락상태() >= 4
				PRINTFORML 「안녕히 주무세요」
				PRINTFORML 「누울 때,%MASTERNAME:61%가 있어 주어, 굉장히 기뻐」
				PRINTFORML 「쭙 , 그러니까, 이것은 답례」
			ELSE
				PRINTFORML 「휴업(휴가)%CALLNAME:MASTER%」
				PRINTFORML 「이전에는 이렇게 해 눕는 일도 없었지만 저기, 쭙」
			ENDIF
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;졸린 듯이 하고 있다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF 함락상태() >= 4
			PRINTFORML 「후아……응,%MASTERNAME:61%로 말하는 것도 즐거운, 하지만, 재우면 좋겠다」
		ELSEIF 함락상태() == 3
			PRINTFORML 「응……, 미안하지만 재워 주지 않을까」
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;수면중(일어나지 않기 때문에 회화 라기 보다는 잠꼬대? )
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF CFLAG:동침중
			PRINTDATA
				DATAFORM 「……,\@ 함락상태() >= 4 ?  %MASTERNAME:61% # %CALLNAME:MASTER% \@…………좋아……」
				DATAFORM 「……가는거야……있고…………로……」
				DATAFORM 「……은……인……으로……」
				DATAFORM 「……산등성이……가 있고…………하는거야……」
				DATAFORM 「응……―……구―…………」
				DATAFORM 「구―……―……안 돼……구―……좀 더 ……」
			ENDDATA
		ELSE
			PRINTDATA
				DATAFORM 「……,……해,………………」
				DATAFORM 「…………네…………째……」
				DATAFORM 「……오지 않는……으로, 안, 돼……이런……」
				DATAFORM 「……보지 않는, 그리고……틀 려…………인간이야……」
				DATAFORM 「 째……응인……차이…………째……」
				DATAFORM 「……위……어떻게……해……」
			ENDDATA
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;쇠약중(연모 첨부 거점내 캐릭터가 MAIN_MAP로 쇠약 상태가 되었을 경우인가, 초대방에서 상대가 쇠약했을 경우에 발생
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF 함락상태() >= 4
			PRINTFORML 「……미안……없음 있고, 이제 무리……」
			PRINTFORML 「%MASTERNAME:61%에, 보냈으면……좋겠다……」
			PRINTFORML 「고마워,……후후, 안기다 되는 것……희, 해……있고……윽 새근……」
		ELSEIF 함락상태() == 3
			PRINTFORML 「……후아……이제, 무리……」
			PRINTFORML 「보내……주는,……이군요?　……고마워……」
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTER가 다운(방까지 옮겨진다)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		IF 함락상태() >= 4
			PRINTFORML 「이제(벌써) 무리?　……응……, 조금 힘든데」
			PRINTFORML 「안심해, 분명하게, 방까지, 보내며」
			PRINTFORML 「후우 후우……, 괘, 괜찮아, 그러니까, 가만히 있으며」
		ELSEIF 함락상태() == 3
			PRINTFORML 「적어도……, 자신의 다리로 걸으며……」
			PRINTFORML 「하아, 하아……, 힘들다」
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGET가 자기 방까지 돌아왔다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;그대로 갈아입어 잤다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			IF 함락상태() >= 4
				PRINTFORML 「……응, 후후……,%MASTERNAME:61%나 함께 자?」
				PRINTFORML 「과시해 비치는 , 하지만 말이야」
				PRINTFORML 「그러면, 휴업(휴가)」
			ELSEIF 함락상태() == 3
				PRINTFORML 「후아……, 어째서, 이쪽에 있는 , 일까」
				PRINTFORML 「그러면, 휴업(휴가)……」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;방으로부터내쫒아졌다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF 함락상태() == 2
				PRINTFORML 「오늘은 그러한 기분이 아닌 것, 돌아가 줄까」
			ELSEIF 함락상태() == 1
				PRINTFORML 「……마음대로 입등 없고 주어?」
			ELSE
				PRINTFORML 「…………나가있어」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;타캐릭터와의 H를 멈추게 해 잤다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			IF 함락상태() >= 4
				PRINTFORML 「…………그런데 말이야,%MASTERNAME:61%」
				PRINTFORML 「일부러 내 방에서 다른 사람과 H는 하지 말아 주겠어?」
				PRINTFORML 「……그러면, 나는 자지만, 적당히 하지 않는다고 화내니까요」
			ELSEIF 함락상태() == 3
				PRINTFORML 「……방해,……불쾌한 것 같이  보여버리고 없어, 기분이 안좋아」
				PRINTFORML 「일부러 타인의 이쪽으로 H같은 것을 하지 마」
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;비거주 TARGET가 MAIN_MAP로 휴식
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		IF 함락상태() >= 4
			PRINTFORML 「쉬게 해 준다, 고마워요%MASTERNAME:61%」
			PRINTFORML 「……그렇지만, 여기까지, H인 일 하는 것도 아무쪼록이라고 생각한다」
			PRINTFORML 「후후, 농담이야. %MASTERNAME:61%과 H 하는 것도 좋아하기 때문에」
		ELSEIF 함락상태() == 3
			PRINTFORML 「응……, 그러면, %마스터가% 호의를 받아들이는군」
			PRINTFORML 「다른 사람에게 폐일지도 모르지만」
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;전의 턴으로부터 함께의 방에 있는 상태로 상대가 잔다(초대방 포함한다(
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		IF 함락상태() >= 4
			PRINTFORML 「이제(벌써), 한계…………」
			PRINTFORML 「%MASTERNAME:61%……, 곁에……있으며……」
			PRINTFORML 「, 보고…………구-―」
		ELSEIF 함락상태() == 3
			PRINTFORML 「…………, 이런, 먹……」
			PRINTFORML 「……―…………―」
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;이동시 엇갈림
;==================================================
@M_KOJO_EVENT_K61_4(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;멈춰 섰다
	;이 후 만남 말에 접속(이 말에서는 접속시키지 않다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF 함락상태() >= 4
			PRINTFORML 「저것, %MASTERNAME:61%, 용무가 있었지?」
			PRINTFORML 「……후후, 내 쪽이 소중하다니 말해, 다음에 혼나지 않아?」
			PRINTFORML 「그렇지만, 기쁘다. 고마워요%MASTERNAME:61%」
		ELSEIF 함락상태() == 3
			PRINTFORML 「아, %CALLNAME:MASTER%. 일부러 멈춰 서지 않아도」
			PRINTFORML 「네?　나와 이야기를 하고 싶어?　고마워요, 기뻐」
		ELSEIF 함락상태() == 2
			PRINTFORML 「일부러 멈춰 선다 라고, 무엇이 하고 싶은 것인지?」
		ELSEIF 함락상태() == 1
			PRINTFORML 「응, 무슨 용무?　교제해 주어도 좋은데」
		ELSE
			PRINTFORML 「……응?　용무?」
		ENDIF
		PRINTFORML
		SETBIT CFLAG:1610, 0
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;가볍게 인사 해 통과했다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF 함락상태() >= 4
			PRINTFORML 「%MASTERNAME:61%, 어디에 가는 거야?」
			PRINTFORML 「헤에, 그것은 연인을 두고 가는 만큼 대사?」
			PRINTFORML 「후후, 단순한 농담. %MASTERNAME:61%의 방해를 할 생각은 없으니까」
		ELSEIF 함락상태() == 3
			PRINTFORML 「다녀오세요, %CALLNAME:MASTER%」
			PRINTFORML 「나중에 분명하게 벌충 젓가락이라고 받지만요」
		ELSEIF 함락상태() == 2
			PRINTFORML 「네?　해도 가지 않은 것, 아깝다」
		ELSEIF 함락상태() == 1
			PRINTFORML 「아……, 수고 하셨습니다, 조심해」
		ELSE
			PRINTFORML 「응, 수고 하셨습니다」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;무시해 통과했다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF 함락상태() >= 4
			PRINTFORML 「연인 무시해서까지 가지 않으면 안 된다?」
			PRINTFORML 「이번에는 내가 무시해도 좋지요」
			PRINTFORML 「……이라니」
		ELSEIF 함락상태() == 3
			PRINTFORML 「조금, %CALLNAME:MASTER%」
			PRINTFORML 「……나, 화나게 하는 것 같은 일, 했는지」
		ELSEIF 함락상태() == 2
			PRINTFORML 「―, 시타 있고 시타구 없는 이전에 무시되는 것은무슨 화가 난다」
		ELSEIF 함락상태() == 1
			PRINTFORML 「아……, 나에게는 흥미없는, 인가」
		ELSE
			PRINTFORML 「……흐응」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;다른 사람 개입으로 무드 변화
;==================================================
@M_KOJO_EVENT_K61_5(ARG, ARG:1)
;말 주인은 TARGET
;ARG에 들어 온 캐릭터(인원수가 방대해서, 자기 파악 자기책임으로
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;카구야가 들어 왔다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 62
		IF 함락상태() >= 4
			PRINTFORML 「후후,%MASTERNAME:61%과 있어지는 것은 정말 수려」
			PRINTFORML 「쉿 해, 저쪽 가라. 그러니까, 여기 오지 말아라」
			PRINTFORML 「……쳇, 카구야, 다음에 기억해라」
		ELSEIF 함락상태() == 3
			PRINTFORML 「%CALLNAME:MASTER%, 좀 더, 는 카구야」
			PRINTFORML 「……시끄러워,  여기 온데 바보」
		ELSEIF 함락상태() == 2
			PRINTFORML 「응, 다음은 나니조첼악懈㎕?─? , 카구야」
		ELSEIF 함락상태() == 1
			PRINTFORML 「하아……, 카구야, 방해」
		ELSE
			PRINTFORML 「카구야인가……」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;케이네이 들어 왔다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 67
		IF 함락상태() >= 4
			PRINTFORML 「후후,%MASTERNAME:61%과 있어지는 것은 정말 수려」
			PRINTFORML 「아, , 케이네. 네, 에 또, 그……」
			PRINTFORML 「……그 저기, 여, 연인 같은 종류이니까, 그렇지만, 그」
		ELSEIF 함락상태() == 3
			PRINTFORML 「%마스터와% 있을 수 있는 것은, 멋지지……, 아, 케이네」
			PRINTFORML 「아, 아니, 그, 응……」
		ELSEIF 함락상태() == 2
			PRINTFORML 「좀 더, 좋은 금년 같아요, , 케이네」
			PRINTFORML 「……에 또, 그 사양하는 것 같은 표정, 그만두라니까」
		ELSEIF 함락상태() == 1
			PRINTFORML 「케이네, 아, 그」
		ELSE
			PRINTFORML 「아, 케이네」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;다른 캐릭터가 들어 왔다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1
		PRINTFORML 「지금은 여기까지일까」
		RETURN 1
	ENDIF
	;그 외(캐릭터 지정 없음
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;정사를 목격했다
;==================================================
@M_KOJO_EVENT_K61_6(ARG, ARG:1)
;말 주인은 TARGET
;ARG에 정사 상대
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;정사를 목격했다(친해져도:저)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF 함락상태() == 2
			PRINTFORML 「아, 심한, 나도 해도 가지고 싶은데」
		ELSEIF 함락상태() == 1
			PRINTFORML 「응……, 과시하지 말아 」
		ELSE
			PRINTFORML 「…………인, 무엇을 하고 있는 거야인가」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;질 수 없어 참가(친해져도:고)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF 함락상태() >= 4
			PRINTFORML 「하아……, 나만은 별로 가지 않은 것은 알고 있는데」
			PRINTFORML 「분명히 불쾌하고, 섞여도 좋지요」
			PRINTFORML 「%MASTERNAME:61%의 대답은 「네」이외, 없지만요」
		ELSEIF 함락상태() == 3
			PRINTFORML 「즐거운 듯 하다, 나도 섞여도 좋을까?」
			IF ARG == 62
				PRINTFORML 「카구야의 칠칠치 못한 얼굴은 볼만할 것이다 해」
			ELSEIF ARG == 67
				PRINTFORML 「케이네의 멋진 표정을 보고 싶고」
			ELSE
				PRINTFORML 「조금, 안……해 , 아, 뭐든지 없으니까」
			ENDIF
		ELSE
			PRINTFORML 「……즐거운 듯 하다, 혼합해 받을까」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;어색한 듯이 떠난다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF 함락상태() == 1
			PRINTFORML 「미, 미안,……하아」
		ELSE
			PRINTFORML 「……사람들의 눈이 있는 장소에서는 어떨까라고 생각하는데」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;정사를 볼 수 있었다
;==================================================
@M_KOJO_EVENT_K61_7(ARG, ARG:1)
;말 주인은 TARGET
;ARG에 목격자
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;정사를 볼 수 있었다(목격자의 친해져도:저)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF 함락상태() >= 4
			PRINTFORML 「……후후,%MASTERNAME:61%, 좀 더, 는, 어?」
			PRINTFORML 「……그러니까, 분명히 볼 수 있던 채로 하는 취미는 없어」
			PRINTFORML 「이봐, 빨리 갈아입으며」
		ELSEIF 함락상태() == 3
			PRINTFORML 「응, 후아……, 좋아, 으응……은」
			PRINTFORML 「여기 여기 이것으로 끝!」
		ELSE
			PRINTFORML 「기분, 좋은……, 은 사람이 왔군요. 이것으로 끝이구나 유감」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;목격자가 질 수 없어 참가(목격자의 친해져도:고)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF 함락상태() == 3
			PRINTFORML 「……응, 뭐, 어쩔 수 없지요」
			PRINTFORML 「%마스터가% 매력적인 것은사실이고」
		ELSE
			PRINTFORM 「예, 부디.
			IF ARG == 62
				PRINTFORML 장소를 나누어 주기 때문에, 사정사정하세요」
			ELSEIF ARG == 67
				PRINTFORML 케이네과 함께는 , 뭔가 부끄럽지만」
			ELSE
				PRINTFORML 뭐, 나만의 물건은 (뜻)이유가 아니기도 하고」
			ENDIF
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;목격자가 떠난다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF 함락상태() >= 4
			PRINTFORML 「후후, 방해자는 없어졌고, 좀 더 계속되어 해?」
			PRINTFORML 「%MASTERNAME:61%는, 그 아이와도 하고 싶었어?」
			PRINTFORML 「그렇다면, 내가 없을 때에 하면 괜찮지 않을까」
		ELSEIF 함락상태() == 3
			PRINTFORML 「그러면, 계속이구나」
			PRINTFORML 「……나 만이라면 불만?」
		ELSE
			PRINTFORML 「계속되어, 해?」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;목격한 정사를 캐묻는다(현재 없음
;==================================================
@M_KOJO_EVENT_K61_8(ARG, ARG:1)
RETURN 1

;==================================================
;팬티몰수되었다
;==================================================
@M_KOJO_EVENT_K61_9(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF 함락상태() >= 4
			PRINTFORML 「응?　움직이지 말고……, 이것은 뭐?」
			PRINTFORML 「정말, 내용보다 팬티(분)편이 좋다니」
			PRINTFORML 「내용은 언제라도 접하기 때문에 이쪽이 좋아?　변태」
		ELSEIF 함락상태() == 3
			PRINTFORML 「예, 움직이지 말고……, 완전히 이런 건 어째서 가져」
			PRINTFORML 「정말, 변태니까」
		ELSEIF 함락상태() == 2
			PRINTFORML 「어째서 이런 물건을……, 내용이 소중하지 않아?」
		ELSEIF 함락상태() == 1
			PRINTFORML 「아―, 응, 분명히 이런 건을 가지고 다니는 것은 어떨까라고 생각해」
		ELSE
			PRINTFORML 「위……우선 몰수」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;덮치기
;==================================================
@M_KOJO_EVENT_K61_10(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;우후후==2(개시시)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;MASTER를 덮치기(개시시)
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			IF 함락상태() >= 4
				PRINTFORML 「정말 좋아해요, %MASTERNAME:61%. 그러니까 좋지요」
				PRINTFORML 「%MASTERNAME:61%가 매력적인 것이 안 되니까」
				PRINTFORML 「후후, 맛있을 것 같다……, 간?」
			ELSEIF 함락상태() == 3
				PRINTFORML 「%마스터가% 지나치게 매력적인의가 안 된다」
				PRINTFORML 「그러면, 잘먹겠습니다」
			ELSEIF 함락상태() == 2
				PRINTFORML 「후후, 기분 좋게, 해도 주어」
			ELSEIF CFLAG:약점잡음
				PRINTFORML 「움직이지 말아요, 내가 기분 좋아지고 싶기 때문에」
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER에 안아 붙었다(개시시)
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF 함락상태() >= 4
				PRINTFORML 「움직이면 안 돼니까」
				PRINTFORML 「우후후,%MASTERNAME:61%는 따뜻하네」
				PRINTFORML 「그러면, 당분간 이대로」
			ELSEIF 함락상태() == 3
				PRINTFORML 「꽉, 이라고. ……아니?」
				PRINTFORML 「여자아이끼리이고, 이 정도 좋지요」
			ELSEIF 함락상태() == 2
				PRINTFORML 「H도 하고 싶지만, 지금은 이러한 있고 기분이야」
			ELSEIF 함락상태() == 1
				PRINTFORML 「……타의는 없어. 그렇지만, 약간 교차키라고 갖고 싶다」
			ELSE
				PRINTFORML 「……응, 특히, 의미는 없어」
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;달랠 수 있었다(종료시)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;-------------------------------------------------
		;빠져 나갔다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			IF 함락상태() >= 4
				PRINTFORML 「이제(벌써) 마지막?　아니, 좀 더 하고 싶어」
				PRINTFORML 「나는 안 돼?　%MASTERNAME:61%는 만족 할 수 없어?」
				PRINTFORML 「…………응, 아무래도 안 된다고 말한다면, 자제 한다」
			ELSEIF 함락상태() == 3
				PRINTFORML 「좀 더, 하자. 이렇게 기분이 좋은데」
				PRINTFORML 「……알았다. 아무래도라고 말한다면 어쩔 수 없다」
			ELSEIF 함락상태() == 2
				PRINTFORML 「네, 그만두어?　흐응, 내 몸은 마음에 드시지 않는다?」
			ELSEIF CFLAG:약점잡음
				PRINTFORML 「아무도 멈추어 좋다니 말하지 않지만……, 어쩔 수가 없구나, 용서(허락)해 준다」
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;안아 도착해 모드 만족 종료
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF 함락상태() >= 4
				PRINTFORML 「은―, 가끔씩은 이런 것도 없으면 안 되지요」
				PRINTFORML 「……%MASTERNAME:61%, 그 불만스러운 얼굴은 무엇?」
				PRINTFORML 「H 하고 싶었다면, 그쪽으로부터 덮치기이라고 오면 좋았는데 」
			ELSEIF 함락상태() == 3
				PRINTFORML 「응―, 이런 것도 정말 좋은 걸이지요」
				PRINTFORML 「%마스터는% 만족할 수 있었어?」
			ELSEIF 함락상태() == 2
				PRINTFORML 「……, 이것은 이것대로 멋지다, 시타구는 되었지만」
			ELSEIF 함락상태() == 1
				PRINTFORML 「……응?　떨어지는 것은 안 돼?　그렇지만, 벌써 만족했기 때문에」
			ELSE
				PRINTFORML 「응, 고마워」
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;안아 도착해 모드 강제 종료
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			IF 함락상태() >= 4
				PRINTFORML 「……욕구 불만 모임 그렇게」
				PRINTFORML 「%MASTERNAME:61%의 온기를 좀 더 느끼고 싶다의에」
				PRINTFORML 「…………뭐, 어쩔 수 없는데」
			ELSEIF 함락상태() == 3
				PRINTFORML 「아, 떨어지면(자) 안 돼…………」
				PRINTFORML 「하아……, 나중에 벌충하고 받기 때문에」
			ELSEIF 함락상태() == 2
				PRINTFORML 「아, 떨어지지 말고……, 나중에 해도군요」
			ELSEIF 함락상태() == 1
				PRINTFORML 「……쳇. 그러면, 나중에」
			ELSE
				PRINTFORML 「………………하아……」
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;빠져 나가는 실패
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;마음대로해 상태로부터 빠져 나갈 수 없었다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML 「……스스로 말한 말에는, 꼭 책임 취해 주지 않으면」
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;욕구 불만이 높아서 빠져 나갈 수 없었다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML 「……안 돼요, 내가 만족할 때까지, 떼어 놓지 않으니까」
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;목욕탕에서 만남
;==================================================
@M_KOJO_EVENT_K61_11(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;내쫓아졌다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF 함락상태() == 1
			PRINTFORML 「……에 또, 미안해, 들어 오지 않으면 좋겠다」
			PRINTFORML 「빨리 나가있어 주지 않겠는가」
		ELSE
			PRINTFORML 「……빨리 나가있어」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;시선이 마주쳤다(내쫓아지지 않다)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF 함락상태() >= 4
			PRINTFORML 「오세요. 후후, 이대로 함께 씻어 비비어?」
			PRINTFORML 「%MASTERNAME:61%가 좋아하게 해 좋은 거야」
			PRINTFORML 「후후, 이런 시간도 좋은 것이구나」
		ELSEIF 함락상태() == 3
			PRINTFORML 「아, 오세요. 뭐 그런 물끄러미 봐?」
			PRINTFORML 「어차피 궁상스러워, 나는……, 미도리?　아첨은 괜찮으니까」
		ELSE
			PRINTFORML 「후후, 나니시에 왔던가?」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;침상에 잠입해
;==================================================
@M_KOJO_EVENT_K61_12(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;내쫓아진다(분노)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF 함락상태() >= 4
			PRINTFORML 「……아무도, 들어가도 괜찮아라고 말하지 않은데」
			PRINTFORML 「연인에서도 화내는 것은 있기 때문에」
			PRINTFORML 「자, 빨리 저 편에 가며」
		ELSE
			PRINTFORML 「……그런데 말이야. 그런 식으로 사람을 화나게 해 두어, 뭔가 하고 싶은거야?」
			PRINTFORML 「덮침 뭐라 말하면, 진심으로 화내요」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;침상에 침입
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF 함락상태() >= 4
			PRINTFORML 「구-―……, %MASTERNAME:61%……, 좋아……」
		ELSE
			PRINTFORML 「―,―, 응……」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;침상에 침입(상대가 연모)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF 함락상태() >= 4
			PRINTFORML 「후아……, 아, %MASTERNAME:61%. 무슨 용무야?」
			PRINTFORML 「어쩌면 덮침?　자고 있는 한중간에 장난 되는 것은 용서해 주었으면 한데」
			PRINTFORML 「후후, 그렇지만, 와 주어 기뻐」
		ELSE
			PRINTFORML 「응, 아아, %CALLNAME:MASTER%인가. 무슨용무?」
			PRINTFORML 「덮침, 이라든가 말하면(자) 화내요. (이)라니」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;침상에 침입(상대가 연모·쇠약)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF 함락상태() >= 4
			PRINTFORML 「……응,……%MASTERNAME:61%?　……휴업(휴가)」
			PRINTFORML 「……뭐?　나는, 졸린, 으로부터……」
			PRINTFORML 「, 보고…………구―……―……」
		ELSE
			PRINTFORML 「…………, 응?　%CALLNAME:MASTER%?」
			PRINTFORML 「그럼, 좋은가……, 휴업(휴가)……」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;내쫓아진다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;내쫓아진다(쇠약)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;업무 중
;==================================================
@M_KOJO_EVENT_K61_13(ARG, ARG:1)
;말 주인은 TARGET
;ARG:1에 남아 있는 일량
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;일개시(직장에 이동한다)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;업무중
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;일종료
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;식사계
;==================================================
@M_KOJO_EVENT_K61_14(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;가지고 있던 음식을 먹을 수 있었다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		IF 함락상태() >= 4
			PRINTFORML 「%MASTERNAME:61%는, 의외로 요리 능숙하다」
			PRINTFORML 「후후, 그러면 잘먹겠습니다」
			PRINTFORML 「응, 역시 맛있다」
		ELSEIF 함락상태() == 3
			PRINTFORML 「응―, 꽤 맛있을 것 같다」
			PRINTFORML 「당연 받아, 안 돼 라도 말해도 안 돼니까」
		ELSEIF 함락상태() == 2
			PRINTFORML 「맛있을 것 같다. 해도 좋기 때문에 받아도 좋지요」
		ELSEIF 함락상태() == 1
			PRINTFORML 「……맛있을 것 같다. 받아도 좋아?　고마워요」
		ELSE
			PRINTFORML 「맛있을 것 같다, 받아」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;MASTER가 덮치기
;==================================================
@M_KOJO_EVENT_K61_15(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;둘이서 만날 기회 종료(우후후 종료시)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF 함락상태() >= 4
			PRINTFORML 「네―, 벌써 끝나―？」
			PRINTFORML 「좀 더 하고 싶은데. 이렇게 멋진 일이야 해」
			PRINTFORML 「…………너무 빠져도 문제 있다 라고 하는 것은 알고 있는데」
		ELSEIF 함락상태() == 3
			PRINTFORML 「이제(벌써) 마지막?　좀 더 하자」
			PRINTFORML 「기력 체력의 한계까지 하기 때문에 좋은데……」
		ELSE
			PRINTFORML 「마지막?　정말로?　이렇게 기분이 좋은데?」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
	;-------------------------------------------------
	;사후 묘사
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;정액이 늘어져 왔다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF EXP:출산경험
				PRINTFORML 「아, 안 돼 나오면 안 돼, 아기 원 나오면 안 되는 것인데」
				PRINTFORML 「……저기, 좀 더 따라 주지 않겠어?　아기 갖고 싶으니까」
				PRINTFORML 「…………심술쟁이」
			ELSEIF 함락상태() >= 4
				PRINTFORML 「아까운……, 쪽」
				PRINTFORML 「맛있다든가 맛있지 않다든가, 맛은 관계없어요」
				PRINTFORML 「%MASTERNAME:61%의 정액, 나중에 머물러 원하는 만큼이니까」
			ELSEIF 함락상태() == 3
				PRINTFORML 「응, 늘어져 오고 있다」
				PRINTFORML 「그렇게 가만히 봐 즐거워?　아, 그래」
			ELSE
				PRINTFORML 「……자주(잘) 이것만 낼 수 있는 것이구나」
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;애액이 늘어져 왔다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			IF EXP:출산경험
				PRINTFORML 「재시도를 요구한다. 어째서 분명하게 안에 내 주지 않는 것」
				PRINTFORML 「응, 국물뿐 늘어져 오는데, 중요한 정자가 부족해」
				PRINTFORML 「…………아이를 갖고 싶은 것은사실이야, 그렇지만, 어딘지 부족하다고 말하는 것도사실이지만」
			ELSEIF 함락상태() >= 4
				PRINTFORML 「하아……,%MASTERNAME:61%, 어딘지 부족하지만?」
				PRINTFORML 「그렇다면, 나도 기분 좋게는 되었지만, 그쪽은 충분하지 않지 않아」
				PRINTFORML 「제대로 정액 보지에 먹였으면 좋았다」
			ELSEIF 함락상태() == 3
				PRINTFORML 「안이고 하지 않다니, 아깝네요」
				PRINTFORML 「그렇지 않으면, 내 몸은 기분 좋지 않았어?　……그렇지 않으면 좋은데」
			ELSE
				PRINTFORML 「…………응, 없고 준다」
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;사후의 무드
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			IF 함락상태() >= 4
				PRINTFORML 「응―, 가능하다면 좀 더 하고 싶었다―」
				PRINTFORML 「차라리 정신을 잃을 정도로까지 격렬하고」
				PRINTFORML 「그 쪽이%MASTERNAME:61%에 사랑 받고 는 실감이 솟아 오르고」
			ELSEIF 함락상태() == 3
				PRINTFORML 「후후, 조금 어딘지 부족하지만, 이것은 이것대로 좋을까」
				PRINTFORML 「언제나 기분 좋게 해 주어 고마워요」
			ELSE
				PRINTFORML 「…………응, 수고했어」
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;옷을 입는다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML 「……성적 매력이 없는 의상으로 나쁘다」
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;동침한다
;==================================================
@M_KOJO_EVENT_K61_16(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;동침을 종료했다(종료시)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:수면
			PRINTFORML 「……이나……가는거야…………있고……로」
		ELSEIF 함락상태() >= 4
			PRINTFORML 「이렇게 해, 줄줄 하는 것도 좋은데」
			PRINTFORML 「다른 금년 싶다」
			PRINTFORML 「이봐,%MASTERNAME:61%나 몸을 일으키며」
		ELSEIF 함락상태() == 3
			PRINTFORML 「정말 좋아하는 %CALLNAME:MASTER%의 얼굴을 가까이서 볼 수 있는 것은 기쁜데」
			PRINTFORML 「그것뿐이면 질리기도 하고」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;시간정지 종료시
;==================================================
@M_KOJO_EVENT_K61_17(ARG, ARG:1)
;말 주인은 TARGET
;배타와 명기되어 있지 않은 물건은 상황에 따라서는 연속으로 표시되므로 주의
;ARG에 사정 상황
;ARG:1에 사정 상태
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;ARG=1~3은 배타
	;수수께끼의 쾌감
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF 함락상태() >= 4
			PRINTFORML 「응!　……후우, 응……」
			PRINTFORML 「……저기, %MASTERNAME:61%. 나에게도 시켰으면 좋은데」
			PRINTFORML 「이런, 사용 방법이 아니고, 」
		ELSEIF 함락상태() == 3
			PRINTFORML 「응!　!」
			PRINTFORML 「, 없는, 아무것도 아니야, 어째서도」
		ELSEIF 함락상태() == 2
			PRINTFORML 「으음……, 괜찮아, 어쩐지 기분 좋았던 것 뿐」
		ELSEIF 함락상태() == 1
			PRINTFORML 「……, 괘, 괜찮아」
		ELSE
			PRINTFORML 「!　하……응…………괜찮아」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;절정
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF 함락상태() >= 4
			PRINTFORML 「히앙, 응 큐!」
			PRINTFORML 「하는 ……하아……%MASTERNAME:61%」
			PRINTFORML 「제대로, 사랑시켰으면 좋아. 일방적인 쾌락이 아니고」
		ELSEIF 함락상태() == 3
			PRINTFORML 「히 흐응!　후아아응!」
			PRINTFORML 「괘, 괜찮아, 괜찮, 으응 , 아앗」
		ELSEIF 함락상태() == 2
			PRINTFORML 「응 응 으음!　(은)는, 하아, 으음, 나무로 하지 않는, 그리고, 아앗」
		ELSEIF 함락상태() == 1
			PRINTFORML 「히!　으응 우우웃!　……하아, 하아, 으음……」
		ELSE
			PRINTFORML 「히아아 아아아아!　흐응!　히, 윽……」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;팬티 분실
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF 함락상태() >= 4
			PRINTFORML 「……%MASTERNAME:61%, 갖고 싶으면 분명하게 말했으면 좋은데」
			PRINTFORML 「부끄럽지만,%MASTERNAME:61%에라면, 얼마든지 선물 하는데」
			PRINTFORML 「몰래 취하는 것이 좋아?　변태」
		ELSE
			PRINTFORML 「……응, 어째서……, 왜, 왜도 없다」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【무자각입안 사정】
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;정액중독저정음
		IF ARG:1 == 1
			IF 함락상태() >= 4
				PRINTFORML 「콜록 콜록, 으응, 콜록……」
				PRINTFORML 「……쿨럭, 응, 맛있지 않다……」
				PRINTFORML 「어째서, 이런 것 할까,%MASTERNAME:61%는」
			ELSEIF 함락상태() == 3
				PRINTFORML 「으응!　콜록 콜록, ……콜록」
				PRINTFORML 「……기분악, 무엇 이것」
			ELSEIF 함락상태() == 2
				PRINTFORML 「콜록 쿨럭 , 훈, 쿨럭……, 어째서 이런 건이」
			ELSEIF 함락상태() == 1
				PRINTFORML 「진하고 응!　쿨럭 쿨럭!　……뭐야, 이것?」
			ELSE
				PRINTFORML 「쿨럭 쿨럭, 끄덕, 콜록 쿨럭」
			ENDIF
		;정액중독저토출
		ELSEIF ARG:1 == 2 || ARG:1 == 5
			IF 함락상태() >= 4
				PRINTFORML 「콜록 콜록 ……, 하아하아」
				PRINTFORML 「%MASTERNAME:61%, 심한  것이 아니야?」
				PRINTFORML 「입속에 내다는」
			ELSEIF 함락상태() == 3
				PRINTFORML 「쿨럭 쿨럭,……응, 콜록」
				PRINTFORML 「기분악……」
			ELSEIF 함락상태() == 2
				PRINTFORML 「콜록 쿨럭 ……, 어째서 이런 건이」
			ELSEIF 함락상태() == 1
				PRINTFORML 「쿨럭 쿨럭!　……뭐야, 이것?」
			ELSE
				PRINTFORML 「쿨럭 쿨럭, 콜록 쿨럭……, 콜록……」
			ENDIF
		;정액중독저손으로 가린다
		ELSEIF ARG:1 == 3
			IF 함락상태() >= 4
				PRINTFORML 「콜록 콜록……이제, 적당히 하기를 원하는데」
				PRINTFORML 「%MASTERNAME:61%의 정액으로 손이 끈적끈적이야」
				PRINTFORML 「빨아 깨끗이 해. ……할 수 없어?　(이)라면, 이런 일 시키지 말아줘」
			ELSEIF 함락상태() == 3
				PRINTFORML 「콜록 쿨럭……, 응, 어째서 이런 것이」
				PRINTFORML 「끈적 끈적 하고 있고 미숙하고, 좋아하게 될 수  없다」
			ELSEIF 함락상태() == 2
				PRINTFORML 「쿨럭 쿨럭, 응, 어째서 정액이?　미끈미끈 하고 있다」
			ELSEIF 함락상태() == 1
				PRINTFORML 「쿨럭 쿨럭!　……뭐야, 이것?」
			ELSE
				PRINTFORML 「쿨럭 쿨럭, 콜록 쿨럭……, 손에 이상한 것이」
			ENDIF
		;정액중독고정음
		ELSEIF ARG:1 == 4 || ARG:1 == 6
			IF 함락상태() >= 4
				PRINTFORML 「진하고 응……좋은 맛 해……, 는, %MASTERNAME:61%?」
				PRINTFORML 「이렇게 말하는 것은 그만두어 주지 않을까」
				PRINTFORML 「제대로 자신의 의지로,%MASTERNAME:61%를 기분 좋게 시키고 싶기 때문에」
			ELSEIF 함락상태() == 3
				PRINTFORML 「끄덕, 응……하아……, 이것, 정액?　……응」
				PRINTFORML 「하아, 응, 몸, 두꺼워지는……으음」
			ELSEIF 함락상태() == 2
				PRINTFORML 「끄덕……, 어째서 이것……, %CALLNAME:MASTER%의 맛이 난다」
			ELSEIF 함락상태() == 1
				PRINTFORML 「끄덕, 응,……일까, 이것?」
			ELSE
				PRINTFORML 「진하고……응……, 뭐랄까, 목이, 앗, 있고……」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【무자각안면 사정】
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;무지 소유＆정액경험 100 미만
		IF ARG:1 == 1
		;통상 닦아 잡기
		ELSEIF ARG:1 == 2
			IF 함락상태() >= 4
				PRINTFORML 「……하아,%MASTERNAME:61%나, 정말을 좋아하다」
				PRINTFORML 「마킹 되고 있다, 라고 생각하면(자) 싫지 않은데」
				PRINTFORML 「그렇지만, 역시, 나부터 시켰으면 좋은데」
			ELSEIF 함락상태() == 3
				PRINTFORML 「……!　어째서 이런 건」
				PRINTFORML 「어째서, 어째서 이런……」
			ELSEIF 함락상태() == 2
				PRINTFORML 「!　정액……, 이야, 군요」
			ELSEIF 함락상태() == 1
				PRINTFORML 「히!　기분악……」
			ELSE
				PRINTFORML 「히!　, 없는」
			ENDIF
		;얼굴에 사정하기 정액 빨고 새
		ELSEIF ARG:1 == 3
			IF 함락상태() >= 4
				PRINTFORML 「……응,%MASTERNAME:61%태우고-역」
				PRINTFORML 「응, 맛있는……, 하아」
				PRINTFORML 「그렇지만, 할 수 있으면 분명하게 입으로, 나에게 짜 받게 했으면 좋다」
			ELSEIF 함락상태() == 3
				PRINTFORML 「응……, 맛있는……, 이나, 안 돼인데」
				PRINTFORML 「어째서, 이렇게……」
			ELSEIF 함락상태() == 2
				PRINTFORML 「……, 약간, 날름, ?……응」
			ELSEIF 함락상태() == 1
				PRINTFORML 「…………응,……쪽……」
			ELSE
				PRINTFORML 「……하아, 응, ……」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【무자각수음 사정】
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;닦아 잡기
		IF ARG:1 == 1
			IF 함락상태() >= 4
				PRINTFORML 「%MASTERNAME:61%. 나의 손은 기분 좋았어?」
				PRINTFORML 「그렇지만, 나의 의지가 없는데, 정말로 기분이 좋아?」
				PRINTFORML 「스보다, 시라고 받는 (분)편이 기분이 좋다고 생각하지만요」
			ELSEIF 함락상태() == 3
				PRINTFORML 「……또, 이것. 어째서 이런 일에」
				PRINTFORML 「하아, 미끈미끈 하고 있고 이상한 냄새이고, 기분 나쁘다」
			ELSEIF 함락상태() == 2
				PRINTFORML 「정액?　……하아, 누구의 장난 어쩐지」
			ELSEIF 함락상태() == 1
				PRINTFORML 「, 뭐야 이건, 어째서 이런 것이」
			ELSE
				PRINTFORML 「……우와, 기분 나쁘다……」
			ENDIF
		;빨고 새
		ELSEIF ARG:1 == 2
			IF 함락상태() >= 4
				PRINTFORML 「……응,%MASTERNAME:61%태우고-역」
				PRINTFORML 「응, 맛있는……, 하아」
				PRINTFORML 「그렇지만, 할 수 있으면 분명하게 입으로, 나에게 짜 받게 했으면 좋다」
			ELSEIF 함락상태() == 3
				PRINTFORML 「응……, 맛있는……, 이나, 안 돼인데」
				PRINTFORML 「어째서, 이렇게……」
			ELSEIF 함락상태() == 2
				PRINTFORML 「……, 약간, 날름, ?……응」
			ELSEIF 함락상태() == 1
				PRINTFORML 「…………응,……쪽……」
			ELSE
				PRINTFORML 「……하아, 응, ……」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【무자각애널사정】
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;A감각 2 이하
		IF ARG:1 == 1
			IF 함락상태() >= 4
				PRINTFORML 「히잇!　, 엉덩이, 아프다……」
				PRINTFORML 「%MASTERNAME:61%의 바보, 아무리 뭐라해도 여기는 그」
				PRINTFORML 「……저기, ……그, 가능한 한, 그만둬, 가지고 싶은지, 」
			ELSEIF 함락상태() == 3
				PRINTFORML 「아……구, 엉덩이, 아프다……」
				PRINTFORML 「어째서, 갑자기……」
			ELSEIF 함락상태() == 2
				PRINTFORML 「으음, 아야야야야……, 어째서, 여기가 아프고」
			ELSEIF 함락상태() == 1
				PRINTFORML 「으응!　통……, 어째서 갑자기, 윽……」
			ELSE
				PRINTFORML 「히!　(이)나, 통, 어째서 이렇게」
			ENDIF
		;그것 이외
		ELSEIF ARG:1 == 2
			IF 함락상태() >= 4
				PRINTFORML 「아앗, 응……,%MASTERNAME:61%의 바보」
				PRINTFORML 「여기는 안 된다니까……, 기분 너무 좋아, 어리석게 되어버린다, 응이니까 」
				PRINTFORML 「……적어도, 의식이 있을 때, 해 주었으면 하는데」
			ELSEIF 함락상태() == 3
				PRINTFORML 「흐응!　…………아, 이것……」
				PRINTFORML 「, 으응……, 이나, 어째서」
			ELSEIF 함락상태() == 2
				PRINTFORML 「응!　……(은)는, , 하앗……엉덩이, 이상해질 것 같다」
			ELSEIF 함락상태() == 1
				PRINTFORML 「흐응!　(이)나, 어째서, 여기,……」
			ELSE
				PRINTFORML 「히잉!　응!　쿠웃……」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【무자각처녀상실】
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		IF 함락상태() >= 4
			PRINTFORML 「%MASTERNAME:61%의 바보, 한다면 제대로 된 형태로 하고」
			PRINTFORML 「%MASTERNAME:61%의 능력도 있고, 짊어지지만 없을지도라고는 생각했지만」
			PRINTFORML 「그렇지만, 역시 처음이 이렇게 말하는 형태 라는 것은, 불쾌」
		ELSEIF 함락상태() == 3
			PRINTFORML 「……응, 통. 어디엔가 부딪친 기억은, 없지만」
			PRINTFORML 「그렇지만, 여기가 상하다니 없었는데 」
		ELSEIF 함락상태() == 2
			PRINTFORML 「아얏!　……저것, 어째서 이런 곳이?」
		ELSEIF 함락상태() == 1
			PRINTFORML 「구……, 뭐랄까, 이 상해……, 이런 건 처음이다」
		ELSE
			PRINTFORML 「통……, 어째서, 이런 통응이겠지」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【무자각질내사정】
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;비처녀 질내사정 피임약 없음
		IF ARG:1 == 1
			IF EXP:출산경험
				PRINTFORML 「……아, 정액 오고 있다」
				PRINTFORML 「갓난 아기, 할 수 있으면 좋다」
				PRINTFORML 「갓난 아기, 다시 한 번, 나의 아기」
			ELSE
				IF 함락상태() >= 4
					PRINTFORML 「……하아, %MASTERNAME:61%. 어차피 할 수 없는데 내 즐거워?」
					PRINTFORML 「그렇다면,%MASTERNAME:61%의 정액, 안에 나오는 것 자체는 좋아하지만」
					PRINTFORML 「제대로 서로의 기분이 통하고 있다고 느낌이 좋아하는 만큼이고」
				ELSEIF 함락상태() == 3
					PRINTFORML 「…………하아, 어째서 안에 들어가 있는 것이지」
					PRINTFORML 「나온 기억은 없지만」
				ELSEIF 함락상태() == 2
					PRINTFORML 「―, 어째서 이것이……, 어떻게나는 응이겠지, 도대체」
				ELSE
					PRINTFORML 「……안에 나오지 않았는데」
				ENDIF
			ENDIF
		;비처녀 질내사정 피임약 있음
		ELSEIF ARG:1 == 2
		;처녀 질내사정
		ELSEIF ARG:1 == 3
			IF 함락상태() >= 4
				PRINTFORML 「……응, 무엇인가, 위화감이」
				PRINTFORML 「……%MASTERNAME:61%무엇인가 했겠죠?」
				PRINTFORML 「무엇을 했는지 알 수 없지만, 연인이니까, 제대로 된 형태로 하고 가지고 싶어」
			ELSEIF 함락상태() == 3
				PRINTFORML 「……응, 뭐?　무엇인가 이상한 느낌이」
				PRINTFORML 「젖고 있다, 일까나?　그런 기분이 아닌 괄이지만」
			ELSEIF 함락상태() == 2
				PRINTFORML 「응……, 어째서, 안에 무엇인가」
			ELSEIF 함락상태() == 1
				PRINTFORML 「……으응,……뭐야, 무엇이」
			ELSE
				PRINTFORML 「으음……, 뭔가 미끈미끈 한다……」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;시간정지해제 공통
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		PRINTFORML 「……?」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;싱싱한으로 시켜라 때
;==================================================
@M_KOJO_EVENT_K61_18(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;피임요구 대사
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;끊었다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;끊었는데 다 달라붙어 끊어졌다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;위험일 이외 허가
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;위험일 허가
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;신사 생활을 승인해 받는다
;==================================================
@M_KOJO_EVENT_K61_19(ARG, ARG:1)
;말 주인은 ARG
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;인정된다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF GETBIT(1610,5)
			IF 함락상태() >= 4
				PRINTFORML 「좋은거야?　정말로?」
				PRINTFORML 「하, 하하, 스스로 부탁하러 와 , 뭘 말하는 거야」
				PRINTFORML 「……저것, 기쁜 것뿐, 인데, 또」
				PRINTFORML 「아, ,……는은,%MASTERNAME:61%과 알게 되고 나서, 울고만이다」
				PRINTFORMW 「흑, 끄는 ……, 기뻐서도, 치수……눈물이 나오는 것이군」
			ELSE
				PRINTFORML 「고마워, 기뻐」
				PRINTFORML 「하하, 사람과 접촉할 수 있는 것이 기쁘다니, 생각되는 것처럼 되라고 하는건」
				PRINTFORML 「하하하,…………저것, 어째서 일까?　……눈물이」
				PRINTFORMW 「…………, 하아……이제, 시들고 자르고 있었던 괄인데, 군요」
			ENDIF
		ELSE
			IF 함락상태() >= 4
				PRINTFORML 「정말로%MASTERNAME:61%는 제멋대로이다」
				PRINTFORML 「나를 여기에 두었다고 생각하면(자), 다른 장소로 이사하기 때문에」
				PRINTFORML 「어차피라면, 나의 집에 오면 좋은데」
				PRINTFORMW 「……그렇지만, 매일%MASTERNAME:61%과 얼굴을 맞댈 수 있기 때문에, 불만을 말하면 안 되지요」
			ELSE
				PRINTFORML 「하아, 어째서, 그렇게 %마스터는% 흔들흔들 하고 있어인가」
				PRINTFORMW 「어차피라면, 내가 있는 곳에 살러 오면 좋은데」
			ENDIF
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;인정되지 않는다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「그렇네요. 나 같은 것보다 어울리는 상대가 있을 것이고」
		PRINTFORML 「그렇지만, 앞으로도 응(어른) 일 정도는, 용서(허락)해 주지요?」
		PRINTFORML 「제멋대로 말해 미안해」
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;귀가시
;==================================================
@M_KOJO_EVENT_K61_20(ARG, ARG:1)
;말 주인은 LOCALS or RESULT
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;통상 귀가
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF 함락상태() >= 4
			PRINTFORML 「그러면, 슬슬 돌아갈까」
			PRINTFORML 「%MASTERNAME:61%가, 거주하는 것을 용서(허락)해 주지 않고 어쩔 수 없지요」
			PRINTFORML 「할 수 있으면(자), 함께 있고 싶지만」
		ELSEIF 함락상태() == 3
			PRINTFORML 「후우, 그러면 이제 돌아갈까」
			PRINTFORML 「할 수 있으면 좀 더 함께 있고 싶은 곳 하지만 말이야」
		ELSEIF 함락상태() == 2
			PRINTFORML 「이제(벌써), 끝인가. 쳇, 좀 더 시 싶었다」
		ELSEIF 함락상태() == 1
			PRINTFORML 「응, 이제(벌써) 돌아가는 시간이다, 그러면 또」
		ELSE
			PRINTFORML 「돌아가는 시간이고, 실례한다」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;데이트중 귀가
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF 함락상태() >= 4
			PRINTFORML 「자, 이제 시간이고, 돌아갈까」
			PRINTFORML 「사실은, 쭉 함께 있고 싶지만」
			PRINTFORML 「그러면 조심해 돌아가,%MASTERNAME:61%」
		ELSEIF 함락상태() == 3
			PRINTFORML 「응, 이제 시간이구나」
			PRINTFORML 「돌아갈 때는 조심하는 것이 좋아」
		ELSEIF 함락상태() == 2
			PRINTFORML 「사실은 좀 더 시 싶지만, 시간이고. 조심해 귀가인」
		ELSEIF 함락상태() == 1
			PRINTFORML 「밤길에는 조심해」
		ELSE
			PRINTFORML 「위험하기 때문에, 돌아가는 길로 들어섰다라면 조심을 게을리하지 않아」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;현관앞에서 보류
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;함락 소질 취득시
;==================================================
@M_KOJO_EVENT_K61_21(ARG, ARG:1)
;말 주인은 ARG
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;연모 취득
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「……은은, 갔군요」
		PRINTFORML 「설마, 내가 이런 기분이 되다니」
		PRINTFORML 「사람을 좋아하게 되는, 인가……」
		PRINTFORML 「나에게는 용서되는 것이 아니다」
		PRINTFORML 「그렇지만,……하지만, 억제하지 못할이나」
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;사모 취득
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「후후, 꽤 재미있다, 저녀석」
		PRINTFORML 「카구야와 서로 하는 것 와 같은 정도 즐거울지도」
		PRINTFORML 「……후후, 후후후」
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;애욕 취득
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;정부 취득
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;섹프 취득
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;조교 종료시에 자위
;==================================================
@M_KOJO_EVENT_K61_22(ARG, ARG:1)
;말 주인은 ARG
;ARG:0에 자위 상황
;ARG:1에 자위 종류
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
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
		;-------------------------------------------------
		;C민감 orC 감각 10이상
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;V민감 orV 감각 10이상
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;A민감 orA 감각 10이상
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;B민감 orB 감각 10이상
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;부위 지정 없음
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 5
			PRINTFORML
			RETURN 1
		ENDIF
		;그 외
		;위의 분기를 일절 쓰지 않고, 여기에 쓰는 것으로 함락 소질 있어 자위중독 높이고 자위의 공통 말을 표시할 수가 있습니다
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;자위중독 높은
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;-------------------------------------------------
		;항문 질강동시
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;질강만
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;그 외
		;위의 분기를 일절 쓰지 않고, 여기에 쓰는 것으로 자위중독 높이고 자위의 공통 말을 표시할 수가 있습니다
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;인내
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		IF 함락상태() >= 4
			PRINTFORML 「%MASTERNAME:61%……, 해 주었으면 해」
		ELSE
			PRINTFORML 「몸 뜨거운……, 하지만, 인내」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;그 외
	;위의 분기를 일절 쓰지 않고, 여기에 쓰는 것으로 자위의 공통 말을 표시할 수가 있습니다
		;잠정
		IF 함락상태() >= 4
			PRINTFORML 「하아, 하아, 응!　%MASTERNAME:61%, 해, 있고」
			PRINTFORML 「아앙, 쿠웃!　흐으응!」
			PRINTFORML 「%MASTERNAME:61%, 좀 더, 좀 더 후아 아아앗!」
		ELSEIF 함락상태() == 3
			PRINTFORML 「으응 , 흐으응!　히, 아 흥!」
			PRINTFORML 「하아하아, 뜨거운, 두꺼워, 아앙!」
		ELSEIF 함락상태() == 2
			PRINTFORML 「하앗, 아흑!　좀 더, 가지고 싶은, 의에!」
		ELSEIF 함락상태() == 1
			PRINTFORML 「응, 응, 으음……, 안 돼……, 응」
		ENDIF
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1
;==================================================
;목욕탕 데리고 나가
;==================================================
@M_KOJO_EVENT_K61_23(ARG, ARG:1)
;말 주인은 LOCAL
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;거절당했다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF 함락상태() == 2
			PRINTFORML 「적어도, 함께 들어가고 싶다고 생각하게 하는 정도 에 대해서 해 주었으면 하는데」
		ELSEIF 함락상태() == 1
			PRINTFORML 「아, 안 돼로부터, 아무리 뭐라 해도 아직 그런」
		ELSE
			PRINTFORML 「……하아, 좀 더 사이가 좋은 상대와 들어오면?」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;함께 들어가 주었다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF 함락상태() >= 4
			PRINTFORML 「후후, %MASTERNAME:61%와 욕실인가, 좋다」
			PRINTFORML 「아, 맞아 맞아, H 더 촉감은 없음이니까」
			PRINTFORML 「아무래도 자제를 할 수 없다고 말한다면, 어쩔 수 없는데」
		ELSEIF 함락상태() == 3
			PRINTFORML 「%CALLNAME:MASTER%도 밝히는구나. 뭐, 나도 싫지 않은데」
			PRINTFORML 「그런데, 내 알몸, 예뻐? 궁상스럽거나 말하면, 화내지만요」
		ELSE
			PRINTFORML 「응, 좋아. 내 알몸은 재미있는 것도 아니겠지만」
		ENDIF
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;회임
;==================================================
@M_KOJO_EVENT_K61_24(ARG, ARG:1)
;말 주인은 LOCAL
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;연모
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF 함락상태() >= 4
			IF EXP:출산경험
				PRINTFORML 「응,%MASTERNAME:61%, 또 아기가 와 주었어」
				PRINTFORML 「고마워요,%MASTERNAME:61%가 아니면, 반드시 와 주지 않았어요」
				PRINTFORML 「그렇지 않아?　으응, 그런 일이 있어」
				PRINTFORML 「%MASTERNAME:61%가 아니면, 반드시 성행위를 요구하거나는 하지 않았던 것」
			ELSE
				PRINTFORML 「아……, 저기, %MASTERNAME:61%. 후후, 고마워요」
				PRINTFORML 「갑자기 무슨 일이라고, 아기가, 와 주었기 때문에」
				PRINTFORML 「후후, 우후후후, 기쁘다. 굉장히 기쁘다」
				PRINTFORML 「아기, 나의 아기, 후후, 우후후후후후」
			ENDIF
		ELSE
			IF EXP:출산경험
				PRINTFORML 「후후, 기쁘다. 또 와 주지 않아다. 고마워요」
				PRINTFORML 「아, %CALLNAME:MASTER%도 고마워」
				PRINTFORML 「덤같이 말해지고 싶지 않아?　미안, 그렇지만, 이 아이가 와 주어 기쁘니까」
				PRINTFORML 「……이렇게 행복하게 되어 좋은 것인지」
			ELSE
				PRINTFORML 「후후, 아기다, 아기가 와 주었다」
				PRINTFORML 「%마스터는% 어떨까나 없지만, 나에게 있어서는 기적인걸」
				PRINTFORML 「 「봉래의 약」을 마시고 나서, 쭉 잊고 있었던, 으응, 단념하고 있었던 일인걸」
				PRINTFORML 「아하하, 기쁘다. 기뻐,……흑…………, 어째서, 기쁜데, 눈물이」
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;사모
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF EXP:출산경험
			PRINTFORML 「후후, 또다. 또 와 주었다」
			PRINTFORML 「……응?　무엇인가 재미있는 것이라도?　배를 어루만지는 행동이 상냥해?」
			PRINTFORML 「당연하지 않다. 나 같은 것 에, 그런데도 와 주었다 것」
		ELSE
			PRINTFORML 「고마워요, %CALLNAME:MASTER%. 덕분에, 아이가 생긴 것 같다」
			PRINTFORML 「아, 별로, 아무것도 하지 않아 좋아. 후후, 아기, 나의 아기」
			PRINTFORML 「기쁠 것 같다?　후후, 기뻐. (이)라도 있을 수 없다고 생각하고 있었던 것」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;함락 소질 없음
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF EXP:출산경험
			PRINTFORML 「……나를 잉태는, 어느 의미 굉장하다」
			PRINTFORML 「언니와 함께로 이 아이도 봉래인이 아니지만, 행복하게 되었으면 좋은데」
		ELSE
			PRINTFORML 「……스스로도 아직 믿을 수 없지만, 아기가 생긴 것 같다」
			PRINTFORML 「후후, 고마워요%CALLNAME:MASTER%」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;무자각
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		IF EXP:출산경험
			PRINTFORML 「……아, 후후, 갓난 아기다, 후후, 우후후후후후」
		ELSE
			PRINTFORML 「……이겠지 , 뭔가 이상한 위화감이」
		ENDIF
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;출산
;==================================================
@M_KOJO_EVENT_K61_25(ARG, ARG:1)
;말 주인은 LOCAL
;ARG:1	몇 사람눈의 아이인가
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;연모
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF 함락상태() >= 4
			PRINTFORML 「후우,―, 하아……, 죽는 만큼, 지쳤다……」
			PRINTFORML 「%MASTERNAME:61%나 낳아 보면 알지 않을까」
			PRINTFORML 「후후, 라도 좋아. 태어나 주어 고마워요」
			PRINTFORML 「이런 내가 있는 곳에 와 주어, 정말로 고마워요」
		ELSE
			PRINTFORML 「……은-는―…………, 출생이라고 주어, 고마워요」
			PRINTFORML 「……아, %CALLNAME:MASTER%. 이봐, 아빠예요―」
			PRINTFORML 「어째서, 거기서 수줍을까. 답지 않다」
			PRINTFORML 「후후, 아기, 나의, 소중한 소중한, 갓난 아기」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;사모
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「하아하아, 후우…………, 죽는 것보다, 괴로운, 일지도」
		PRINTFORML 「그렇지만, 기쁘다. 태어나 주어 고마워요, 나의 아기, 쭙」
		PRINTFORML 「……후후, %CALLNAME:MASTER%도 갖고 싶어?　그렇지만 안 돼니까」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;함락 소질 없음
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「……지쳤다. 하지만, 굉장히 기뻐」
		PRINTFORML 「후후, 안녕하세요, 아기. 우후후, 이름 어떻게 할까?」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;무자각
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML 「하아, 하아……, 으음……, 후후, 와 주어, 고마워요, 나의 아기」
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;딸딸이들킴
;==================================================
@M_KOJO_EVENT_K61_26(ARG, ARG:1)

;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;볼 수 있던 순간
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORML 「………………네″?」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;아무것도하지않는다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF 함락상태() >= 4
				PRINTFORML 「나나나 없는 무엇을 생각해%MASTERNAME:61%!」
				PRINTFORML 「그건,  도망친데 바보!」
				PRINTFORML 「…………하아……바보」
			ELSEIF 함락상태() == 3
				PRINTFORML 「볼 만큼 봐 도망!」
				PRINTFORML 「……정말 시시한응이니까」
			ELSEIF 함락상태() == 2
				PRINTFORML 「어차피라면 그대로 H 해, 심술쟁이!」
			ELSEIF 함락상태() == 1
				PRINTFORML 「…………, 꺄아악 아앗!」
			ELSE
				PRINTFORML 「꺄아악!」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;그대로 속행
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF 함락상태() >= 4
				PRINTFORML 「으로로로, 할 수 있을 리가 없잖아요!　이 색골!」
				PRINTFORML 「…………그렇게 보고 싶어?　……이 H」
				PRINTFORML 「응, 하아……, 나, 그런 보지 마, 는 정말%MASTERNAME:61%의 바보」
			ELSEIF 함락상태() == 3
				PRINTFORML 「, 말하지 말아, 변태」
				PRINTFORML 「……그렇지만, 그렇게, 말한다면……, 응 으음, 은, 흐응, 으응」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;추방
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORML 「빨리 나가지 않으면 태우니까요!」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;해 치운다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF 함락상태() >= 4
				PRINTFORML 「그, 그러니까, 농담, 이지요?　그런데?」
				PRINTFORML 「……에 또, 그,……%MASTERNAME:61%로 되고 싶다고 생각했지만……」
				PRINTFORML 「그렇지만, 이런 건은, 그……, 응……좋은, 」
			ELSEIF 함락상태() == 3
				PRINTFORML 「인가, 돌아가는 정말……, 은 무슨 짓 할 생각?」
				PRINTFORML 「……그렇다면, 그, 이 흐르고 말하자 될지도 모르지만, 그렇지만, 그런……」
			ELSE
				PRINTFORML 「……H, 색골, 변태, 바보」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;사후
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF 함락상태() >= 4
				PRINTFORML 「%MASTERNAME:61%의 색골……, 하아하아……, 정말로, 응, H야, 로부터」
				PRINTFORML 「내가 귀엽기 때문에 나쁜, 은……,……%MASTERNAME:61%에 사랑스럽다고 말해지는 것은, 기쁜, 이지만」
				PRINTFORML 「이런 것은 아무쪼록이라고 생각한다, 지만……, 하아, 후우」
			ELSEIF 함락상태() == 3
				PRINTFORML 「후우, 후우……, 이제, 한계. 정말, 색골, 이니까」
				PRINTFORML 「궁상스러운 나 같은 것 보다……, 아, 미안, 실례, 였다……」
			ELSE
				PRINTFORML 「아, 응…………하아…………는…………」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 6
		;사후숙박
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF 함락상태() >= 4
				PRINTFORML 「……색골, 바보, 변태……, 심술궂어」
				PRINTFORML 「어차피라면, 묵어 가」
				PRINTFORML 「……H인 일, 좀 더 하고 싶은거 아니야」
			ELSEIF 함락상태() == 3
				PRINTFORML 「하아, 하아……, 응, 좋았으면, 묵어 가며」
				PRINTFORML 「……아직, %마스터와% 떨어지고 싶지 않다……」
			ENDIF
		ENDIF
	ENDSELECT
ENDIF

;==================================================
;상대에게서 데이트의 권유
;==================================================
@M_KOJO_EVENT_K61_27(ARG, ARG:1)
;말 주인은 LOCAL
;ARG:1은 목적지
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;권해 불만
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF 함락상태() >= 4
				PRINTFORML 「아, %MASTERNAME:61%. 좋았으면, 데이트 하지 않아?」
				PRINTFORML 「후후,%MASTERNAME:61%과 외출하고 싶은 기분이야」
				PRINTFORML 「어때?」
			ELSEIF 함락상태() == 3
				PRINTFORML 「아, %CALLNAME:MASTER%……」
				PRINTFORML 「저기, 괜찮다면, 함께 나가지 않아?」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;받았다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF 함락상태() >= 4
				PRINTFORML 「……좋았다, 거절당할까하고 생각했다」
				PRINTFORML 「%MASTERNAME:61%는 변덕스럽다 것, 그렇게 생각되어도 이상하지 않겠지요」
				PRINTFORML 「그러면 갈까, 후후, 데이트 데이트, 굉장히 기다려져」
			ELSEIF 함락상태() == 3
				PRINTFORML 「후후, 고마워. 그러면 갈까」
				PRINTFORML 「……기쁘기 때문에 웃는 얼굴이 되고 있을 뿐」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;끊었다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF 함락상태() >= 4
				PRINTFORML 「……쳇, 심술궂어니까 」
				PRINTFORML 「그렇지 않으면, 나에 대한 것 질렸어?　싫게 되었어?」
				PRINTFORML 「%MASTERNAME:61%에 한해서, 그것은 없다고 알고 있지만」
			ELSEIF 함락상태() == 3
				PRINTFORML 「하아, 뭐, %CALLNAME:MASTER%에 대해서니까, 무료의 변덕스럽겠지지만」
				PRINTFORML 「모처럼의 권유를 거절당하는 것은, 너무 좋은 기분이 아니다」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;방에 이끌렸다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF 함락상태() >= 4
				PRINTFORML 「응%MASTERNAME:61%, 서서 이야기도야 해 나의 집에서 이야기해 않아?」
				PRINTFORML 「역시, 명째가 있는 곳(중) 이라는 것은, 조금 서투르고」
				PRINTFORML 「%MASTERNAME:61%가 싫으면 여기에서도 좋은데」
			ELSEIF 함락상태() == 3
				PRINTFORML 「선 채로 라는 것은, 어떻게든(어쩐지) 지치는군」
				PRINTFORML 「좋았으면 나의 집에 가지 않아?」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;방에 이끌린 것을 받았다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF 함락상태() >= 4
				PRINTFORML 「고마워,%MASTERNAME:61%」
				PRINTFORML 「후후, 이것으로 안심해 천천히 할 수 있는군」
				PRINTFORML 「웃는 얼굴이 무서워?　후후, 기분탓이야」
			ELSEIF 함락상태() == 3
				PRINTFORML 「그러면, 갈까」
				PRINTFORML 「아아, 그리고, 즐거움은 집에 도착하고 나서니까」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;방에 이끌린 것을 끊었다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF 함락상태() >= 4
				PRINTFORML 「그러면, 짊어지지만 없는가」
				PRINTFORML 「%MASTERNAME:61%에 끈적끈적 응석부리고 싶었는데 」
				PRINTFORML 「여기서는 할 수 없으니까」
			ELSEIF 함락상태() == 3
				PRINTFORML 「지치지 않는 것, 괜찮아?」
				PRINTFORML 「뭐, %마스터가% 좋으면 상관없는데」
			ENDIF
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;탈의 말
;==================================================
@M_KOJO_EVENT_K61_28(ARG, ARG:1)
;말 주인은 TARGET
;ARG에 탈이 하는 방법 선택
;ARG:1(ARG=3의 경우만 있어) 지문의 반응
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;전라로 한다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			;시간정지시
			IF FLAG:70
			;통상
			ELSE
				IF 함락상태() >= 4
					PRINTFORML 「변함없이, %MASTERNAME:61%의 몸은 \@ TALENT:성별 == 2 ? 멋지 # 예쁘 \@구나」
					PRINTFORML 「……내 쪽은 변함없이 궁상스럽지만」
					PRINTFORML 「…………이런 궁상스러운 몸으로도 기뻐해 주어서 기뻐」
				ELSEIF 함락상태() == 3
					PRINTFORML 「궁상스러운 몸이라 미안해」
					PRINTFORML 「그런데도 깨끗하다고 말해준 사람, %CALLNAME:MASTER% 정도구나」
				ELSEIF 함락상태() == 2
					PRINTFORML 「……응, 볼 수 있는 것, 부끄러워. 궁상스럽다 것」
				ELSEIF 함락상태() == 1
					PRINTFORML 「…………이런 궁상스러운 몸 봐, 즐거워?」
				ELSE
					PRINTFORML 「………………하아」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;속옷 모습으로 한다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			;시간정지시
			IF FLAG:70
			;통상
			ELSE
				IF 함락상태() >= 4
					PRINTFORML 「그러니까, 브라는 붙인 채로, 아래는 알몸은, 부끄러워응이지만」
					PRINTFORML 「……젖가슴 작기 때문에 보지만 보고 싶다고 끓어라?」
					PRINTFORML 「그래 없으면 어째서 이런……」
				ELSEIF 함락상태() == 3
					PRINTFORML 「……뭐,가슴에는 자신 없기 때문에, 이런 것도 있다고는 생각하는데」
					PRINTFORML 「……그렇지만, 브라는 붙여 아래는 벗겨졌다고, 대단히 변태 같다」
				ELSEIF 함락상태() == 2
					PRINTFORML 「궁상스러운 가슴보다는, 이쪽을 즐기고 싶어?　음란하다」
				ELSE
					PRINTFORML 「……변태」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;반라
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			;시간정지시
			IF FLAG:70
			;통상
			ELSE
				IF 함락상태() >= 4
					PRINTFORML 「……젖가슴 보고 싶은거야?」
					PRINTFORML 「그렇게 자신 없기 때문에, 이것 너무 좋아하지 않지만」
					PRINTFORML 「왠지, 굉장히 음란한 모습 하고 있는 생각이 들고」
				ELSEIF 함락상태() == 3
					PRINTFORML 「알몸 Y셔츠는 좋은 것이야?」
					PRINTFORML 「……변함없이, 변태구나. 뭐, 교제하는 나도 대개이지만 」
				ELSEIF 함락상태() == 2
					PRINTFORML 「후후, 이런 모습이 좋다니, 이상한 사람이구나」
				ELSE
					PRINTFORML 「……바보?」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;팬티 줘
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			SELECTCASE ARG:1
				;-------------------------------------------------
				CASE 0
				;교환입니다
				;기입 체크(=0, 비표시, 1, 표시)
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 1
				;OK(기쁨
				;기입 체크(=0, 비표시, 1, 표시)
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 2
				;OK(마지못해
				;기입 체크(=0, 비표시, 1, 표시)
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 3
				;싫습니다
				;기입 체크(=0, 비표시, 1, 표시)
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				RETURN 1
			ENDSELECT
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;분노 말
;==================================================
@M_KOJO_EVENT_K61_29(ARG, ARG:1)
;말 주인은 TARGET
;ARG는 TARGET의 담력으로 분기
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;화나게 해 버렸다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;울려 버렸다　[겁쟁이]소유
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;상대가 덮치기을 해제
;==================================================
@M_KOJO_EVENT_K61_30(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
	;지쳤다
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
	;만족해 해방
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
	;만족 하는 것을 밀어 넘어뜨려졌다
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
	;망가질 때까지 해 준다
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;하루의 종료시(AFTERTRA 무릎 관절의 전), 안면이 없으면 불려 가지 않는다
;==================================================
@M_KOJO_EVENT_K61_31(ARG, ARG:1)
;말 주인은 TARGET
;ARG는 만나지않은날짜
;며칠 이상 만나지 않았으면 푸념을 말한다든가 할 수 있습니다
;CFLAG:딸딸이들킴로 분기 들어갈 수 있어도 장점 그렇게
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;오늘 만나지 않았다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;오늘 만나고 있다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1

[SKIPSTART]
;-------------------------------------------------
;딸딸이들킴 만남시의 지문을 Default의 것으로부터 변경하고 싶은 경우용.
;그 경우는 상하의 SKIPSTART~SKIPEND를 제외해 주세요.
;CFLAG등의 캐릭터 변수를 사용하는 경우, 캐릭터 번호의 지정이 필요하게 됩니다.
;-------------------------------------------------
@M_KOJO_EVENT_K61_ONABARE_1(ARG)
;-------------------------------------------------
:말 첨가한다면 코멘트 아웃을 제외해 X를 캐릭터 번호에
;CALL M_KOJO_COLOR_K61

IF ARG
	PRINTFORML A 만지작거리고 있는 경우
ELSE
	PRINTFORML V 만지작거리고 있는 경우
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;딸딸이들킴로 그대로 계속해도 경우의 지문을 Default의 것으로부터 변경하고 싶은 경우용.
;그 경우는 상하의 SKIPSTART~SKIPEND를 제외해 주세요.
;CFLAG등의 캐릭터 변수를 사용하는 경우, 캐릭터 번호의 지정이 필요하게 됩니다.
;-------------------------------------------------
@M_KOJO_EVENT_K61_ONABARE_2(ARG)
;-------------------------------------------------
:말 첨가한다면 코멘트 아웃을 제외해 X를 캐릭터 번호에
;CALL M_KOJO_COLOR_K61

IF ARG
	PRINTFORML A 만지작거리고 있는 경우
ELSE
	PRINTFORML V 만지작거리고 있는 경우
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;딸딸이들킴 이루어 무너뜨려 크스의 지문을 Default의 것으로부터 변경하고 싶은 경우용.
;그 경우는 상하의 SKIPSTART~SKIPEND를 제외해 주세요.
;CFLAG등의 캐릭터 변수를 사용하는 경우, 캐릭터 번호의 지정이 필요하게 됩니다.
;-------------------------------------------------
@M_KOJO_EVENT_K61_ONABARE_3(전희1, 실전은어느쪽인가, 회수, 주입량)
;-------------------------------------------------
#DIM 전희1
;1=C 2=B 3=M
#DIM 실전은어느쪽인가
;0그리고 V, 1으로 A
#DIM 주입량
#DIM 회수

:말 첨가한다면 코멘트 아웃을 제외해 X를 캐릭터 번호에
;CALL M_KOJO_COLOR_K61

SELECTCASE 전희1
	CASE 1
		PRINTFORML C자극
	CASE 2
		PRINTFORML B자극
	CASE 3
		PRINTFORML M자극
ENDSELECT

IF 실전은어느쪽인가
	PRINTFORML A로 실전
ELSE
	PRINTFORML V로 실전
ENDIF
;-------------------------------------------------
[SKIPEND]

;-------------------------------------------------
;처녀·무자각비처녀에게 삽입하기 직전의 말
;RETURN 1하면(자) 커맨드를 캔슬합니다
;RETURN 0이라면 통합니다
;CFLAG:파과캔슬구상있음가 온이 되지 않으면 읽히지 않기 때문에 주의
;-------------------------------------------------
@M_KOJO_EVENT_K61_LOST_VIRGIN_STOP
;-------------------------------------------------
PRINTFORML
RETURN 1

;-------------------------------------------------
;CFLAG:구상내껴안기판정_첫회가 온이 되어 있는 경우만 유효.
;처음으로 덮치기시, 여기서 RETURN -1하면(자) 덮치기을 강제적으로 캔슬합니다.
;RETURN 0이라면 통상의 판정을 실시해, RETURN 1하면(자) 무조건 성공시킵니다.
;특정의 이벤트(데이트 돌아가 키스등)를 볼 때까지 우후후 할 수 없게 하고 싶을 때 등에 부디.
;-------------------------------------------------
@M_KOJO_EVENT_K61_PERMISSION_1
;-------------------------------------------------
PRINTFORML
;RETURN -1
RETURN 0
;RETURN 1
;-------------------------------------------------

;-------------------------------------------------
;CFLAG:구상내껴안기판정_통상이 온이 되어 있는 경우만 유효.
;합의 첨부로 덮치기시, 여기서 RETURN -1하면(자) 덮치기을 강제적으로 캔슬합니다.
;RETURN 0이라면 통상 대로 성공시킵니다.
;합의가 있어도 어떠한 이유로써 우후후 할 수 없게 하고 싶을 때 등에 부디.
;-------------------------------------------------
@M_KOJO_EVENT_K61_PERMISSION_2
;-------------------------------------------------
PRINTFORML
RETURN 0
;RETURN -1
;-------------------------------------------------

path: ERB/대사_메시지관련/개인대사/061 모코우/M_KOJO_K61_イベント_t.ERB