code:
;-------------------------------------------------
; eraTheWorld proto3. 97용 00말(캐릭터의 이름을 넣는, 아래에 컨셉 등 한마디 있으면 들어갈 수 있다)
;-------------------------------------------------
;※※※※※※다른 사람에 의한 수정, 가필, 개변에 대한 단서※※※※※※
;전제로서 오리지날 작자 이외가 손을 넣는 경우는, 오리지날 작자의 허가를 요구하는 것
;오리지날 작자와 컨택이 잡히지 않는 경우에는 이하의 단서에 따라 UP 할 수 있을지 어떨지 판단해 주세요.

;**** Copyright ****************************************************************
;본말의 수정에 대해(허가하는 행위만 남겨 주세요)
;【오자·탈자 수정】【분기 조건·erb 구문에 관한 수정】【본체 Ver·Rev 변경 대응】【플래그의 관리·수정】

;본말의 가필·개변에 대해(허가하는 행위만 남겨 주세요)
;【미기입 부위 가필】【랜덤 분기 가필】【기입필 부위 가필】【기입필 부위 삭제】【기입필 부위 코멘트 아웃】

;본말에 대한 정비 금지 시한에 대해(설정하지 않는 경우, 미설정만 남겨 주세요)
;【미설정】

;본말에 대한 그외단서
;【라이센스 프리】【무단에서도 가능】
;******************************************************************************
;**** FlagManagement **********************************************************
;본말에서 사용하고 있는 CFLAG·TCVAR등
;
;TCVAR:350, 인사했는지
;TCVAR:351, 달구경 했는지
;TCVAR:352, 날씨 회화
;TCVAR:353, 함께 만든 요리(FLAG:20을 보존)
;TCVAR:354, 연속 좀 더 키스 하는 제외 분기
;CFLAG:1001, 스킨십 커맨드 옵션
;CFLAG:1002, 당신이 고백을 털었다
;
;******************************************************************************

;PS 인의 사람
;오리지날 작자와 연락이 되지 않는 경우, 상기 Copyright에 따라 가필 개변을 실시해 주세요
;또 본체 처리·타말처리등에 간섭하는 이상 처리가 있는 경우로 오리지날 작자에 의한 수정이
;행해지지 않는·혹은 곤란한 경우, Copyright에 상관없이 한 마음에 의한 수정을 허가합니다
;그 때는 원처리를 삭제하지 않고 코멘트 아웃 해 수정 처리를 삽입해 주세요

;### 말존재 판정 ###################################
@M_KOJO_K63(ARG)
;여기서 RESULTS를 설정하면(자) 다른 동캐릭터 말을 돌진해져도 정상 동작한다.

;RESULTS = _TEST_

;(와)과 설정하면(자),"EVENT"계 이벤트라면
;M_KOJO_TEST_EVENT_K63_1()등으로 불리는…은 두. (미테스트 기능)
RETURN 1
;### 대사색깔판정 ###################################
@M_KOJO_COLOR_K63

;여기서 SETCOLOR 하는 것으로 말에 첨가할 수 있습니다
;예：SETCOLOR 0xC07070
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"계 이벤트(엑스트라 구문)
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K63
;초대면, 인사의 타이밍
;TALENT의 변경은 여기서 부디.

PRINTW 「아, 보이지 않는 인간」
PRINTL
PRINTW 「……흐응, 그래서 신사에 살아」
PRINTW 「나? 후후후……인가의 유명한 오니 요괴, “인랑”의 후예가 나, 이마이즈미카게로이야!」
PRINTW 「어떨까나? 무서웠어?」
PRINTW 「괜찮아요, 먹는 하지 않으니까」
PRINTW 「그렇다고는 해도 대단히 떠들썩한 신사가 된 원이군요 」
TCVAR:350 = 1
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"계 이벤트
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;데이트 오는 길에 First KISS(합의도 붙는다)
;==================================================
@M_KOJO_SPEVENT_K63_1(ARG, ARG:1)
;말 주인은 TARGET
;지문 표시
;CALL SPEVENT_MESSAGE_1(ARG, ARG:1)
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL && !FLAG:70 && (TALENT:사모 || TALENT:연모)
	PRINTFORMW 「응…%CALLNAME:MASTER%……」
	PRINTFORMW 「부탁이 있는 것…(들)물어 주는 것일까……」
	PRINTFORMW 「눈을 감아서……」
	PRINTL
	PRINTL [0]감는 [1]이나다
	INPUT
	IF !RESULT
		PRINTFORMW ――귓전으로 속삭이도록(듯이) 말을 이어간다
		PRINTL
		PRINTFORMW 「키스…합시다……」
		PRINTFORMW 「…………」
		PRINTFORMW 「……」
		PRINTFORMW 「…」
		PRINTW
		PRINTFORMW ――쭙
		PRINTW
		PRINTFORMW 「……」
		PRINTFORMW 「후후…고마워…%CALLNAME:MASTER%……」
		IF TALENT:MASTER:키스미경험
			PRINTFORMW 「%CALLNAME:MASTER%의 첫키스, 받아 버렸다」
		ELSEIF TALENT:키스미경험
			PRINTFORMW 「내, 첫키스…」
		ENDIF
		PRINTFORMW 「다시 이번에, 합시다♪」
	ELSE
		PRINTFORMW 「에……이제(벌써)……」
		PRINTFORMW 「…………」
		TCVAR:키스캔슬 = 1
	ENDIF
ELSE
	;키스를 캔슬하고 싶은 경우는 이하를 개방
	TCVAR:키스캔슬 = 1
ENDIF
RETURN 1

;==================================================
;데이트 오는 길에 고백(연인이 붙는다)
;==================================================
@M_KOJO_SPEVENT_K63_2(ARG, ARG:1)
;말 주인은 TARGET
;지문 표시
;CALL SPEVENT_MESSAGE_2(ARG, ARG:1)
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL && !FLAG:70 && TALENT:연모
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;고백 내용
	;이 고백 내용 표시 후에 받을지 어떨지의 선택분이 표시됩니다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		;첫회
		IF FIRSTTIME(1013)
			PRINTFORMW 「응, %CALLNAME:MASTER%」
			PRINTFORMW 「%마스터는%…그…여, 연인이라든지…있는걸까나?」
			PRINTFORMW 「……어머나, 없구나…그렇게…」
			PRINTFORMW 「…그……나, 나……」
			PRINTFORMW 「나, %CALLNAME:MASTER%의 일을…좋아하는!」
			PRINTL
			PRINTFORMW 「이, 이상한의는 알고 있는 원이야…」
			PRINTFORMW 「랑녀인데, 인간에게 사랑 해버린다는, 이상한 것……」
			PRINTFORMW 「그러니까 나 자신, 처음은 착각 이라도 타일렀어요……」
			PRINTFORMW 「그렇지만 의식하는 만큼…다르다고  생각하면 생각할수록……%CALLNAME:MASTER%의 일 바보 떠올라 버려서」
			PRINTFORMW 「이제(벌써)%CALLNAME:MASTER%의 일 밖에 생각할 수 없게 되어 버려서…그래서……」
			PRINTFORMW 「그래서…이제(벌써)…나 모르게 되어 버려서……」
			PRINTL
			PRINTFORMW 「그렇지만…오늘, %마스터와% 함께 있고 알았어요」
			PRINTFORMW 「나는 %CALLNAME:MASTER%의 일을 좋아해…이상한 이야기이지만,사실……」
			PRINTFORMW 「그러니까, 제발…%CALLNAME:MASTER%의 연인으로 있게 해……?」
		;단념하지 못한다
		ELSE
			PRINTFORMW 「응 %CALLNAME:MASTER%…」
			PRINTFORMW 「그…나, 군요……」
			PRINTFORMW 「역시 단념하지 못할의……%CALLNAME:MASTER%의 일을…좋아해……」
			PRINTFORMW 「전부터, 몇 번이나 단념하자, 잊으려고 했어……」
			PRINTFORMW 「그렇지만 안돼…아무래도 %마스터가% 떨어지지 않는다…」
			PRINTFORMW 「%CALLNAME:MASTER%이외의일이 아무것도 생각할 수 없는거야……」
			PRINTFORMW 「장황한 것은 알고 있는…보통은 없다는 것도 알고 있다……」
			PRINTFORMW 「그렇지만, 부탁……%CALLNAME:MASTER%의 연인이 되고 싶은거야……」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;고백 OK(연인이 붙는다)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTW
		PRINTFORMW 「……사실!」
		PRINTFORMW 「%CALLNAME:MASTER%, 정말로 좋은거야? 나, 랑녀야…?」
		PRINTFORMW 「……기쁘다…!나…훨씬……좋아했기 때문에……」
		PRINTFORMW 「쭉…%마스터와% 함께 주거지 싶었으니까…인정했으면 좋았으니까……」
		PRINTFORMW 「요괴이니까…랑녀이니까 안 되는 것이라면……」
		PRINTFORMW 「고마워요, %CALLNAME:MASTER%…고마워요……」
		PRINTFORMW 「지금부터…앞으로도 잘 부탁해, %CALLNAME:MASTER%…♪」
		;고백시에 경험이 들어가지 않는 것은 납득 가지 않기 때문에
		EXP:키스경험 ++
		EXP:MASTER:키스경험 ++
		EXP:애정경험 += 10
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;고백 실패
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	;에미 리아의 대사를 좋아해서 빌리고
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「그렇게…………그렇구나…」
		PRINTFORMW 「응……알았어요……」
		PRINTFORMW 「미안해요…무리한 일 말하며……」
		PRINTFORMW 「으응, 그렇게 말해질 것이라고는 생각하고 있기도 했고…」
		PRINTFORMW 「각오는 할 수 있고 있었기 때문에…괜찮아…괜찮아요……」
		PRINTFORMW 「그렇지만 조금, %CALLNAME:MASTER%, 나, 조금 운다……」
		PRINTW
		PRINTFORMW 「응, 괜찮아. 울어, 시원해졌어」
		PRINTFORMW 「자, 돌아갑시다……」
		;털어 두어 고백한다고 하는 제길 용플래그
		CFLAG:1002 = 1
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;데이트 돌아오는 길
;==================================================
@M_KOJO_SPEVENT_K63_3(ARG, ARG:1)
;말 주인은 TARGET
;지문 표시
CALL SPEVENT_MESSAGE_3(ARG, ARG:1)
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL && !FLAG:70
	;더부살이
	IF FLAG:더부살이캐릭터 == 63
		PRINTFORMW 「다녀왔습니다∼♪」
		IF RAND:2
			PRINTFORMW 「후후후, 데이트는 역시 즐겁네요♪」
		ELSE
			PRINTFORMW 「오늘도  즐거웠어요♪」
			PRINTFORMW 「내일은 다른 곳에 갑시다♪」
		ENDIF
	;연인
	ELSEIF TALENT:MASTER:연인 == NO:63 && TALENT:63:연인 == NO:63
		IF RAND:2
			PRINTFORMW 「이제(벌써), 시간 이군요…」
			PRINTFORMW 「어째서 %마스터와% 함께 있는 시간은」
			PRINTFORMW 「이렇게도 빨리 지나버리는 의 것인지 해들?」
		ELSE
		ENDIF
	;연모
	ELSEIF TALENT:연모
		IF RAND:2
			PRINTFORMW 「오늘의 데이트, 즐거웠어요♪」
			PRINTFORMW 「다시 데려가 줘?」
		ELSE
			PRINTFORMW 「후우…즐거워서 지쳐 버렸다」
			PRINTFORMW 「다시 가요, %CALLNAME:MASTER%」
		ENDIF
	;사모
	ELSEIF TALENT:사모
		IF RAND:2
			PRINTFORMW 「후후, 데이트, 즐거웠어요♪」
		ELSE
			PRINTFORMW 「후우…수고 하셨습니다」
			PRINTFORMW 「적당히 즐거웠어요」
		ENDIF
	;사모가 아니다
	ELSE
		PRINTFORMW 「후우…수고 하셨습니다」
	ENDIF
ENDIF
RETURN 1
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"계 이벤트
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;━━━━━━━━━━━━━━━━━━━━━━━━━━
;만월이 되면(자) 돌아가버린다(사라져버린다)
;외출중이라면 이동시켜도 왠지 돌아와버린다 것으로 동결
;━━━━━━━━━━━━━━━━━━━━━━━━━━
;@KAGEROU_ESCAPE
;PRINTW 카게로은 당황해 어딘가에 떠나 갔다…
;CFLAG:63:현재위치 = 99
;CFLAG:63:동실 = 0
;RETURN 1
;----------------------------------------------------
;━━━━━━━━━━━━━━━━━━━━━━━━━━
;==================================================
;방에서 만남
;==================================================
@M_KOJO_EVENT_K63_1(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;MASTER가 들어 왔다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	;-------------------------------------------------
	;TARGET가 들어 왔다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
;1, 2는 정리한다
;인사는 한번만
IF LOCAL && !FLAG:70 && LOCAL:1 && (ARG == 1 || ARG == 2) && !TCVAR:350
	;더부살이
	IF FLAG:더부살이캐릭터 == 63
		;만월의 날
		SELECTCASE DAY:3
		CASE 15
			;만월아래
			IF MOON_WATCH(DAY:3) == 9
				;게다가 중추의 명월
				SELECTCASE DAY:2
				CASE 3
					PRINTFORMW 「아, %CALLNAME:MASTER%……」
					PRINTFORMW 「오늘 밤은 그……보름이군요……」
					PRINTFORMW 「그, 함께 달구경 해 주어…?」
					PRINTFORML 「저, 정말은 부끄럽지만 %CALLNAME:MASTER%에라면」
					PRINTFORMW 「그대로의의 모습, 보았으면 좋은거야……」
					PRINTFORMW 「무엇인가 그……」
					PRINTFORMW 「아니요, 우선은 이대로 함께 달구경 합시다!」
					BASE:63:이성 = 0
					TCVAR:발정 = 1
				;보통 만월
				CASEELSE
					PRINTFORMW 「아, %CALLNAME:MASTER%……」
					PRINTFORMW 「봐, 오늘 밤은 만월이야」
					PRINTFORML 「부끄럽지만, %CALLNAME:MASTER%에라면…」
					PRINTFORMW 「지금의 나, 보았으면 좋은거야……」
					PRINTFORMW 「후후, 이런 일 생각한 일 없었으면무슨 이상하구나」
					BASE:63:이성 = 0
					TCVAR:발정 = 1
				ENDSELECT
			;아직 낮에 개이지 않았다
			ELSEIF TIME:2 >=1 && TIME:2 <= 4 && TIME:5 > 1
				PRINTFORMW 「아, %CALLNAME:MASTER%, 안녕」
				PRINTFORMW 「그……오늘 밤은 만월이군요……」
				PRINTFORMW 「 아직 날씨가 어떻게 될까 모르겠지만」
				PRINTFORMW 「만약 개이면(자) 나와 달구경 해 주어?」
				$HALLELUJAH_INPUT_LOOP_4
				PRINTL [0] 개이면(자)
				PRINTL [1] 조금 바쁘다
				INPUT
				SELECTCASE RESULT
				;《월무/Moonmist》
				CASE 0
					PRINTFORMW 「사실!」
					PRINTFORML 「자 어쩔 수 없네요……」
					PRINTFORMW 「소중한 주문(스펠) 카드를 사용할 때가 왔어요!」
					PRINTL
					PRINTFORMW 카게로은 그늘에 숨으면(자), 무엇인지 보아서 익숙하지 않는 스펠 카드를 꺼내 주문을 주창했다.
					PRINTFORML 그 순간, 근처가 은빛에 빛나는 안개에 싸여 밤이 되었다고 생각하면(자)
					PRINTFORMW 빛이 소용돌이쳐, 튀어 이윽고 안개가 개이면(자) 카게로이 모습을 나타냈다.
					PRINTFORMW 눈치채면(자) 천개에는 찬들과 빛나는 태양이 뜨고 있다.
					PRINTL
					PRINTFORMW 「후후후…모두에게는 비밀♪」
					PRINTFORMW 「자, 보름을 즐깁시다」
					TIME:5 = 1
				CASE 1
					PRINTFORMW 「……그렇게…」
					PRINTFORMW 「아무튼 이런 날씨그럼…무리 말해 미안해요」
					PRINTFORMW 「아, 신경쓰지 않기 때문에 괜찮아요」
				CASEELSE
					GOTO HALLELUJAH_INPUT_LOOP_4
				ENDSELECT
			;아직 낮
			ELSEIF TIME:2 >=1 && TIME:2 <= 4
				PRINTFORMW 「아, %CALLNAME:MASTER%, 안녕」
				PRINTFORMW 「그……오늘 밤은 만월이군요……」
				PRINTFORMW 「 아직 날씨가 어떻게 될까 모르겠지만」
				PRINTFORMW 「우선 개이는 것을 빕시다」
			;밤이지만 개이지 않았다
			ELSEIF TIME:5 > 1
				;중추의 명월
				SELECTCASE DAY:2
				CASE 3
					PRINTFORMW 「아, %CALLNAME:MASTER%…」
					PRINTFORMW 「모처럼의 보름인데, 공교로움의 날씨군요……」
					PRINTFORMW 「응%CALLNAME:MASTER%, 만약 개이면(자) 나와 달구경 해 주어?」
					$HALLELUJAH_INPUT_LOOP_1
					PRINTL [0] 개이면(자)
					PRINTL [1] 조금 바쁘다
					INPUT
					SELECTCASE RESULT
					;《월무/Moonmist》
					CASE 0
						PRINTFORMW 「사실!」
						PRINTFORML 「자 어쩔 수 없네요……」
						PRINTFORMW 「소중한 주문(스펠) 카드를 사용할 때가 왔어요!」
						PRINTL
						PRINTFORMW 카게로은 그늘에 숨으면(자), 무엇인지 보아서 익숙하지 않는 스펠 카드를 꺼내 주문을 주창했다.
						PRINTFORML 그 순간, 근처가 은빛에 빛나는 안개에 싸였는지라고 생각하면(자)
						PRINTFORMW 빛이 소용돌이쳐, 튀어 이윽고 안개가 개이면(자) 카게로이 모습을 나타냈다.
						PRINTFORML 눈치채면(자) 천개에는 찬들과 빛나는 만월이 올라
						PRINTFORMW 거기로부터는 상냥하고 희미한 금빛의 빛이 비치고 있었다.
						PRINTL
						PRINTFORMW 「후후후…모두에게는 비밀♪」
						PRINTFORMW 「자, 보름을 즐깁시다」
						TIME:5 = 1
					CASE 1
						PRINTFORMW 「……그렇게…」
						PRINTFORMW 「아무튼 이런 날씨그럼…무리 말해 미안해요」
						PRINTFORMW 「아, 신경쓰지 않기 때문에 괜찮아요」
					CASEELSE
						GOTO HALLELUJAH_INPUT_LOOP_1
					ENDSELECT
				;보통 만월
				CASEELSE
					PRINTFORMW 「아, %CALLNAME:MASTER%, 안녕하세요」
					PRINTFORMW 「모처럼의 만월인데, 공교로움의 날씨군요……」
					PRINTFORML 「……아무튼 일종의 생리주기이니까」
					PRINTFORMW 「변신은 할 수 있고, 지금도 어중간하게 털이……」
					PRINTFORMW 「그건,  어디 봐!」
				ENDSELECT
			;밤에 개여 있지만 실내(가을)
			ELSEIF DAY:2 == 3
				PRINTFORMW 「아, %CALLNAME:MASTER%……」
				PRINTFORMW 「오늘 밤은 그……보름이군요……」
				PRINTFORMW 「그, 함께 달구경 해 주어…?」
				PRINTFORML 「저, 정말은 부끄럽지만 %CALLNAME:MASTER%에라면」
				PRINTFORMW 「그대로의의 모습, 보여도 상관없어요……」
				PRINTFORMW 「무엇인가 그……」
				PRINTFORMW 「아니요, 우선은 함께 달구경 합시다!」
			;밤에 개여 있지만 실내
			ELSE
				PRINTFORMW 「아…%CALLNAME:MASTER%……」
				PRINTFORMW 「응, 오늘 밤은 만월이야」
				PRINTFORML 「부끄럽지만, %CALLNAME:MASTER%에라면…」
				PRINTFORMW 「지금의 나, 볼 수 있어도 괜찮을까 하고……」
				PRINTFORMW 「그렇지만 그……」
				PRINTFORMW 「아니요, 별것 아니야!」
			ENDIF
		;만월 이외의날
		CASEELSE
			SELECTCASE TIME:2
			;아침은 자고 있는 로 죽어 분기입니다만
			CASE 1, 2
				PRINTFORMW 「안녕∼…」
				PRINTFORMW 「아침부터 건강하구나 ……」
				PRINTFORMW 「사조는 골칫거리……」
			;주
			CASE 3,4
				PRINTFORMW 「아 %CALLNAME:MASTER%, 안녕!」
				PRINTFORMW 「점심은 하루의 시작이니까」
			SIF TIME:0 < 901
				PRINTFORMW 「……후아∼…졸리다……」
			;밤은 분기
			CASE 5 TO 7
				SELECTCASE TIME:0
				;19~22시
				CASE 1140 TO 1320
					SELECTCASE TIME:3
					;18시 이후 일어나기
					CASE 1080 TO 1320
						PRINTFORMW 「아 %CALLNAME:MASTER%, 안녕!」
						PRINTFORMW 「후후, 당신은 야형의 인간이니까」
						PRINTFORMW 「설마 무리하고 나에 맞추지 않아?」
						PRINTFORML 「, 기쁘지만, 건강에는 좋지 않기 때문에」
						PRINTFORMW 「적당히 해 몸을 위로해 주세요」
					;아사～ 낮일어나기
					CASEELSE
						PRINTFORMW 「아 %CALLNAME:MASTER%, 안녕하세요!」
						PRINTFORMW 「후후, 날도 떨어져 밤의 시작이군요」
					ENDSELECT
				;22~28시
				CASEELSE
					SELECTCASE TIME:3
					;22~27시 일어나기
					CASE 1320 TO 1440,0 TO 180
						PRINTFORMW 「아 %CALLNAME:MASTER%, 안녕!」
						PRINTFORMW 「후후, 당신은 밤의 인간이니까」
						PRINTFORMW 「설마 무리하고 나에 맞추지 않아?」
						PRINTFORMW 「, 기쁘지만, 분명히 이 시간에 일어나는 것은 좋지 않아요」
						PRINTFORMW 「나라도 다소 낮 이라도 보내」
					CASEELSE
						PRINTFORMW 「아 %CALLNAME:MASTER%, 안녕하세요!」
						PRINTFORMW 「완전히 밤도 깊어진 원이군요」
						PRINTFORMW 「여기에서는 요괴의 시간이니까, %마스터는% 너무 돌아 다니지 않는 것이 좋다고 생각해요」
					ENDSELECT
				ENDSELECT
			ENDSELECT
		ENDSELECT

	;연모
	ELSEIF TALENT:연모
		;만월의 날
		SELECTCASE DAY:3
		CASE 15
			;만월아래
			IF MOON_WATCH(DAY:3) == 9
				;게다가 중추의 명월
				SELECTCASE DAY:2
				CASE 3
					PRINTFORMW 「아…%CALLNAME:MASTER%……」
					PRINTFORMW 「오늘 밤은 그……보름이군요……」
					PRINTFORML 「저, 정말은 부끄럽지만 %마스터와%라면…」
					PRINTFORMW 「함께 보름을 즐기고 싶다는……」
					PRINTFORMW 「무엇인가 그……」
					PRINTFORML 「아니!별것 아니야!」
					PRINTFORMW 「그런 일보다, 이대로 함께 달구경 합시다!」
					BASE:63:이성 = 0
					TCVAR:발정 = 1
				;보통 만월
				CASEELSE
					PRINTFORMW 「아…%CALLNAME:MASTER%……」
					PRINTFORMW 「봐, 오늘 밤은 만월이야……」
					PRINTFORML 「부끄럽지만, %CALLNAME:MASTER%에라면…」
					PRINTFORMW 「지금의 나, 보여도 괜찮을까 하고……」
					PRINTFORMW 「그렇지만 그……」
					PRINTFORMW 「아니요, 별것 아니야!」
					BASE:63:이성 = 0
					TCVAR:발정 = 1
				ENDSELECT
			;아직 낮에 개이지 않았다
			ELSEIF TIME:2 >=1 && TIME:2 <= 4 && TIME:5 > 1
				PRINTFORMW 「아, %CALLNAME:MASTER%, 안녕」
				PRINTFORMW 「그……오늘 밤은 만월이군요……」
				PRINTFORMW 「 아직 날씨가 어떻게 될까 모르겠지만」
				PRINTFORMW 「만약 개이면(자) 나와 달구경 해 주어?」
				$HALLELUJAH_INPUT_LOOP_5
				PRINTL [0] 개이면(자)
				PRINTL [1] 조금 바쁘다
				INPUT
				SELECTCASE RESULT
				;《월무/Moonmist》
				CASE 0
					PRINTFORMW 「사실!」
					PRINTFORML 「자 어쩔 수 없네요……」
					PRINTFORMW 「소중한 주문(스펠) 카드를 사용할 때가 왔어요!」
					PRINTL
					PRINTFORMW 카게로은 그늘에 숨으면(자), 무엇인지 보아서 익숙하지 않는 스펠 카드를 꺼내 주문을 주창했다.
					PRINTFORML 그 순간, 근처가 은빛에 빛나는 안개에 싸여 밤이 되었다고 생각하면(자)
					PRINTFORMW 빛이 소용돌이쳐, 튀어 이윽고 안개가 개이면(자) 카게로이 모습을 나타냈다.
					PRINTFORMW 눈치채면(자) 천개에는 찬들과 빛나는 태양이 뜨고 있다.
					PRINTL
					PRINTFORMW 「후후후…모두에게는 비밀♪」
					PRINTFORMW 「자, 보름을 즐깁시다」
					TIME:5 = 1
				CASE 1
					PRINTFORMW 「……그렇게…」
					PRINTFORMW 「아무튼 이런 날씨그럼…무리 말해 미안해요」
					PRINTFORMW 「아, 신경쓰지 않기 때문에 괜찮아요」
				CASEELSE
					GOTO HALLELUJAH_INPUT_LOOP_5
				ENDSELECT
			;아직 낮
			ELSEIF TIME:2 >=1 && TIME:2 <= 4
				PRINTFORMW 「아…%CALLNAME:MASTER%……그…안녕……」
				PRINTFORMW 「……네? 무슨 일인가 있었던 거야는?」
				PRINTFORMW 「벼, 별로 아무래도 하지 않아요, 하하하…」
			;밤이지만 개이지 않았다
			ELSEIF TIME:5 > 1
				;중추의 명월
				SELECTCASE DAY:2
				CASE 3
					PRINTFORMW 「아, %CALLNAME:MASTER%, 안녕하세요」
					PRINTFORMW 「모처럼의 보름인데, 공교로움의 날씨군요……」
					PRINTFORMW 「응%CALLNAME:MASTER%, 만약 개이면(자) 나와 달구경 해 주어?」
					$HALLELUJAH_INPUT_LOOP_2
					PRINTL [0] 개이면(자)
					PRINTL [1] 조금 바쁘다
					INPUT
					SELECTCASE RESULT
					;《월무/Moonmist》
					CASE 0
						PRINTFORMW 「사실!」
						PRINTFORML 「자 어쩔 수 없네요……」
						PRINTFORMW 「소중한 주문(스펠) 카드를 사용할 때가 왔어요!」
						PRINTL
						PRINTFORMW 카게로은 그늘에 숨으면(자), 무엇인지 보아서 익숙하지 않는 스펠 카드를 꺼내 주문을 주창했다.
						PRINTFORML 그 순간, 근처가 은빛에 빛나는 안개에 싸였는지라고 생각하면(자)
						PRINTFORMW 빛이 소용돌이쳐, 튀어 이윽고 안개가 개이면(자) 카게로이 모습을 나타냈다.
						PRINTFORML 눈치채면(자) 천개에는 찬들과 빛나는 만월이 올라
						PRINTFORMW 거기로부터는 상냥하고 희미한 금빛의 빛이 비치고 있었다.
						PRINTL
						PRINTFORMW 「후후후…모두에게는 비밀♪」
						PRINTFORMW 「자, 보름을 즐깁시다」
						TIME:5 = 1
					CASE 1
						PRINTFORMW 「……그렇게…」
						PRINTFORMW 「아무튼 이런 날씨그럼…무리 말해 미안해요」
						PRINTFORMW 「아, 신경쓰지 않기 때문에 괜찮아요」
					CASEELSE
						GOTO HALLELUJAH_INPUT_LOOP_2
					ENDSELECT
				;보통 만월
				CASEELSE
					PRINTFORMW 「아, %CALLNAME:MASTER%, 안녕하세요(싱글벙글)」
					PRINTFORMW 「오늘 밤은 공교로움의 형세군요(싱글벙글)」
					PRINTFORML 「……아무튼 일종의 생리주기이니까」
					PRINTFORMW 「가까스로 억제 당하는 정도이지만……」
				ENDSELECT
			;밤에 개여 있지만 실내(가을)
			ELSEIF DAY:2 == 3
				PRINTFORMW 「아…%CALLNAME:MASTER%……」
				PRINTFORMW 「오늘 밤은 그……보름이군요……」
				PRINTFORML 「저, 정말은 부끄럽지만 %마스터와%라면…」
				PRINTFORMW 「함께 보름을 즐기고 싶다는……」
				PRINTFORMW 「무엇인가 그……」
				PRINTFORML 「아니!별것 아니야!」
				PRINTFORMW 「그런 일보다, 함께 달구경 합시다!」
			;밤에 개여 있지만 실내
			ELSE
				PRINTFORMW 「아…%CALLNAME:MASTER%……」
				PRINTFORMW 「응, 오늘 밤은 만월이야……」
				PRINTFORML 「부끄럽지만, %CALLNAME:MASTER%에라면…」
				PRINTFORMW 「지금의 나, 보여도 괜찮을까 하고……」
				PRINTFORMW 「그렇지만 그……」
				PRINTFORMW 「아니요, 별것 아니야!」
			ENDIF
		;만월 이외의날
		CASEELSE
			SELECTCASE TIME:2
			;아침은 자고 있는 로 죽어 분기입니다만
			CASE 1,2
				PRINTFORMW 「안녕∼…」
				PRINTFORMW 「아침부터 건강하구나 ……」
				PRINTFORMW 「사조는 골칫거리……」
			;주
			CASE 3,4
				PRINTFORMW 「아, 안녕!」
				PRINTFORMW 「네? 이제(벌써) 점심?」
				PRINTFORMW 「나에게 있어서 점심은 하루의 시작이야!」
			;밤은 분기
			CASE 5,6,7
				SELECTCASE TIME:0
				;19~22시
				CASE 1140 TO 1320
					PRINTFORMW 「안녕하세요∼！」
					PRINTFORMW 「후후후…완전히 날도 떨어졌고, 여기에서는 나의 시간이네요……」
				;22~28시
				CASEELSE
					PRINTFORMW 「이런 시간에 안녕하세요∼！」
					PRINTFORMW 「완전히 밤도 깊어졌고, 이제 인간의 시간은 아니어요?」
					PRINTFORMW 「설마 일어난 바보가 아니겠지요……」
				ENDSELECT
			ENDSELECT
		ENDSELECT

	;연모가 아니다
	ELSE
	;	;만월의 날
	;	SELECTCASE DAY:3
	;	CASE 15
	;		;만월아래
	;		IF MOON_WATCH(DAY:3) == 9
	;			PRINTFORMW 「꺄아! %CALLNAME:MASTER%!」
	;			PRINTFORML
	;			PRINTFORML 드!
	;			PRINTFORMW
	;			PRINTFORMW 눈앞이 깜깜하게 되었다!
	;		;아직 낮or밤이지만 개이지 않았다
	;		ELSEIF TIME:2 >=1 && TIME:2 <= 4 || TIME:5 > 1
	;			PRINTFORMW 「!당신은 %CALLNAME:MASTER%!」
	;		;밤에 개여 있지만 실내
	;		ELSE
	;			PRINTFORMW 「꺄아! %CALLNAME:MASTER%!」
	;			PRINTFORML
	;			PRINTFORML 드!
	;			PRINTFORMW
	;			PRINTFORMW 눈앞이 깜깜하게 되었다!
	;		ENDIF
	;		CALL KAGEROU_ESCAPE
	;	;그 이외의날
	;	CASEELSE
			SELECTCASE TIME:2
			;아침은 자고 있는 로 죽어 분기입니다만
			CASE 1,2
				PRINTFORMW 「안녕∼…」
				PRINTFORMW 「아침부터 건강하구나 ……」
				PRINTFORMW 「사조는 골칫거리……」
			;주
			CASE 3,4
				PRINTFORMW 「아, 안녕!」
				PRINTFORMW 「네? 이제(벌써) 점심?」
				PRINTFORMW 「나에게 있어서 점심은 하루의 시작이야!」
			;밤은 분기
			CASE 5,6,7
				SELECTCASE TIME:0
				;19~22시
				CASE 1140 TO 1320
					PRINTFORMW 「안녕하세요∼！」
					PRINTFORMW 「후후후…완전히 날도 떨어졌고, 여기에서는 요괴의 시간이네요……」
					PRINTFORMW 「%마스터는% 벌써 자면(자)?」
				;22~28시
				CASEELSE
					PRINTFORMW 「이런 시간에 안녕하세요∼！」
					PRINTFORMW 「완전히 밤도 깊어졌고, 이제 인간의 시간은 아니어요?」
					PRINTFORMW 「설마 일어난 바보가 아니겠지요……」
				ENDSELECT
			ENDSELECT
	;	ENDSELECT
	ENDIF
	TCVAR:350 = 1
	RETURN 1
ENDIF
RETURN 1

;==================================================
;아침에 일어 났을 때(안녕 말)
;==================================================
@M_KOJO_EVENT_K63_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 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER 방에 TARGET가 들어 오고 있다(연모 없음에서도 들어 올 가능성 있어
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		;공통
		CALL 카게로기상
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;동거(同棲) 한편 상대가 일어나고 있다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		CALL 카게로기상
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;동거(同棲) 한편 상대가 자고 있다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTER가 일어나고 있어, 상대가 일어났다
	;동침 때 TARGET 기상은 이쪽(TARGET 쇠약 or 동침중TARGET 피곤함 패배 후 그대로 MASTER가 계속 일어난 다음 상대가 기상했을 경우 한정
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;-------------------------------------------------
		;비동거(同棲)
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;동거(同棲) 안
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1
;카게로은 특수해서, 함수화
@카게로기상
;만월의 날
	SELECTCASE DAY:3
	CASE 15
		;만월아래
		IF MOON_WATCH(DAY:3) == 9
			;게다가 중추의 명월
			SELECTCASE DAY:2
			CASE 3
				PRINTFORMW 「아, %CALLNAME:MASTER%안녕……」
				PRINTFORMW 「오늘 밤은 그……보름이군요……」
				PRINTFORMW 「그, 함께 달구경 해 주어…?」
				PRINTFORML 「저, 정말은 부끄럽지만 %CALLNAME:MASTER%에라면」
				PRINTFORMW 「그대로의의 모습, 보았으면 좋은거야……」
				PRINTFORMW 「무엇인가 그……」
				PRINTFORMW 「아니요, 우선은 이대로 함께 달구경 합시다!」
				BASE:63:이성 = 0
				TCVAR:발정 = 1
			;보통 만월
			CASEELSE
				PRINTFORMW 「아, %CALLNAME:MASTER%안녕……」
				PRINTFORMW 「봐, 오늘 밤은 만월이야」
				PRINTFORML 「부끄럽지만, %CALLNAME:MASTER%에라면…」
				PRINTFORMW 「지금의 나, 보았으면 좋은거야……」
				PRINTFORMW 「후후, 이런 일 생각한 일 없었으면무슨 이상하구나」
				BASE:63:이성 = 0
				TCVAR:발정 = 1
			ENDSELECT
		;아직 낮에 개이지 않았다
		ELSEIF TIME:2 >=1 && TIME:2 <= 4 && TIME:5 > 1
			PRINTFORMW 「아, %CALLNAME:MASTER%, 안녕」
			PRINTFORMW 「그……오늘 밤은 만월이군요……」
			PRINTFORMW 「 아직 날씨가 어떻게 될까 모르겠지만」
			PRINTFORMW 「만약 개이면(자) 나와 달구경 해 주어?」
			$HALLELUJAH_INPUT_LOOP_3
			PRINTL [0] 개이면(자)
			PRINTL [1] 조금 바쁘다
			INPUT
			SELECTCASE RESULT
			;《월무/Moonmist》
			CASE 0
			PRINTFORMW 「사실!」
			PRINTFORML 「자 어쩔 수 없네요……」
			PRINTFORMW 「소중한 주문(스펠) 카드를 사용할 때가 왔어요!」
			PRINTL
			PRINTFORMW 카게로은 그늘에 숨으면(자), 무엇인지 보아서 익숙하지 않는 스펠 카드를 꺼내 주문을 주창했다.
			PRINTFORML 그 순간, 근처가 은빛에 빛나는 안개에 싸여 밤이 되었다고 생각하면(자)
			PRINTFORMW 빛이 소용돌이쳐, 튀어 이윽고 안개가 개이면(자) 카게로이 모습을 나타냈다.
			PRINTFORMW 눈치채면(자) 천개에는 찬들과 빛나는 태양이 뜨고 있다.
			PRINTL
			PRINTFORMW 「후후후…모두에게는 비밀♪」
			PRINTFORMW 「자, 보름을 즐깁시다」
			TIME:5 = 1
			CASE 1
				PRINTFORMW 「……그렇게…」
				PRINTFORMW 「아무튼 이런 날씨그럼…무리 말해 미안해요」
				PRINTFORMW 「아, 신경쓰지 않기 때문에 괜찮아요」
			CASEELSE
				GOTO HALLELUJAH_INPUT_LOOP_3
			ENDSELECT
		;아직 낮
		ELSEIF TIME:2 >=1 && TIME:2 <= 4
			PRINTFORMW 「아, %CALLNAME:MASTER%, 안녕」
			PRINTFORMW 「그……오늘 밤은 만월이군요……」
			PRINTFORMW 「 아직 날씨가 어떻게 될까 모르겠지만」
			PRINTFORMW 「우선 개이는 것을 빕시다」
		;밤이지만 개이지 않았다
		ELSEIF TIME:5 > 1
			;중추의 명월
			SELECTCASE DAY:2
			CASE 3
				PRINTFORMW 「아, %CALLNAME:MASTER%안녕…」
				PRINTFORMW 「모처럼의 보름인데, 공교로움의 날씨군요……」
				PRINTFORMW 「응%CALLNAME:MASTER%, 만약 개이면(자) 나와 달구경 해 주어?」
				$HALLELUJAH_INPUT_LOOP_2
				PRINTL [0] 개이면(자)
				PRINTL [1] 조금 바쁘다
				INPUT
				SELECTCASE RESULT
				;《월무/Moonmist》
				CASE 0
					PRINTFORMW 「사실!」
					PRINTFORML 「자 어쩔 수 없네요……」
					PRINTFORMW 「소중한 주문(스펠) 카드를 사용할 때가 왔어요!」
					PRINTL
					PRINTFORMW 카게로은 그늘에 숨으면(자), 무엇인지 보아서 익숙하지 않는 스펠 카드를 꺼내 주문을 주창했다.
					PRINTFORML 그 순간, 근처가 은빛에 빛나는 안개에 싸였는지라고 생각하면(자)
					PRINTFORMW 빛이 소용돌이쳐, 튀어 이윽고 안개가 개이면(자) 카게로이 모습을 나타냈다.
					PRINTFORML 눈치채면(자) 천개에는 찬들과 빛나는 만월이 올라
					PRINTFORMW 거기로부터는 상냥하고 희미한 금빛의 빛이 비치고 있었다.
					PRINTL
					PRINTFORMW 「후후후…모두에게는 비밀♪」
					PRINTFORMW 「자, 보름을 즐깁시다」
					TIME:5 = 1
				CASE 1
					PRINTFORMW 「……그렇게…」
					PRINTFORMW 「아무튼 이런 날씨그럼…무리 말해 미안해요」
					PRINTFORMW 「아, 신경쓰지 않기 때문에 괜찮아요」
				CASEELSE
				GOTO HALLELUJAH_INPUT_LOOP_2
				ENDSELECT
			;보통 만월
			CASEELSE
				PRINTFORMW 「아, %CALLNAME:MASTER%, 안녕」
				PRINTFORMW 「모처럼의 만월인데, 공교로움의 날씨군요……」
				PRINTFORML 「……아무튼 일종의 생리주기이니까」
				PRINTFORMW 「변신은 할 수 있고, 지금도 어중간하게 털이……」
				PRINTFORMW 「그건,  어디 봐!」
			ENDSELECT
		;밤에 개여 있지만 실내(가을)
		ELSEIF DAY:2 == 3
			PRINTFORMW 「아, %CALLNAME:MASTER%안녕……」
			PRINTFORMW 「오늘 밤은 그……보름이군요……」
			PRINTFORMW 「그, 함께 달구경 해 주어…?」
			PRINTFORML 「저, 정말은 부끄럽지만 %CALLNAME:MASTER%에라면」
			PRINTFORMW 「그대로의의 모습, 보여도 상관없어요……」
			PRINTFORMW 「무엇인가 그……」
			PRINTFORMW 「아니요, 우선은 함께 달구경 합시다!」
		;밤에 개여 있지만 실내
		ELSE
			PRINTFORMW 「아…%CALLNAME:MASTER%안녕……」
			PRINTFORMW 「응, 오늘 밤은 만월이야」
			PRINTFORML 「부끄럽지만, %CALLNAME:MASTER%에라면…」
			PRINTFORMW 「지금의 나, 볼 수 있어도 괜찮을까 하고……」
			PRINTFORMW 「그렇지만 그……」
			PRINTFORMW 「아니요, 별것 아니야!」
		ENDIF
	;그 이외의날
	CASEELSE
		SELECTCASE TIME:2
		;아침은 자고 있는 로 죽어 분기입니다만
		CASE 1,2
			PRINTFORMW 「안녕∼…」
			PRINTFORMW 「아침부터 건강하구나 ……」
			PRINTFORMW 「사조는 골칫거리……」
		;주
		CASE 3,4
			PRINTFORMW 「아 %CALLNAME:MASTER%, 안녕!」
			PRINTFORMW 「점심은 하루의 시작이니까」
		SIF TIME:0 < 901
			PRINTFORMW 「……후아∼…졸리다……」
		;밤은 분기
		CASE 5,6,7
			SELECTCASE TIME:0
			;19~22시
			CASE 1140 TO 1320
				SELECTCASE TIME:3
				;18시 이후 일어나기
				CASE 1080 TO 1320
					PRINTFORMW 「아 %CALLNAME:MASTER%, 안녕!」
					PRINTFORMW 「후후, 당신은 야형의 인간이니까」
					PRINTFORMW 「설마 무리하고 나에 맞추지 않아?」
					PRINTFORML 「, 기쁘지만, 건강에는 좋지 않기 때문에」
					PRINTFORMW 「적당히 해 몸을 위로해 주세요」
				;아사～ 낮일어나기
				CASEELSE
					PRINTFORMW 「아 %CALLNAME:MASTER%, 안녕!」
					PRINTFORMW 「후후, 날도 떨어져 밤의 시작이군요」
				ENDSELECT
			;22~28시
			CASEELSE
				SELECTCASE TIME:3
				;22~27시 일어나기
				CASE 1320 TO 1440,0 TO 180
					PRINTFORMW 「아 %CALLNAME:MASTER%, 안녕!」
					PRINTFORMW 「후후, 당신은 밤의 인간이니까」
					PRINTFORMW 「설마 무리하고 나에 맞추지 않아?」
					PRINTFORMW 「, 기쁘지만, 분명히 이 시간에 일어나는 것은 좋지 않아요」
					PRINTFORMW 「나라도 다소 낮 이라도 보내」
				CASEELSE
					PRINTFORMW 「아 %CALLNAME:MASTER%, 안녕!」
					PRINTFORMW 「완전히 밤도 깊어진 원이군요」
					PRINTFORMW 「여기에서는 요괴의 시간이니까, %마스터는% 너무 돌아 다니지 않는 것이 좋다고 생각해요」
				ENDSELECT
			ENDSELECT
		ENDSELECT
	ENDSELECT
TCVAR:350 = 1
RETURN 1
;==================================================
;밤에 잘 때(휴업(휴가) 말)
;==================================================
@M_KOJO_EVENT_K63_3(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------

IF LOCAL && !FLAG:70
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;자기 방에 돌아간다(정시가 되어 잔다)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;졸린 듯이 하고 있다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;수면중(일어나지 않기 때문에 회화 라기 보다는 잠꼬대? )
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;장난중
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;쇠약중
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTER가 다운(방까지 옮겨진다)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORMW
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL && !FLAG:70
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;멈춰 섰다
	;이 후 만남 말에 접속
	;기입 체크(=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_K63_5(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------

IF LOCAL && !FLAG:70
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;레이무가 들어 왔다
	;기입 체크(=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_K63_6(ARG, ARG:1)
;말 주인은 TARGET
;ARG에 정사 상대
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------

IF LOCAL && !FLAG:70
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;정사를 목격했다(친해져도:저)
	;기입 체크(=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
	;-------------------------------------------------
	;MASTER에 이끌려 참가
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL && !FLAG:70
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;정사를 볼 수 있었다(목격자의 친해져도:저)
	;기입 체크(=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
	;-------------------------------------------------
	;MASTER에 이끌려 목격자도 참가
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;목격한 정사를 캐묻는다
;==================================================
@M_KOJO_EVENT_K63_8(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------

IF LOCAL && !FLAG:70
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;MASTER만 캐묻고
	;기입 체크(=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
ENDIF
RETURN 1

;==================================================
;약점을 잡았다
;==================================================
@M_KOJO_EVENT_K63_9(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------

IF LOCAL && !FLAG:70
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL && !FLAG:70
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;MASTER를 덮치기(개시시)
	;기입 체크(=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_K63_11(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------

IF LOCAL && !FLAG:70
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;내쫓아졌다
	;기입 체크(=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_K63_12(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------

IF LOCAL && !FLAG:70
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;침상에 침입
	;기입 체크(=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_K63_13(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------

IF LOCAL && !FLAG:70
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;일개시(직장에 이동한다)
	;기입 체크(=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_K63_14(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------

IF LOCAL && !FLAG:70
	;-------------------------------------------------
	;가지고 있던 음식을 먹을 수 있었다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL && !FLAG:70
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;MASTER가 덮치기(우후후 개시시)
	;기입 체크(=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_K63_16(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------

IF LOCAL && !FLAG:70
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;동침을 시작한(개시시)(존재하지 않고
	;기입 체크
	;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_K63_17(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;수수께끼의 쾌감
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;절정
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;팬티 분실
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;입안 사정 토출
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;입안 사정 이해
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		RETURN 1
	ENDIF
IF DAY:3 == 15 && !TALENT:연모
PRINTFORMW 「!당신은 %CALLNAME:MASTER%!」
;CALL KAGEROU_
RETURN 1
ENDIF
ENDIF

;==================================================
;싱싱한으로 시켜라 때
;==================================================
@M_KOJO_EVENT_K63_18(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------
IF LOCAL && !FLAG:70
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;피임요구 대사
	;기입 체크(=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
;==================================================
;신사 생활을 승인해 받는다
;==================================================
@M_KOJO_EVENT_K63_19(ARG, ARG:1)
;말 주인은 LOCALS or RESULT
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
IF LOCAL && !FLAG:70
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;인정된다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「저, 정말!」
		PRINTFORMW 「고마워요 %CALLNAME:MASTER%!기뻐요!」
		PRINTFORMW 「오니 무녀에도 답례를 하지 않으면」
		PRINTFORMW 「내일무슨 사 오지 않으면∼」
		PRINTFORMW 「일단 잡무라면 맡겨 정대♪」
		PRINTFORMW 「아, 그럼, …부족한 몸입니다만…잘 부탁드립니다……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;인정되지 않는다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「그렇게……역시…안될까 해들……」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;-------------
;==================================================
;귀가시
;==================================================
@M_KOJO_EVENT_K63_20(ARG, ARG:1)
;말 주인은 LOCALS or RESULT
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;통상 귀가
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;데이트중 귀가
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;함락 소질 취득시
;==================================================
@M_KOJO_EVENT_K63_21(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
	;-------------------------------------------------
	;정부 취득
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;섹프 취득
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;조교 종료시에 자위
;==================================================
@M_KOJO_EVENT_K63_22(ARG, ARG:1)
;말 주인은 ARG
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------
IF LOCAL
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;목욕탕 데리고 나가
;==================================================
@M_KOJO_EVENT_K63_23(ARG, ARG:1)
;말 주인은 LOCAL
;--------------------------------------------------
;기입 체크(=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
	;그 외
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;회임
;==================================================
@M_KOJO_EVENT_K63_24(ARG, ARG:1)
;말 주인은 LOCAL
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;연모
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;사모
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;함락 소질 없음
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;무자각
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;출산
;==================================================
@M_KOJO_EVENT_K63_25(ARG, ARG:1)
;말 주인은 LOCAL
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;연모
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;사모
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;함락 소질 없음
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;무자각
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

path: ERB/대사_메시지관련/개인대사/063 카게로/M_KOJO_K63_イベント_t.ERB