code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;일상계 커맨드
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;300, 회화
;TFLAG:193(1=대성공 0=성공 -1=실패 -2=대실패(TARGET가 MASTER보다 교양이 4이상 높다)
;TCVAR:302(0=회화 가능 1>=비연모시 회화불능)
;MARK:반발각인(3이상=회화불능)(4이상은 버그
;TCVAR:만취(1=통상 성공 or대실패)
;==================================================
@M_KOJO_MESSAGE_COM_K53_300
;커맨드 공통 메시지(TRAIN_MESSAGE)
;삭제하면(자) 「~이야기를 했다.」라고 가가 사라집니다. 또, 삭제했을 경우는 자동으로 대사색깔이 붙지 않습니다.
CALL TRAIN_MESSAGE
;말메인 호출
CALL M_KOJO_MESSAGE_COM_K53_300_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_300_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TCVAR:만취
		SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「흐아앙∼~~…」
			CASE 1
				PRINTFORML 「으응…으응…」
		ENDSELECT
	ELSEIF CFLAG:빡침
		PRINTFORML 「…너무 끈질기면 이나바들을 부추겨요…」
	ELSEIF TCVAR:미약 || TCVAR:발정
		SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「응…으음, 후우…, , 뭐 보고 있을 거야, 아무것도 아니라니까…」
			CASE 1
				PRINTFORML 「응…후우………, …? ……아, 미안,…무슨, 이야기던가…」
			CASE 2
				PRINTFORML 「하아……,…네? 와, (듣)묻고 있다고……괜찮으니까, 계속해…」
		ENDSELECT
		PRINTFORML 는 건성으로 때때로 단 소리를 흘리면서, %CALLNAME:PLAYER%과 회화를 계속하고 있다…
	ELSE
		;이야기
		SELECTCASE RAND:4
			;가족의 이야기
			CASE 0
				SELECTCASE RAND:4
					;이나바
					CASE 0
						PRINTFORML 「그러고 보니  일전에 이나바들이∼…」
					;레이센
					CASE 1
						PRINTFORML 「레이센과 사이 좋게 해주세요」
						PRINTFORML 「저 아이 조금 겁장이이지만, 조롱하면(자) 즐겁기 때문에」
					;에이린
					CASE 2
						PRINTFORML 「에이린은 나의 스승 같지만」
						PRINTFORML 「조금 장난하자마자 화내는 것이 이따금 상처야∼」
					;카구야
					CASE 3
						PRINTFORML 「공주님은 전까지 항상 집에 두문불출하고 있었는데」
						PRINTFORML 「최근 이따금 마을에 나오게 되었어요∼」
				ENDSELECT
			;있는 것 없는 것
			CASE 1
				SELECTCASE RAND:4
					CASE 0
						PRINTFORML 「나에게 무슨 일이 있으면, 환상향 안에 있는 1억 마리의 이나바들이 가만히 있지 않은 우사야」
						PRINTFORML 「알겠다면, 당신도 나에게 엎드리는 것」
					CASE 1
						PRINTFORML 「레이센은 청순할 것 같은 얼굴로, 언제나 끝내고 있는데」
						PRINTFORML 「저렇게 보여도 꽤, 음란한 속옷을 입고 있는 우사야…」
					CASE 2
						PRINTFORML 「실은 미혹의 죽림에는 숨겨 재보가 자고 있는 우사의 것」
						PRINTFORML 「그래서 그 은폐 장소가 기록된 지도가, 스승님의 속옷이 들어가있는 옷장에…」
					CASE 3
						PRINTFORML 「공주님이 밤 늦게까지 무엇을 하고 있어라는?」
						PRINTFORML 「그렇다면, 밤에 할 것이라고 하면(자) 저것 우사겠지 어…」
				ENDSELECT
			;상담
			CASE 2
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「응, 약 사지 않아? 지금이라면레이센의 사용 종료 팬티도 붙이게 되는 우사야?」
					CASE 1
						PRINTFORML 「의중(마음 속)의 그 아이가 뒤돌아 보지 않아? 그런 당신에게 추천의 상품이 이것!」
					CASE 2
						PRINTFORML 「가지고 있으면(자) 좋은일 있을지도? 행운의 부적 「개운 큰 무늬」!」
						PRINTFORML 「지금이라면싸게 해 두는 우사야?」
				ENDSELECT
			;당신의 이야기를 듣는다
			CASEELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「후~응, 그렇구나∼…」
					CASE 1
						PRINTFORML 「헤에∼, 그래서 어떻게 되었어?」
					CASE 2
						PRINTFORML 「아―, 그렇네요∼」
				ENDSELECT
				;모습
				SELECTCASE TFLAG:193
					CASE 0
						PRINTFORML 는 적당한 장소에 앉아, 다리를 톡톡 시키고 있다…
					CASE 1
						PRINTFORML 는 %조교자를% 조롱하도록(듯이), 쿡쿡 웃고 있다…
					CASE -1
						PRINTFORML 는 지루함 같은 것이 하품을 해, %CALLNAME:PLAYER%의 이야기를 들은체 만체 하고 있다…
				ENDSELECT
		ENDSELECT

	ENDIF

	WAIT

ENDIF
RETURN 1
;==================================================
;301, 차를넣는
;TFLAG:193(1=대성공 0=성공 -1=실패)
;==================================================
@M_KOJO_MESSAGE_COM_K53_301
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_301_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_301_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;만취
	IF TCVAR:만취
		SELECTCASE TFLAG:193
			CASE 0
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「……매우………매우………」
					CASE 1
						PRINTFORML 「후우 후우 해!후우 후우!」
				ENDSELECT
			CASE 1
				PRINTFORML 「%CALLNAME:PLAYER%사응의 차는 두고 사들이고 해 응∼…」
			CASE -1
				PRINTFORML 「콜록 콜록,…이든지!술 가지고 진하다!」
		ENDSELECT
		PRINTFORML 만취하고 있는 에 차를 먹였다…
	;빡침
	ELSEIF CFLAG:빡침
		PRINTFORML 「………………」
		PRINTFORML 는 %조교자를% 시선을 돌림 하면(자), 아무것도 말하지 않고 차를 받았다…
	;첫회
	ELSEIF FIRSTTIME(301)
		PRINTFORML 「에엣, 이 차 어디에서 내 왔어? …뭐, 마시는데」
		PRINTFORML 는 경계하면서도 %CALLNAME:PLAYER%로부터 차를 받았다
	;통상
	ELSE
		PRINTFORML 「차 넣어 주었어? 고마워」
		PRINTFORML 는 한마디 예의를 말하면(자), %CALLNAME:PLAYER%로부터 차를 받았다
		PRINTL
		SELECTCASE TFLAG:193
			CASE 0
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「응…후후…………후우…」
					CASE 1
						PRINTFORML 「진하고 …진하고 ……후아―」
				ENDSELECT
			CASE 1
				PRINTFORML 「응, 맛있다!」
				PRINTFORML 「후후, 팔을 올린 원이군요…」
				PRINTFORML 갑작스럽게 이상한 어조가 된, 에이린의 흉내일까…
			CASE -1
				PRINTFORML 「에가 , 조금!차 정도 능숙하게 넣을 수  없는 것?」
		ENDSELECT
	ENDIF

	WAIT

ENDIF
RETURN 1
;==================================================
;302, 스킨십
;TFLAG:193(1=대성공 0=성공 -1=실패)
;==================================================
@M_KOJO_MESSAGE_COM_K53_302
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_302_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_302_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TCVAR:만취
		;평상시보다 대담한 스킨십
		;안아 지치는 귀
	ELSEIF CFLAG:빡침
		PRINTFORML 「이얏, 왼팔 없고!저쪽 말해!」
	ELSEIF TCVAR:미약 || TCVAR:발정
		SELECTCASE RAND:3
			;간질인다
			CASE 0
				PRINTFORML 멍하니 하고 있는이라고 의 틈을 찔러 겨드랑이를 간질여 보았다
		 		PRINTFORML 「히앗!…훗, 으으응,…지, 지금, 안 돼 라도, , 손대지 말고, 아!후아응!」
		 		PRINTFORML 는 몸을 비꼼이면서, 음란한 소리를 올리고 있다…
			;어깨에 손을 둔다
		 	CASE 1
		 		PRINTFORML 열을 띠의 어깨를 툭 하고 두드려 보았다
		 		PRINTFORML 「!…응, , 뭐, 갑자기 손대지 말아, 벼, 별것 아니라니까!」
		 		PRINTFORML 불의를 돌이나 의 입으로부터 큰 교성이 새었다…
		 	;뺨을 어루만진다
		 	CASE 2
		 		SELECTCASE TFLAG:193
		 			CASE 1
						PRINTFORML 열정적인 표정을 하고 있는 의 뺨에, 괜찮은가? 이렇게 말해 손바닥을 대었다
						PRINTFORML 「…으음? ………」
						PRINTFORML (아…%CALLNAME:PLAYER%의 손…차서, 기분…)
					CASEELSE
						PRINTFORML 열정적인 표정을 하고 있는 의 머리에, 괜찮은가? 이렇게 말해 손바닥을 대었다
						PRINTFORML 「에에? …!큐, 갑자기 건들지마, 벼, 별것 아니니까」
				ENDSELECT
		 ENDSELECT
	ELSE
		SELECTCASE RAND:3
			;귀를 손댄다
			CASE 0
				PRINTFORML 가 늘어지고 있는 토끼 귀를 손대어 보았다
				PRINTFORML 「이얏, 귀 방해가 된데, 이거 참, 비빈데~」
			;간질인다
			CASE 1
				PRINTFORML 의 뒤로부터 겨드랑이에 손을 넣어 간질여 보았다
				PRINTFORML 「히잇!얏, 하하핫, 그, 그만둬, 그만두라니까, 하하하하」
			;손을 손댄다
			CASE 2
				PRINTFORML 의 손에 자신의 손을 두어 보았다
				PRINTFORMW 「…에? , 뭐? 어쩐지 기분 나쁜데요…」
		ENDSELECT
	ENDIF

	WAIT

ENDIF
RETURN 1
;==================================================
;303, 사과한다
;TFLAG:193(2=과자때성공 1=대성공 0=성공 -1=실패 -2=과자때실패)
;==================================================
@M_KOJO_MESSAGE_COM_K53_303
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_303_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_303_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 2
			PRINTFORML 「하아∼？과자상자? 그런 것으로 나의 기분을 끌려 하더라도…」
			PRINTFORML 「…학!이, 이것은 야마부키 색의……」
			PRINTFORML 「…후~응, 뭐, 어쩔 수 없네요, 다음으로부터는 주의해주세요?」
		CASE 1
		CASE 0
			PRINTFORML 「…다음 하면(자) 용서(허락)하지 않을 테니까…」
		CASE -1
		CASE -2
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;304, 일을돕는다
;TFLAG:193(1=대성공 0=성공 -1=실패)
;CFLAG:350(일내용(JOB_일내용. ERB 참조
;TCVAR:도울수없다(=2 도와도 빨리는 끝나지 않는, 시간정지중 불가에이린의 진찰등 )
;==================================================
@M_KOJO_MESSAGE_COM_K53_304
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_304_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_304_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;시간정지중
	IF FLAG:70
	;통상
	ELSE
	ENDIF

ENDIF
RETURN 1
;==================================================
;305, 무릎베개받는다
;TFLAG:193(-5=MASTER가 TARGET보다 거체의 경우(TALENT:MASTER:체형 > TALENT:체형 + 2) 1=대성공 0=성공 -1=실패)(-5이외는 지문 분기 없음)
;ABL:친밀(6이상=얼굴을 들여다 보면서 머리를 쓰다듬어주는 3이상=다만 머리를 쓰다듬어주는 2 이하=움츠러들고 있다)
;==================================================
@M_KOJO_MESSAGE_COM_K53_305
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_305_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_305_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL
ENDIF
RETURN 1
;==================================================
;306, 배를어루만진다
;TFLAG:193(1=ABL:친밀 6이상 또한 임신시 0=성공 -1=ABL:친밀 5 이하)
;==================================================
@M_KOJO_MESSAGE_COM_K53_306
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_306_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_306_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;시간정지중
	IF FLAG:70
	;통상
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;307, 뺨을집는다
;TFLAG:193(1=대성공 0=성공 -1=실패)(지문 분기 없음
	;이하는 먼저 쓴 조건이 우선된다
	;TALENT:연모(받아들이면서 웃는 얼굴로 다시한다
	;ABL:친밀(6이상=흠칫흠칫 다시한다
	;ABL:순종(5이상=되는 대로
;==================================================
@M_KOJO_MESSAGE_COM_K53_307
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_307_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_307_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;시간정지중
	IF FLAG:70
	;수면중
	ELSEIF CFLAG:수면
	;통상
	ELSE
	ENDIF

ENDIF
RETURN 1
;==================================================
;308, 뺨을쿡쿡 찌른다
;동침중or수면 중한정
;TFLAG:193(1=대성공 0=성공 -1=실패)
;==================================================
@M_KOJO_MESSAGE_COM_K53_308
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_308_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_308_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;수면중
	IF CFLAG:수면

	;통상
	ELSE
	ENDIF

ENDIF
RETURN 1
;==================================================
;309, 머리를어루만진다
;TFLAG:193(1=대성공 0=성공 -1=실패)
;ABL:친밀(6이상=통상 성공 시분기
;==================================================
@M_KOJO_MESSAGE_COM_K53_309
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_309_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_309_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;시간정지중
	IF FLAG:70
	;수면중
	ELSEIF CFLAG:수면
	;통상
	ELSE

	ENDIF

ENDIF
RETURN 1
;==================================================
;331, 차를넣는(약넣은)
;TFLAG:193(1=대성공 0=성공 -1=실패)
;==================================================
@M_KOJO_MESSAGE_COM_K53_331
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_331_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_331_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 0
			PRINTFORML (…? 어쩐지 이상한 냄새가 하는 것 같은………상관없잖아)
			PRINTFORMW 는 위화감을 느꼈다가, 특별히 신경쓰는 일 없이 약넣은의 차를 마셨다
		CASE 1
			PRINTFORML 는 냄새의 위화감에 완전히 눈치채지 못하고, 맛있을 것 같게 차를 다 마셨다
		CASE -1
			PRINTFORML 「…? 킁킁……뭐야 이건? 어쩐지 이상한 냄새 하지만……엄고치며」
			PRINTFORMW 는 차를 마시는 것을 거부해, %CALLNAME:MASTER%에 찻잔을 돌려주었다…
	 ENDSELECT
ENDIF
RETURN 1
;==================================================
;332, 술을대접한다
;TFLAG:193(0=술을못함 성공 -1=술을못함 실패 -2=술을못함대실패 -5=술을못함 아키라 째)
;TFLAG:194(51=탁주 52=청주 53=오니고로시)
;ALCOHOL_TASTE(TFLAG:194)(15이상=마음에 드는 9 이하=입맛에 맞지 않는다)
;==================================================
@M_KOJO_MESSAGE_COM_K53_332
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_332_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_332_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;「옛날의 오니의 술의 맛」을 알고 있다
ENDIF
RETURN 1
;==================================================
;333, 푸념을듣는다
;TFLAG:193(6=대성공(취기) 5=성공(취기) 4=실패(취기) 3=대성공 2=성공 1=실패)
;==================================================
@M_KOJO_MESSAGE_COM_K53_333
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_333_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_333_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 6
		;대성공(취기)
		CASE 5
		;성공(취기)
		CASE 4
		;실패(취기)
		CASE 3
		;대성공
		CASE 2
		;성공
		CASE 1
		;실패
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;334, 잔을주고받는다
;TFLAG:193(1=대성공 0=성공 -1=실패)
;CFLAG:임신자각상태(1=식사)
;TALENT:술내성(-2=식사)
;==================================================
@M_KOJO_MESSAGE_COM_K53_334
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_334_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_334_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 1
		;대성공
		CASE 0
		;성공
		CASE -1
		;실패
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;335, 간호한다
;TFLAG:193(1=대성공 0=성공 -1=실패)
;==================================================
@M_KOJO_MESSAGE_COM_K53_335
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_335_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_335_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 1
		;대성공
		CASE 0
		;성공
		CASE -1
		;실패
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;336, 무릎베개한다
;ABL:친밀(4 이하=기분악 9 이하=수치않다 기울 수 있는 그 이상=행복 그렇게
;TIME_PROGRESS(TFLAG:무릎베개)(44 이하=실패
;==================================================
@M_KOJO_MESSAGE_COM_K53_336
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_336_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_336_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF TFLAG:193 > 0
	;자면
	ELSE
	;그 이외
	ENDIF
ENDIF
RETURN 1
;==================================================
;350, 밀어넘어뜨린다(시간시 장난한다
;TFLAG:194 (0=성공 1=명째가 있다　2=야외는 싫어 입니다만　3=많은 사람 플레이는 용서　4=합의가 있어도 무드가 충분하지 않다)
;TCVAR:껴안고첫회　1=보통으로 합의Get　2=먼저 키스 정도 해라　3=미약or발정에는 이길 수 없었어요 …　4=분한…각인조차 없으면 히″쿠히″군
;5=억지로 재촉당한다고 거절할 수 없는(소질 겁장이 소유 전용) 6=반드시 싫지만은 않다　7=안 돼　8=논외
;==================================================
@M_KOJO_MESSAGE_COM_K53_350
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_350_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_350_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;때 그쳐라
	IF FLAG:70

	;합의 소유 실패
	ELSEIF TFLAG:194
		SELECTCASE TFLAG:194
			;명째가 있다
			CASE 1
			;야외는 혐
			CASE 2
				PRINTFORML 「그런 것은―, 분명하게 장소를 선택하고 나서 말해요」
				PRINTFORML 「내가 그근처의 토끼같이, 호이호이외에서 개-할 리가 없겠지요」
			;많은 사람은 혐
			CASE 3
			;무드가 부족하다
			CASE 4
				PRINTFORML 「그런데 말이야―, 나(저)는 이렇게 보여 훌륭한 레이디-니까, 풍부한다-만들어요」
		ENDSELECT
	;껴안고첫회 or합의 소유로 성공
	ELSE
		;껴안고첫회
		IF TCVAR:껴안고첫회
			SELECTCASE TCVAR:껴안고첫회
				;보통으로 합의Get
				CASE 1
					IF TALENT:걸레
						PRINTFORML 「네∼？당신이라고 나 같은 작은 아이가 취미야∼？」
						PRINTFORML 「…아무튼 당신이라면 별로 좋아요, 분명하게 기분 좋고 했겠지요」
					ELSEIF TALENT:연모 && TALENT:연인
						PRINTFORML 「…응, 좋아…」
						PRINTFORML 「제대로 쉽고, 해…군요…」
						PRINTFORML 야인가라고 가 몇 시에도 없고 기특하다…
					ELSE
						PRINTFORML 「네, 에엣, 그러한 것은 좋아하는 사람끼리하는 것이겠지!」
						PRINTFORML 「스승님과 그-이전에 해 주면 좋잖아……!」
						PRINTFORML 「얏, 아, 알았으니까……이제(벌써) , 그런 근성 가내로…」
					ENDIF
				;키스가 아직
				CASE 2
					PRINTFORML 「이런 이란건 , 최초로 쪽이라든지 하는 것이 아닌거야?」
					PRINTFORML 「-없다………하아…뭐, 별로 좋지만」
				;미약or발정
				CASE 3
					PRINTFORML 「후우 …후우 …, 놔, 놔줘 …, 나에게, 손댄데…」
				;시간각인
				CASE 4
					PRINTFORML 「!…시, 싫어 , 조금…뭐, 기다려………, 응,!」
					PRINTFORML (…, 몇…으로…, 이 녀석의 냄새 냄새 맡으면(자), 몸후로부터 빠짐…, 라고 저항…할 수 없다……)
				;억지로 재촉당한다고 거절할 수 없다(겁장이 소유
				CASE 5
				;반드시 싫지만은 않다
				CASE 6
				;안 돼
				CASE 7
				;논외
				CASE 8
					PRINTFORML 「나에게 가까이 오지마, 로리콘!거치지 않아 타 있고!」
			ENDSELECT
		;합의 소유
		ELSE
			PRINTFORML 「뭐, 또…하는 거야…?」
			PRINTFORML 「…응, 별로…좋은, 이지만…」
		ENDIF
	ENDIF
	PRINTFORMW
ENDIF
RETURN 1
;==================================================
;351, 데리고나간다
;==================================================
@M_KOJO_MESSAGE_COM_K53_351
;데리고 나가에는 TRAIN_MESSAGE가 없다
CALL M_KOJO_MESSAGE_COM_K53_351_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_351_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;TARGET 데리고 나가
	IF CFLAG:동행 == 60
	;TARGET 이외 데리고 나가(TARGET 동행중만
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;352, 고백한다
;FLAG:생활능력무(1=실패)
;TFLAG:193 (1=성공 0=실패)
;==================================================
@M_KOJO_MESSAGE_COM_K53_352
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_352_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_352_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;353, 장난한다
;FLAG:생활능력무(1=실패)
;==================================================
@M_KOJO_MESSAGE_COM_K53_353
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_353_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_353_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;354, 동침한다(상대는 일어나 이불에 부르는 느낌)
;CFLAG:쇠약(1이상=일어나지 않는다
;CFLAG:초대( 0이외=일어나지 않는다
;==================================================
@M_KOJO_MESSAGE_COM_K53_354
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_354_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_354_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;355, 때 멈추고(지문의 개변 정도로 두어야 함
;==================================================
@M_KOJO_MESSAGE_COM_K53_355
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_355_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_355_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;360, 몸을맡긴다
;TCVAR:20(27=골짜기를 보이는 32=앞에서 안겨든 35=치마안을 보이는 53=파이즈리 73= 77=젖을 들이마시게 하는 85=V삽입하는 86=매우 수기 hold 87=A삽입하는 88=허리 모습 V 89=허리 모습 A
;==================================================
@M_KOJO_MESSAGE_COM_K53_360
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_360_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_360_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL K53_AUTO_PVOICE
	PRINTFORMW

ENDIF
RETURN 1
;==================================================
;363, 읽어들려주고([유치]소유 전용)
;TFLAG:193(1=대성공 0=성공 -1=실패)(지문 분기 없음
;CFLAG:동침중(1=이불 or침대 중(안)에서 책을 읽는다
;MASTER가 TARGET보다 큰 몸집의 경우, 무릎 위로 TARGET를 싣는다
;==================================================
@M_KOJO_MESSAGE_COM_K53_363
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_363_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_363_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;동침중		%조교자는%\@ INROOM(CFLAG:MASTER:현재위치) == 2 ?  침대 # 이부자리 \@중(안)에서 책을 읽어 주었다…
	;무릎 위			%조교자는% %타겟을% 무릎 위로 실으면서 책을 읽어 주었다…
	;%조교자는% %CALLNAME:TARGET%에 책을 읽어 주었다

	;읽어들려주고 첫회
	IF PREVCOM != 363
		PRINTFORMW 「저기-군요―%CALLNAME:MASTER%-, 이 책 읽어―」
		PRINTFORM 가 읽어들려주고를 조른 책은,
		SELECTCASE RAND:3
			CASE 0
				PRINTFORMW 아동전용의 그림책이었다
			CASE 1
				PRINTFORMW 일본 신화를 모티브(동기)로 한 그림책이었다
			CASE 2
				PRINTFORML 저명한 경제학자의 집필한 책이었다
				IF ABL:MASTER:교양 >= 3
				ELSE
					PRINTFORMW %CALLNAME:PLAYER%에는 너무 어렵다…!
				ENDIF
		ENDSELECT
	;연속실행
	ELSE
		PRINTFORML 「이봐%CALLNAME:PLAYER%, 계속되어 계속되어!」
		PRINTFORMW 에 촉구받아, %마스터는% 책의 계속을 읽기로 했다
	ENDIF

	PRINTL

	;동침중
	IF CFLAG:TARGET:동침중
		PRINTFORMW 는 %CALLNAME:PLAYER%과 함께의\@ INROOM(CFLAG:MASTER:현재위치) == 2 ?  침대 # 이부자리 \@중(안)에서 책을 읽어 주었다
		IF TFLAG:193 == 0
			PRINTFORMW 처음에는 흥미로운 듯이 책의 내용문였지만, 순서 졸음에 이끌려 꾸벅꾸벅 하고 있다…
		ENDIF
	;무릎 위
	ELSEIF TALENT:MASTER:체형 > TALENT:TARGET:체형 && INROOM(CFLAG:MASTER:현재위치)
		PRINTFORMW 는 무릎 위로 엉덩이를 태우고, %CALLNAME:PLAYER%에 책을 읽어 주었다

		PRINTFORML
		PRINTFORML 책을 읽어 들려주면서 %마스터는%
		PRINTFORM 를 눈치채지지 않게,
		SELECTCASE RAND:3
			CASE 0
				PRINTFORMW 그녀가 좋은 머리카락의 냄새를 맛보았다…
			CASE 1
				PRINTFORMW 엉덩이의 부드러운 감촉을 즐겼다…
			CASE 2
				PRINTFORMW 어린 여자아이의 온기를 마음껏 만끽했다…
		ENDSELECT

		;당신이 발기
		IF (TALENT:PLAYER:2 & 2) && BASE:MASTER:발기 >= 1000
			PRINTFORML
			PRINTFORML %마스터는% 발기하고 있다…
			PRINTFORMW %CALLNAME:MASTER%의 발기한 고간의 엉덩이나 등에 해당될 때, %CALLNAME:MASTER%의 저기에 안타까운 쾌감이 지나간다…
			IF TFLAG:193 >= 0
				PRINTFORMW 「……………무슨 등에 해당하고 있었지만…」
				PRINTFORML 가 눈살을 찌푸려 게슴츠레한 눈으로 %마스터를% 보고 있다
				PRINTFORMW 재미 없는 느낌이지만 뺨이 약간 붉어지고 있도록(듯이)도 보인다…
			;실패
			ELSEIF TFLAG:193 == -1
				PRINTFORML 「……………………………」
				PRINTFORML 가 게슴츠레한 눈으로 %마스터를% 노려보고 있는
				PRINTFORMW 「변태, 로리콘, 색골, 죽을 수 있다」
				PRINTFORMW 아무래도 발기하고 있었던 것이 들켜버렸다 같다…
				PRINTFORMW 는 %마스터를% 모멸하면(자), 무릎 위로부터 서 떨어져 가 버렸다…
			ENDIF
		ENDIF

	ELSE

	ENDIF
ENDIF
RETURN 1
;==================================================
;364, 콩장작(스이카, 유기, 스칼렛 자매용
;TFLAG:193(콩 뿌려에 참가하고 있는 인원수
;==================================================
@M_KOJO_MESSAGE_COM_K53_364
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_364_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_364_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;365, 모리야신사에 이동(사나에, 카나코, 스와코용
;==================================================
@M_KOJO_MESSAGE_COM_K53_365
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_365_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_365_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;402, 취침
;TFLAG:193(0=통상 1=아이와 함께 내 천(川)자로 잔다)
;==================================================
@M_KOJO_MESSAGE_COM_K53_402
;취침에 TRAIN_MESSAGE는 없다
CALL M_KOJO_MESSAGE_COM_K53_402_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_402_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;403, 휴식
;CFLAG:TARGET:수면(1=TARGET가 자고 있는 근처에서 휴식
;==================================================
@M_KOJO_MESSAGE_COM_K53_403
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_403_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_403_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;405, 나간다(동행시 데이트
;조건이 귀찮아서, COMF405 나간다. ERB를 참조
;==================================================
@M_KOJO_MESSAGE_COM_K53_405
;나가는에 TRAIN_MESSAGE는 없다
CALL M_KOJO_MESSAGE_COM_K53_405_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_405_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;TARGET와 데이트
	IF CFLAG:동행
	;TARGET 의외로 데이트
	ELSEIF CFLAG:MASTER:동행
	;외출보류
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;410, 청소
;FLAG:70(1=시간정지중
;TFLAG:193(0=보고 있을 뿐 1=함께 청소)
;TFLAG:194(3=더러운고 2=더러운중 1=더러운저 0=더러운 최소
;OUTROOF(CFLAG:현재위치)(야외 청소( 겨울은 눈치우기
;==================================================
@M_KOJO_MESSAGE_COM_K53_410
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_410_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_410_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TFLAG:193 == 0
		PRINTFORMW 는 청소를 하고 있는 %마스터를% 완전히 신경쓰는 일 없이 빈둥거리고 있다
	ENDIF
ENDIF
RETURN 1
;==================================================
;411, 전투훈련
;TFLAG:194(3=여름의 낮 2=위험 있고 날씨 1=악천후 0=옥내 or통상 날씨
;==================================================
@M_KOJO_MESSAGE_COM_K53_411
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_411_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_411_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;412, 공부
;ABL:교양(ABL:MASTER:교양보다 대=MASTER가 가르쳐 주는 ABL:MASTER:교양보다 소=TARGET가 가르쳐 준다
;==================================================
@M_KOJO_MESSAGE_COM_K53_412
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_412_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_412_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;통상
	SELECTCASE RAND:3
		CASE 0
			PRINTFORMW 「―. 모르다」
		CASE 1
			PRINTFORMW 「저기 재미없다, 좀 더 즐거운 금년 같아요―」
		CASE 2
			PRINTFORMW 「아아, 여기는 이렇게 풀군요?」
	ENDSELECT

ENDIF
RETURN 1
;==================================================
;413, 요리
;TFLAG:194(100이상=금단의 메뉴 3=디저트 2=주식 1=경식
;==================================================
@M_KOJO_MESSAGE_COM_K53_413
;TFLAG:194가 100이상의 경우만
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_413_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_413_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL
ENDIF
RETURN 1
;==================================================
;414, 식사를배달시킨다
;TFLAG:193(1=대성공 0=성공 -1=실패)
;TFLAG:194(1=노팬티 샤브샤브 2=금단의 메뉴 31=도핑 콘소메 수프 30=모짜렐라 치즈와 토마토의 샐러드 34=긴기 요리
;TCVAR:MASTER:308(bit0=진한 맛 bit1=담백한 맛 bit3=엄청 매운 bit4=격감 bit5=고추냉이 bit6=격산
;==================================================
@M_KOJO_MESSAGE_COM_K53_414
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_414_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_414_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;415, 식사를대접한다
;TFLAG:193(1=대성공 0=성공 -1=실패)
;TCVAR:MASTER:308(bit0=진한 맛 bit1=담백한 맛 bit3=엄청 매운 bit4=격감 bit5=고추냉이 bit6=격산
;==================================================
@M_KOJO_MESSAGE_COM_K53_415
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_415_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_415_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;416, 연주한다
;TFLAG:193(1=대성공 0=성공 -1=실패)
;TFLAG:사용악기(1=키보드 2=피아노 3=기타 4=트럼펫 5=바이올린)
;==================================================
@M_KOJO_MESSAGE_COM_K53_416
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_416_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_416_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;417, 낮잠을 한다
;TFLAG:193(0=MASTER를 안아 베개로 해 자고 있는 1=MASTER의 무릎을 베개로 해 자고 있는 2=잠자는 얼굴에 키스 된 3=잠자는 얼굴을 들여다 봐진 4=MASTER가 무릎베개되고 있는 5=은밀한 곳 or페니스 비비어
;CFLAG:동침중(1=함께 자고 있다
;==================================================
@M_KOJO_MESSAGE_COM_K53_417
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_417_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_417_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;421, 발원함 한다
;조건이 복잡해서, COMF421 발원함. ERB 및, EVENT_MESSAGE_COM400.ERB의 발원함 하는 것 항을 참조
;==================================================
@M_KOJO_MESSAGE_COM_K53_421
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_421_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_421_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;422~430은, 특수 커맨드이므로 텐프레에서는 대응하지 않습니다
;==================================================

;==================================================
;431, 욕실로느긋하게쉰다
;TFLAG:209(4=마을의 목욕탕에서 접수대 를 화나게 하고 있는 1=목욕탕에 들어갔다
;TFLAG:211(4=지저의 온천에서 접수대 요괴를 화나게 하고 있는 1=온천에 들어갔다
;TFLAG:194(1=연속 입욕 불가(표시하지 않을 가능성 있어?
;==================================================
@M_KOJO_MESSAGE_COM_K53_431
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_431_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_431_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;432, 욕실로느긋하게쉰다
;표시 타이밍은 입욕 후이므로, 목욕 한 후에서의
;TFLAG:209(4=마을의 목욕탕에서 접수대 를 화나게 하고 있는 1=목욕탕에 들어갔다
;TFLAG:211(4=지저의 온천에서 접수대 요괴를 화나게 하고 있는 1=온천에 들어갔다
;==================================================
@M_KOJO_MESSAGE_COM_K53_432
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_432_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_432_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;440, 기다린다
;==================================================
@M_KOJO_MESSAGE_COM_K53_440
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_440_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_440_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;441, 수업을받는다(케이네 전용
;==================================================
@M_KOJO_MESSAGE_COM_K53_441
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_441_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_441_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;442, 벌채한다(미실장
;==================================================
@M_KOJO_MESSAGE_COM_K53_442
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_442_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_442_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;442이후의 커맨드는, 실행해도 말은 아마 표시되지 않기 때문에 텐프레에서도 패스
;==================================================

;※※※※※※※※※※※※※※※※※※※※※※※※※
;데이트계 커맨드
;데이트계 말은 문자 그대로 외출처에서 발생
;※※※※※※※※※※※※※※※※※※※※※※※※※
[SKIPSTART]
;현상미실장
;==================================================
;600, 데이트 회화
;==================================================
@M_KOJO_MESSAGE_COM_K53_600
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_600_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_600_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;601, 데이트 스킨십
;==================================================
@M_KOJO_MESSAGE_COM_K53_601
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_601_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_601_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;602, 데이트 키스
;==================================================
@M_KOJO_MESSAGE_COM_K53_602
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_602_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_602_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
[SKIPEND]
;==================================================
;603, 손을잡는다
;TFLAG:193(1=대성공 0=성공 -1=실패)(실패에서도 거절해 풀어지거나는 하지 않습니다
;==================================================
@M_KOJO_MESSAGE_COM_K53_603
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_603_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_603_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;604, 산책한다
;데이트중의 경우, CFLAG:현재위치에 이동처의 장소가 이미 들어가 있다
;==================================================
@M_KOJO_MESSAGE_COM_K53_604
;산책하려면  TRAIN_MESSAGE가 없다
CALL M_KOJO_MESSAGE_COM_K53_604_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_604_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;605, 지나치는길한다
;TFLAG:193(1=대성공 0=성공 -1=실패)(지문 없음
;==================================================
@M_KOJO_MESSAGE_COM_K53_605
;지나치는 길 하려면  TRAIN_MESSAGE가 없다
CALL M_KOJO_MESSAGE_COM_K53_605_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_605_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;610, 식사제의를한다
;TFLAG:193(1=대성공 0=성공 -1=실패)
;==================================================
@M_KOJO_MESSAGE_COM_K53_610
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_610_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_610_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;613, 돈 벌어 한다(생략 되었습니다
;==================================================
@M_KOJO_MESSAGE_COM_K53_613
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_613_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_613_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;614, 식재료의 시장
;TFLAG:193(1=구입＆데이트경험 업 0=구입 -1=비구입)
;==================================================
@M_KOJO_MESSAGE_COM_K53_614
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_614_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_614_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;615, 도시락을 먹는다
;실행 가능 장소지장길, 수양버들아래, 안개의호수, 현무의늪, 큰두꺼비의연못, 절경의언덕, 산의호수, 천계
;TFLAG:193(1=대성공 0=성공 -1=실패)
;ABL:요리기능(2 미만=미묘한 성과 4 미만=안밖 맛있는 4이상=훌륭한 작품)
;==================================================
@M_KOJO_MESSAGE_COM_K53_615
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_615_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_615_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;617, 과자가게로 이끈다
;TFLAG:193(1=대성공 0=성공 -1=실패)(지문 분기는 대성공만 추가
;==================================================
@M_KOJO_MESSAGE_COM_K53_617
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_617_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_617_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;책상아래에서

ENDIF
RETURN 1
;==================================================
;618, 꽃집(말은 표시되지 않는 모양?
;==================================================
@M_KOJO_MESSAGE_COM_K53_618
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_618_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_618_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;620, 스즈나안
;TFLAG:193(1=대출 OK 0=대출 불가
;ITEM:10X (X=1 전술지도서 X=2 조리지도서 X=3 사전 X=4 단편소설
;==================================================
@M_KOJO_MESSAGE_COM_K53_620
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_620_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_620_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;621, 낚시를 한다
;TFLAG:193(0=잡히지 않는 1~4=물고기 11~15=맛있는물고기 610=목재 131=모리야부적 21=로터 609=얼음의 린 606=용의손톱)
;TFLAG:194(1000이상이라면 TARGET가 낚시했다)
;==================================================
@M_KOJO_MESSAGE_COM_K53_621
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_621_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_621_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;660, 독서
;TFLAG:193(선택지 문학(1=인살(문학? ) 2=실패 3=문학), 선택지 실용서(4=실패 5=실용서), 선택지 엣찌한 책(6=싱거운 높은 본 7=보건 체육 8=카 매스-호랑이))
;==================================================
@M_KOJO_MESSAGE_COM_K53_660
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_660_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_660_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;698, 방에들어간다
;TARGET의 방에 들어가는 경우만 표시
;==================================================
@M_KOJO_MESSAGE_COM_K53_698
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_698_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_698_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;699, 밖으로나온다
;==================================================
@M_KOJO_MESSAGE_COM_K53_699
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_699_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_699_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;파생 커맨드
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;60, 귀이개
;전턴 무릎베개 후 스킨십 커맨드
;TFLAG:193(1=대성공 0=성공 -1=실패)(실패하는 것은 TARGET
;==================================================
@M_KOJO_MESSAGE_SCOM_K53_60
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K53_60_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K53_60_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;61, 안아 베개
;(TARGET 수면시간 or쇠약) 동침중, 전턴 안겨든 후 취침 커맨드
;분기 없음
;==================================================
@M_KOJO_MESSAGE_SCOM_K53_61
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K53_61_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K53_61_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;62, 이마 쪽―
;전턴두 어루만지고 후 키스한다
;TFLAG:193(1=대성공 0=성공 -1=실패)(지문 분기 없음
;ABL:욕망(5이상=어딘지 부족하다
;ABL:친밀(5이상=수줍다
;==================================================
@M_KOJO_MESSAGE_SCOM_K53_62
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K53_62_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K53_62_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;63, 좀 더 키스한다
;전턴 키스 하는 후 키스한다
;분기 조건은 EVENT_MESSAGE_COM500.ERB 참조
;==================================================
@M_KOJO_MESSAGE_SCOM_K53_63
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K53_63_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K53_63_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSE
		CALL K53_AUTO_PVOICE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;80, 손을 잡아 당긴다
;데이트 출발 후 목적지에 도착할 때까지
;TFLAG:193(1=대성공 0=성공 -1=실패)
;==================================================
@M_KOJO_MESSAGE_SCOM_K53_80
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K53_80_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K53_80_1
;-------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

path: ERB/대사_메시지관련/개인대사/053 테위/M_KOJO_K53_日常系コマンド_t.ERB


repo_name: purugi/eraTWKR

path: ERB/대사_메시지관련/개인대사/053 테위/M_KOJO_K53_派生コマンド_t.ERB

license: mit


path: ERB/대사_메시지관련/개인대사/053 테위/M_KOJO_K53_絶頂_t.ERB


path: ERB/대사_메시지관련/개인대사/053 테위/M_KOJO_K53_道具系コマンド_t.ERB


path: ERB/대사_메시지관련/개인대사/053 테위/M_KOJO_K53_가학계커맨드_t.ERB


path: ERB/대사_메시지관련/개인대사/053 테위/M_KOJO_K53_육아이벤트_t.ERB


code:
@M_KOJO_IRAI_K53(ROLE, SCENE, IRAI_ID)
#DIMS ROLE     ;캐릭터의 입장, 의뢰자인가 그렇지 않은가
#DIMS SCENE    ;대사의 표시되는 타이밍
#DIM  IRAI_ID  ;의뢰 자체의 ID
#DIM  CLIENT_ID;의뢰자 ID만 뽑아낸 것
#DIM  CHK_ID   ;의뢰 ID만 뽑아낸 것
CHK_ID    = IRAI_ID % 1000
CLIENT_ID = IRAI_ID_TO_CLIENT(IRAI_ID)
SELECTCASE ROLE
CASE "CLIENT"
	;일반의뢰
	IF IS_COMMON_IRAI(IRAI_ID)
		SELECTCASE STR_DATA_IRAI(IRAI_ID, "의뢰명", CLIENT_ID)
		CASE "일반의뢰명"
			SELECTCASE SCENE
			CASE "의뢰 제시시"
			;의뢰를 걸 수 있을 때
			CASE "의뢰비수탁시"
			;내용만 봐 수탁하지 않았던 때
			CASE "의뢰 수탁시"
			;의뢰를 수탁했을 때
			CASE "의뢰 확인시"
			;[366]으로 의뢰내용을 의뢰인에게 확인했을 때
			CASE "의뢰 파기시"
			;수탁한 의뢰를 파기할 때
			CASE "의뢰실행 직전"
			;[367]으로 의뢰를 실행할 때, 실행 처리의 앞에 불려 간다
			CASE "의뢰실행 직후"
			;[367]으로 의뢰를 실행할 때, 실행 처리의 뒤에 불려 간다
			CASE "성공 보고시"
			;보고시(성공)
			CASE "실패 보고시"
			;보고시(실패)
			;이 외, 보고 잊고나 기한 마감에 실패 취급이 되어 후일 의뢰인에게 조우했을 때에도 표시
			ENDSELECT
		ENDSELECT
		RETURN
	ENDIF

	;고유 의뢰
	SELECTCASE STR_DATA_IRAI(IRAI_ID, "의뢰명", CLIENT_ID)
	;개개의 의뢰명으로 분기
	;SCENE의 WAIT에 관한 사양
	;WAIT 없음으로 좋다　　　　："의뢰 제시시", "의뢰비수탁시", "의뢰 확인시", "의뢰 파기시", "성공 보고시", "실패 보고시"
	;
	;이하의 2개는 실제로는 CARRYOUT에서의 지문 처리라는 비교 검토가 필요
	;WAIT를 넣는 편이 적절："의뢰실행 직전", "의뢰실행 직후"
	CASE "고유 의뢰명"
		SELECTCASE SCENE
		CASE "의뢰 제시시"
		;의뢰를 걸 수 있을 때
		CASE "의뢰비수탁시"
		;내용만 봐 수탁하지 않았던 때
		CASE "의뢰 수탁시"
		;의뢰를 수탁했을 때
		CASE "의뢰 확인시"
		;[366]으로 의뢰내용을 의뢰인에게 확인했을 때
		CASE "의뢰 파기시"
		;수탁한 의뢰를 파기할 때
		CASE "의뢰실행 직전"
		;[367]으로 의뢰를 실행할 때, 실행 처리의 앞에 불려 간다
		CASE "의뢰실행 직후"
		;[367]으로 의뢰를 실행할 때, 실행 처리의 뒤에 불려 간다
		CASE "성공 보고시"
		;보고시(성공)
		CASE "실패 보고시"
		;보고시(실패)
		;이 외, 보고 잊고나 기한 마감에 실패 취급이 되어 후일 의뢰인에게 조우했을 때에도 표시
		ENDSELECT
	ENDSELECT
CASE "TARGET"
	;여기서 표시되는 SCENE는"의뢰실행 직전", "의뢰실행 직후"뿐입니다
	;일반의뢰
	IF IS_COMMON_IRAI(IRAI_ID)
		SELECTCASE STR_DATA_IRAI(IRAI_ID, "의뢰명", CLIENT_ID)
		;개개의 의뢰명으로 분기 해 주세요
		CASE "일반의뢰명"
		;인물이 열쇠가 되어 있던·혹은 장소에 우연히 마침 있었다
			SELECTCASE SCENE
			;TARGET가 불리는 것은 이 타이밍만
			CASE "의뢰실행 직전"
			CASE "의뢰실행 직후"
			ENDSELECT
		ENDSELECT
		RETURN
	ENDIF
	SELECTCASE CSVCALLNAME(CLIENT_ID)
	;의뢰자의 CALLNAME에 의한 분기(CSV 준거)
	CASE "의뢰자"
		SELECTCASE STR_DATA_IRAI(IRAI_ID, "의뢰명", CLIENT_ID)
		CASE "고유 의뢰명"
			SELECTCASE SCENE
			CASE "의뢰실행 직전"
			CASE "의뢰실행 직후"
			ENDSELECT
		ENDSELECT
	ENDSELECT
CASE "NO_REPORT"
	;날짜 경과시, 보고 불필요 의뢰를 달성 하고 있었을 경우에 불리는 말
	;여기서 표시되는 SCENE는"의뢰 보고 불필요"뿐입니다
	;SCENE가 1개 밖에 없기 때문에 분기는 불요
	;또, 반드시 의뢰주의 말이 불립니다
	;일반의뢰
	IF IS_COMMON_IRAI(IRAI_ID)
		SELECTCASE STR_DATA_IRAI(IRAI_ID, "의뢰명", CLIENT_ID)
		;개개의 의뢰명으로 분기 해 주세요
		CASE "일반의뢰명"
		CASE "꽃에 물을 줘"
		CASE "누군가의 유실물"
		ENDSELECT
		RETURN
	ENDIF
	SELECTCASE STR_DATA_IRAI(IRAI_ID, "의뢰명", CLIENT_ID)
	CASE "고유 의뢰명"
	ENDSELECT
ENDSELECT

path: ERB/대사_메시지관련/개인대사/053 테위/M_KOJO_K53_의뢰_t.ERB


path: ERB/대사_메시지관련/개인대사/053 테위/M_KOJO_K53_하드한커맨드_t.ERB


code: #DIM CONST K53C_우후후회수	=	350

path: ERB/대사_메시지관련/개인대사/053 테위/테위용DIM_t.ERH


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

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

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

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

;본말에 대한 정비 금지 시한에 대해(설정하지 않는 경우, 미설정만 남겨 주세요)
;【미설정】【설정：기간 YY-MM-DD로부터 YY-MM-DD까지 오리지날 작자만 수정가능】【기한 연장유】

;본말에 대한 그외단서
;【 】【 】
;******************************************************************************
;**** FlagManagement **********************************************************
;본말에서 사용하고 있는 CFLAG·TCVAR등
[SKIPSTART]
-------------------------------------------------
파츄리 말
-------------------------------------------------
파츄라브인 사람이라면 무엇을 해도 괜찮다의

무관심하다니 관계없을 정도(수록) 무너지고 있어도
가능한 한 짧게,  간결하게 나타내고 싶은 고로 3행 이상이 되지 않는 것도 많습니다

향후의 과제
유감스럽게 다른 누군가가 함께 있었을 때라든지는 너무 상정하고 있지 않다
그러므로에 자고 있는 파츄리의 방에 데리고 들어갔을 때라든지 그 역이라든지는 없다
커맨드 쪽을 우선으로 묻어 얼마든지 리나의 것으로 당분간 먼저 될 것 같다

대충은 시험했으므로 버그는 나오지 않을 것……은 두
무엇인가 문제가 나오면(자) 스레나 IRC까지 부탁합니다

2011/07/26
-------------------------------------------------
사용 플래그 일람
CFLAG
1001:만남 말
1002:이놈―？플랑도르 입실
1003:회화했는지
1004:파츄리와 차를 마신 회수
1005:사실 변경

TCVAR
350:그 날 만난 회수
351:잠말
352:무엇에 사용하려고 생각했는지 잊었지만 밀어 넘어뜨려졌을 때에 가산
353:화나게 했을 때의 회화
354:차는 엄지만 회화를 했던 적이 없다

이상
[SKIPEND]
;******************************************************************************

;PS 인의 사람
;오리지날 작자와 연락이 되지 않는 경우, 상기 Copyright에 따라 가필 개변을 실시해 주세요
;또 본체 처리·타말처리등에 간섭하는 이상 처리가 있는 경우로 오리지날 작자에 의한 수정이
;행해지지 않는·혹은 곤란한 경우, Copyright에 상관없이 한 마음에 의한 수정을 허가합니다
;그 때는 원처리를 삭제하지 않고 코멘트 아웃 해 수정 처리를 삽입해 주세요
[SKIPSTART]
;### 말존재 판정 ###################################
@M_KOJO_K54(ARG)
;여기서 RESULTS를 설정하면(자) 다른 동캐릭터 말을 돌진해져도 정상 동작한다.

;RESULTS = _TEST_

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

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

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"UPDATE 판정"
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_UPDATE_K54
;말 독자적인 UPDATE용
;ENCOUNTER 전용에 독자 분기 플래그를 가르쳤을 경우등에 부디
;UPDATE 판정으로 CFLAG를 사용하는 경우, 캐릭터 번호의 지정이 필요하게 됩니다
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"계 이벤트(엑스트라 구문)
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K54
;초대면, 인사의 타이밍
;TALENT의 변경은 여기서 부디.
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"계 이벤트
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;데이트 오는 길에 First KISS(합의도 붙는다)
;==================================================
@M_KOJO_SPEVENT_K54_1(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------
IF LOCAL
	PRINTFORML
	;키스를 캔슬하고 싶은 경우는 이하를 개방
	;TCVAR:키스캔슬 = 1
ENDIF
RETURN 1

;==================================================
;데이트 오는 길에 고백(연인이 붙는다)
;==================================================
@M_KOJO_SPEVENT_K54_2(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;고백 내용
	;이 고백 내용 표시 후에 받을지 어떨지의 선택분이 표시됩니다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;고백 OK(연인이 붙는다)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;고백 실패
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;데이트 돌아오는 길
;==================================================
@M_KOJO_SPEVENT_K54_3(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;통상 귀가
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;반발각인 소거 이벤트
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;반발각인 2>1 레벨 다운 이벤트
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;반발각인 3>2 레벨 다운 이벤트
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"계 이벤트
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;방에서 만남
;==================================================
@M_KOJO_EVENT_K54_1(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;MASTER가 들어 왔다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;PRINTW로 하지 않는 것이 좋을 것입니다
		;처음으로 만났다
		IF CFLAG:1001 < 1
			PRINT 「처음으로 보는 얼굴이군요……
			;도서관
			IF CFLAG:현재위치 == 310
				PRINTL 아무튼 좋아요. 어서 오세요, 나 대도서관에」
			;파츄리사실
			ELSEIF CFLAG:현재위치 == CFLAG:초기위치
				PRINTL 여기는 나의 서재야. 무슨 용무야 해들?」
			;그 이외
			ELSE
				PRINTL 로, 당신, 누구?」
			ENDIF
			CFLAG:1001 = 1
		;임신시
	;	ELSEIF CFLAG:6
			;bad 임신
	;		IF 뭔가 좋은 것인지?
	;			PRINTL 「싫어요(아니요)아아아아아아 가까워지지 마」
	;			PRINTFORML 파츄리는 %마스터가% 나타난 것을 봐 공포 하고 있다
			;good 임신
	;		ELSE
	;			PRINTFORML 「%CALLNAME:MASTER%」
	;			PRINTFORML 파츄리는 %CALLNAME:MASTER%의 모습을 보면(자) 기쁜듯이 얘기해 왔다
	;		ENDIF
		;연모시
		ELSEIF TALENT:연모
			;방을 같게 했다
			IF CFLAG:MASTER:초기위치 == CFLAG:초기위치 && !CFLAG:1005
				PRINTFORML %마스터는% 인사도 하는 둥 마는 둥 파츄리와 함께 살고 싶은 것을 전했다
				PRINTL 「어아응……잘 부탁드립니다」
				CFLAG:1005 = 1
				SIF CFLAG:1001 < 2
					CFLAG:1001 = 2
			;방을 바꾸었다
			ELSEIF CFLAG:MASTER:초기위치 != CFLAG:초기위치 && CFLAG:1005 == 1
				PRINTFORML %마스터는% 말하기 어려운 듯이 파츄리와 방을 따로 하는 것을 고했다
				PRINTL 「그렇게……그것은……유감이구나」
				CFLAG:1005 = 2
			;방을 또 같게 했다
			ELSEIF CFLAG:MASTER:초기위치 == CFLAG:초기위치 && CFLAG:1005 == 2
				PRINTFORML %마스터는% 말하기 어려운 듯이 또 파츄리와 함께 살고 싶은 것을 전했다
				PRINTL 「그렇게……이번에는 쭉 함께 살 수 있으면(자) 좋아요」
				CFLAG:1005 = 1
			;연모 첫회만
			ELSEIF CFLAG:1001 < 2
				PRINTFORML 파츄리는 %CALLNAME:MASTER%의 모습을 보면(자) 손짓을 했다
				PRINTFORML %마스터가% 가까워지면(자) 얼굴을 끌어 들이고 귀엣말한다
				PRINTL 「저 열쇠는 언제라도 사용해 좋아요……에서도, 그다지 장난은 하지 않게」
				CFLAG:1001 = 2
			;연모 통상
			ELSE
				;도서관
				IF CFLAG:현재위치 == 310
					PRINTFORML 「%CALLNAME:MASTER%, 오세요」
					SIF CFLAG:1001 < 3
						PRINTL 「여기에 있는 것은 어느 정도 좋아하게 사용해 좋아요……나를 포함해, 군요」
					PRINTFORML 그렇게 말하면(자) 파츄리는 자신의 근처의 자리를 가볍게 두드려, 읽기 시작하고의 책에 눈을 떨어뜨렸다
				;파츄리사실
				ELSEIF CFLAG:현재위치 == CFLAG:초기위치
					;MASTER의 개시 위치가 파츄리사실 이외
					IF CFLAG:MASTER:초기위치 != CFLAG:초기위치
						PRINTFORML 「내 서재에 어서 오세요. \@ YOGORE:311 >= 500 ?  청소하러 와 주었는지 해들? 그렇지 않으면 나를 만나러 와 주었어?  # 차에서도 마시면서 이야기할까요\@」
					ELSE
						PRINT 「어서 오세요.
						;그 밖에 누군가 있다
						IF GET_TARGETNUM() > 2
							PRINTL 차에서도 마십시다」
						ELSE
							;조건은 INFO.ERB로부터 배차
							PRINTFORML \@ NEMUKE() >= 720 ?  ……졸린 것일까? 무릎 정도 빌려 주어요 # 단순한 휴식 까? 그렇지 않으면 휴식?  \@」
						ENDIF
					ENDIF
				;대목욕탕
				ELSEIF CFLAG:현재위치 == 333
					PRINTFORML 「갑자기 들어 올 수 있으면(자) 조금 수줍어요……%CALLNAME:MASTER%」
					;목욕탕이 더러워져 있다고 대사를 추가
					PRINTFORML 「그렇네요, 이러한 때야말로 이 대사군요. 욕실로 해? \@ YOGORE:333 >= 500 ?  청소로 해?  # \@그렇지 않으면, 나?」
				;그 이외
				ELSE
					PRINTFORML 파츄리는 %마스터를% 알아차리면(자) 천천히 가까워졌다
				ENDIF
				CFLAG:1001 = 3
			ENDIF
		;그 이외
		ELSE
			;만난 회수에 의한 말
			IF TCVAR:350 > 5
				;친해져 강도로 대사의 변경
				PRINTFORML \@ TCVAR:130 > 0 ?  파츄리는 무엇인가를 생각해 낸 얼굴로 %CALLNAME:MASTER%에 가까워져 온 # 「……. ……」 \@
			ELSEIF TCVAR:350 == 5
				;친해져 강도로 대사의 변경
				PRINTFORML 「\@ TCVAR:130 > 0 ?  정말로 자주 만나요 저기, 뭐 좋아요 # 당신, 스토커? 우연히 해 너무 많다!\@」
			ELSEIF TCVAR:350 == 4
				PRINTL 「……후우 , 오늘은 자주 만나요」
			;도서관
			ELSEIF CFLAG:현재위치 == 310 && RAND:2
				PRINTFORML 「청소일까? 내친 김에\@ TCVAR:130 > 0 ?  나와 이야기를 하지 않아?  # 그근처의 책도 정리해 두며\@」
			;파츄리사실
			ELSEIF CFLAG:현재위치 == CFLAG:초기위치 && RAND:2
				PRINTL 「언제나 수고한 일이군요……그리고, 그 선반은 손대지 않게」
			;대목욕탕
			ELSEIF CFLAG:현재위치 == 333
				PRINTFORML 「……청소? 그렇지 않으면\@ GET_TARGETNUM() == 1 ?  나 # 누군가씨 \@의 알몸이 목적일까」
			;그 이외
			ELSEIF RAND:2
				PRINTL 「마침 잘되었네요, 차를 엄라고 정대」
			ELSE
				PRINTL 「좋은 타이밍에 온 원이군요. 무엇인가 재미있는 이야기는 없을까」
			ENDIF
		ENDIF
		TCVAR:350 ++
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;TARGET가 들어 왔다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:1001 < 1
			;도서관
			IF CFLAG:현재위치 == 310
				PRINTL 「거기서 무엇을 하고 있을까? 여기는 홍마관의 대도서관이야」
			;파츄리사실
			ELSEIF CFLAG:현재위치 == CFLAG:초기위치
				PRINTL 「내 방에 마음대로 들어 와 어정어정 하고 있는, 마치 쥐군요」
			;그 이외
			ELSE
				PRINT 「아, 이 관에
				;흡혈귀
				IF TALENT:MASTER:132
					PRINT 레미들 이외의흡혈귀가
				;여우라든지 동물귀
				ELSEIF TALENT:MASTER:90 || TALENT:MASTER:91 || TALENT:MASTER:143
					PRINT 짐승이 혼동 붐비어
				;난쟁이이나 거구
				ELSEIF  TALENT:MASTER:100 == -3 || TALENT:MASTER:100 == 3
					PRINT 인간……인간? 뭐 좋아요, 인간이
				;그 이외
				ELSE
					PRINT 인간이
				ENDIF
				PRINTL 있다니 드물네요」
			ENDIF
			CFLAG:1001 = 1
		;연모
		ELSEIF TALENT:연모
			;방을 같게 했다
			IF CFLAG:MASTER:초기위치 == CFLAG:초기위치 && !CFLAG:1005
				PRINTFORML %마스터는% 인사도 하는 둥 마는 둥 파츄리와 함께 살고 싶은 것을 전했다
				PRINTL 「어아응……잘 부탁드립니다」
				CFLAG:1005 = 1
				SIF CFLAG:1001 < 2
					CFLAG:1001 = 2
			;방을 바꾸었다
			ELSEIF CFLAG:MASTER:초기위치 != CFLAG:초기위치 && CFLAG:1005 == 1
				PRINTFORML %마스터는% 말하기 어려운 듯이 파츄리와 방을 따로 하는 것을 고했다
				PRINTL 「그렇게……그것은……유감이구나」
				CFLAG:1005 = 2
			;방을 또 같게 했다
			ELSEIF CFLAG:MASTER:초기위치 == CFLAG:초기위치 && CFLAG:1005 == 2
				PRINTFORML %마스터는% 말하기 어려운 듯이 또 파츄리와 함께 살고 싶은 것을 전했다
				PRINTL 「그렇게……이번에는 쭉 함께 살 수 있으면(자) 좋아요」
				CFLAG:1005 = 1
			;연모 첫회만
			ELSEIF CFLAG:1001 < 2
				PRINTFORML 파츄리는 %CALLNAME:MASTER%의 모습을 보면(자) 손짓을 했다
				PRINTFORML %마스터가% 가까워지면(자) 얼굴을 끌어 들이고 귀엣말한다
				PRINTL 「저 열쇠는 언제라도 사용해 좋아요……에서도, 그다지 장난은 하지 않게」
				CFLAG:1001 = 2
			;연모 통상
			ELSE
				;도서관
				IF CFLAG:현재위치 == 310
					PRINTFORML 「%CALLNAME:MASTER%, 왔었던 것」
					SIF CFLAG:1001 < 3
						PRINTL 「여기에 있는 것은 어느 정도 좋아하게 사용해 좋아요……나를 포함해, 군요」
					PRINTL 히죽(방긋)하고 웃으면(자) 파츄리는 마음에 드는 장소로 허리를 안정시켰다
				;파츄리사실
				ELSEIF CFLAG:현재위치 == CFLAG:초기위치
					;MASTER의 개시 위치가 파츄리사실 이외
					IF CFLAG:MASTER:초기위치 != CFLAG:초기위치
						PRINTFORML 「내 서재에 어서 오세요. \@ YOGORE:311 >= 500 ?  청소하러 와 주었는지 해들? 그렇지 않으면 나를 만나러 와 주었어?  # 차에서도 마시면서 이야기할까요\@」
					ELSE
						PRINT 「돌아갔었던 것.
						;그 밖에 누군가 있다
						IF GET_TARGETNUM() > 2
							PRINTL 차, 끓여 줘」
						ELSE
							;파츄리가 졸린 경우(취침시간은 2시이니까 여유를 봐 전후 1시간씩)
							PRINTFORML \@ TIME >= 60 && TIME <= 180 ?  후아……무릎을 빌릴 수 있는 것일까?  # 휴식안? 나와 휴식으로 하지 않아?  \@」
						ENDIF
					ENDIF
				;그 이외
				ELSE
					PRINTFORML 파츄리는 %마스터가% 있는데 깨달으면(자) 체샤고양이와 같이 웃어 가까워져 왔다
				ENDIF
			ENDIF
		;그 이외
		ELSE
			;만난 회수에 의한 말
			IF TCVAR:350 > 5
				;성희롱 강도로 대사의 변경
				PRINTFORML \@ TCVAR:130 > 0 ?  파츄리는 무엇인가를 생각해 낸 얼굴로 %CALLNAME:MASTER%에 가까워져 온 # 「……. ……」 \@
			ELSEIF TCVAR:350 == 5
				PRINTFORML 「\@ TCVAR:130 > 0 ?  정말로 자주 만나요 저기, 뭐 좋아요 # 하아…… \@」
			ELSEIF TCVAR:350 == 4
				PRINTL 「……후우 , 오늘은 자주 만나요」
			;도서관
			ELSEIF CFLAG:현재위치 == 310 && RAND:2
				PRINTL 「청소를 해 주었는지 해들? 아, 그 옆의 책을 서투르게 읽으면(자) 감추어져요」
			;파츄리사실
			ELSEIF CFLAG:현재위치 == CFLAG:초기위치 && RAND:2
				PRINTL 「내가 없을 때에는 그다지 들어가지 않게 해 줘」
			;그 이외
			ELSEIF RAND:2
				PRINTL 「마침 잘되었네요, 차를 엄라고 정대」
			ELSE
				PRINTL 「좋은 타이밍에 있어요. 무엇인가 재미있는 이야기는 없을까」
			ENDIF
		ENDIF
		TCVAR:350 ++
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;TARGET가 목욕해 와 함께 들어간다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:연모
			PRINTL 「청소중이었는가 해들? 그것은 유감이구나……지금부터 우리들로 더럽히는데」
		ELSE
			PRINTFORML 「\@ TRAINNAME:PREVCOM == "청소" ?  청소중? 아무튼 좋아요, # 느긋하게 쉬고 있었는지 해들? 내도 \@들어오게 해 주어요」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGET가 목욕해 와 나와 갔다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGET가 목욕해 와 내쫓아졌다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;외출처에서 조우했다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;타캐릭터와 데이트중에 조우했다
	;ARG:1에 데이트상대
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML 「거기에 있는 거야?」
ENDIF
RETURN 1

;==================================================
;아침에 일어 났을 때(안녕 말)
;==================================================
@M_KOJO_EVENT_K54_2(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;통상 기상(정시가 되어 일어나는 등 )
	;비신사거주 캐릭터로 연모 미만의 경우는, 마음대로 방에 비집고 들어가 오고 있는 상태
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TIME == 600
			PRINTFORMW 「안녕, 눈이 뜨지며 제일에 %CALLNAME:MASTER%의 얼굴을 볼 수 있어 행복하구나」
		ELSE
			PRINTW 「잠자는 얼굴, 사랑스러웠어요」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;동침 기상
	;기입 체크(=0, 비표시, 1, 표시)
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 2
		;PRINTFORMW
		;RETURN 1
	;ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;자기 방에 돌아간다(정시가 되어 잔다)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「\@ BASE:체력 > 500 ?  후와∼……당신도 빨리 자는 편이 좋아요 # 이제(벌써) 안돼……쉬게 해 주어요 \@」
		PRINTW 그렇게 말하다가 남겨 파츄리는 자신의사실로 돌아와 갔다
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;졸린 듯이 하고 있다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;수면중(일어나지 않기 때문에 회화 라기 보다는 잠꼬대? )
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		$PACHE_SLEEP
		;매일 첫회만
		SIF !TCVAR:351 && CFLAG:MASTER:301 != CFLAG:초기위치
			PRINTFORML %마스터가% 방에 들어가면(자) 파츄리는 조용하게 자고 있었다
		IF !RAND:4
			PRINTFORML %마스터는% 파츄리에 소리없이 다가오면(자) 머리카락을 한 줌 있고 손에 들어, 털끝 쪽으로 손가락을 뽑았다
			PRINTW 파츄리의 잠자는 얼굴은 어딘가 만족한 듯 보였다
		ELSEIF !RAND:3
			PRINTFORML %마스터는% 파츄리의 뺨을 가볍게 쿡쿡 찔렀다
			PRINTL 파츄리는 싫어하도록(듯이) 목을 움직이면(자) 그 침을 흘리고 붐비었다
			PRINTFORMW %마스터는% 예상외의사태에 당황했다
		ELSEIF !RAND:2
			PRINTL 「으음…………」
			PRINTFORMW 파츄리\@ RAND:2 ?  (은)는 이불을 끌어들이도록(듯이) 배반했다 # 가 몸부림을 친다와 치마도 벗겨져 , 허벅지까지가 이슬 악어 되었다 \@
		ELSE
			PRINTFORML %마스터는% 조용히 파츄리의 가슴을 몰랑 몰랑 손대었다
			PRINT 「아…………응
			SETCOLOR 0xff1493
			FONTITALIC
			PRINTFORM %UNICODE(0x2665)%
			FONTREGULAR
			RESETCOLOR
			TRYCALL SET_KOJOCOLOR(TARGET)
			PRINTL 」
			PRINTW 파츄리는 요염한 소리를 내지만 아직 일어나는 기색은 없었다
		ENDIF
		TCVAR:351 ++
	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 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORML 「%CALLNAME:MASTER%……?  자면 의 것」
		PRINTFORMW 그렇게 말하면(자) 파츄리는 마법을 사용해 %CALLNAME:MASTER%의 몸을 떠오르게 해 방으로 옮겨 갔다
		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
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;방으로부터내쫒아졌다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			;시간에 따라 변화
			PRINTFORML 「\@ BASE:체력 > 500 ?  이제(벌써) 휴업(휴가)의 시간이야 # 지쳤기 때문에 나가있어 \@」
			PRINTFORMW 그렇게 말하면(자) 파츄리는 %마스터를% 방의 밖으로 내면(자) 열쇠를 걸었다
		ENDIF
	ENDIF
	;-------------------------------------------------
	;비거주 TARGET가 MAIN_MAP로 휴식
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;멈춰 섰다
	;이 후 만남 말에 접속
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:연모
			IF !RAND:2
				PRINTFORMW 파츄리는 아직 들어 온 %마스터를% 알아차리지 않는 것 같다
			ELSE
				PRINTFORMW %마스터가% 들어 왔던 것에 깨달은 파츄리는 뺨을 느슨하게했다
			ENDIF
		ELSE
			IF !CFLAG:1001
				PRINTFORMW 보라색의 머리카락을 한 소녀는 %CALLNAME:MASTER%의 존재를 보고 세우면(자) 아 무성해에 눈썹을 찌푸렸다
			ELSEIF !RAND:2
				PRINTFORMW 파츄리는 들어 온 %마스터를% 보면(자)\@ TCVAR:130 ?  한 번 # 꼭 좋을 것 같게 \@책에 눈을 떨어뜨렸다
			ELSE
				PRINTFORMW %마스터는% 파츄리를 알아차린다고 이야기를 방법구 접근했다
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;가볍게 인사 해 통과했다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;무시해 통과했다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:연모
			;깨닫기도 깨닫지 않기도 하고
			IF !RAND:4
				PRINTFORML 파츄리는 책을 묵묵히 읽고 있어 %CALLNAME:MASTER%\@ CMATCH(CFLAG:320, 0,1, CHARANUM) < 6 ?  들 # \@을 알아차리지 않는 것 같다
				PRINTFORMW %CALLNAME:MASTER%\@ CMATCH(CFLAG:320, 0,1, CHARANUM) < 6 ?  들 # \@은 파츄리의 독서를 방해 하지 않게 조용하게 통과했다
			ELSEIF !RAND:3
				PRINTFORML 파츄리는 소리를 알아차려 얼굴을 올리면(자)%마스터와% 눈이 만났다
				PRINTFORMW %마스터가% 쓴웃음 기색에 미소지으면(자) 파츄리는 그 의미를 이해해 수긍해, 책에 눈을 떨어뜨렸다
			ELSEIF !RAND:2
				PRINTFORML %마스터는% 책을 보면서 진지하게 무엇인가를 쓰기와 째라고 있는 파츄리를 알아차렸다
				PRINTW 무엇인가 투덜투덜 말하면서 메모를 취하는 파츄리의 방해를 하지 않게 통과했다
			ELSE
				PRINTFORML %마스터가% 들어 왔던 것에 깨달은 파츄리는 미소지었다
				PRINTFORMW 그런 파츄리의 횡발을 한 번 빗고 와, %마스터는% 통과해 갔다
			ENDIF
		ELSE
			;온전히 인사를 하고 있지 않다
			IF !CFLAG:1001
				PRINTFORMW 보라색의 머리카락을 한 소녀는 %마스터를% 알아차려, 시선을 돌림 하지만 멈추는 모습이 없는 것을 미도리와 곧바로 책에 눈을 떨어뜨렸다
			ELSEIF !RAND:4
				PRINTFORML 「소악마\@ CFLAG:2:300 == CFLAG:3:300 ?  , 차를 엄라고 정대 # 없는거야―？ \@」
				PRINTFORMW 파츄리는 %CALLNAME:MASTER%에 눈치도 하지 않고 소악마\@ CFLAG:2:300 == CFLAG:3:300 ?  에 차의 재촉을 했다 # 를 찾고 있었다 \@
			ELSEIF !RAND:3
				PRINTFORMW 파츄리는 %마스터가% 바쁜 듯이 지나갈 뿐의를 다만 바라보고 있었다
			ELSEIF !RAND:2
				PRINTFORML 파츄리는 꾸벅꾸벅으로 하고 있어 %마스터를% 알아차린 모습은 없었다
				PRINTFORMW %마스터는% 그것을 곁눈질로 보면서 통과했다
			ELSE
				PRINTFORML %마스터는% 파츄리가 보고 있는데 깨달으면(자) 멈춰서 일례를 했다
				PRINTFORMW 파츄리는 아무것도 신경쓴 모습은 없게 독서를 재개했다
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;그 외
	PRINTL 「하아……」
	PRINTW 파츄리는 무겁기 때문에 한숨 돌렸다
ENDIF
RETURN 1

;==================================================
;다른 사람 개입으로 무드 변화
;==================================================
@M_KOJO_EVENT_K54_5(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------

IF LOCAL
	;우후후 안이라면 간단히
	IF CFLAG:317
		PRINTW 「……!」
	;메이링
	ELSEIF ARG == [[메이링]]
		;수위 오두막
		IF CFLAG:현재위치 == CFLAG:ARG:초기위치
			PRINTL 「메이링, 방을 빌리고 있어요」
			PRINTFORMW 파츄리는 자연스럽게%CALLNAME:MASTER%로부터 거리를 취하면 메이링에 웃는 얼굴을 향했다
		;도서실
		ELSEIF CFLAG:현재위치 == 310
			PRINTFORML 「이런 곳에 드물네요\@ TIME >= 720 && TIME <= 1020 ?  , 또 낮잠 까 # …… \@」
			PRINTFORMW 파츄리는 메이링에 얘기하지만 테이블의 하\@ TALENT:연모 ?  그리고 연결한 %CALLNAME:MASTER%의 손을 떼어 놓는 것은 없었다 # 에서는 %CALLNAME:MASTER%의 소매를 가볍게 당기고 있었다 \@
		;정
		ELSEIF CFLAG:현재위치 == 302 || CFLAG:현재위치 == 306
			PRINTFORMW 「\@ TALENT:연모 ?  이런 곳에서 만난다고는 우연……, 우리들? ……운동을 하러 왔어요 # 마침 잘되었네요……메이링, %CALLNAME:MASTER%에 연습을 붙여 주며 \@」
		;대목욕탕
		ELSEIF CFLAG:현재위치 == 333
			PRINTFORMW 「\@ TALENT:연모 ?  어머나 메이링, 들어가지 않는거야? ……매우 기분이 좋아요 # 욕실, 먼저 받고 있는 원이야 \@」
		;그 이외
		ELSE
			PRINTFORML 「하아……%CALLNAME:MASTER%, 미안하지만 차를 엄라고」
			PRINTL 파츄리는 그렇게 말하면(자) 메이링을 손짓 했다
			PRINTW 「메이링도 그런 곳에 우뚝서지 말고 함께 차로 합시다」
		ENDIF
	;소악마
	ELSEIF ARG == [[소악마]]
		;소악마사실
		IF CFLAG:현재위치 == CFLAG:ARG:초기위치
			PRINTL 「방을 빌리고 있어요, 소악마」
			PRINTFORMW 파츄리는 %CALLNAME:MASTER%로부터 멀어지는 모습도 없고 소악마에 말했다
		;도서관
		ELSEIF CFLAG:현재위치 == 310
			PRINTFORML 「\@ TALENT:연모 ?  어느 의미 타이밍이 좋아요…… # 소악마, 그쪽의 책장의 정리를 부탁 \@」
			PRINTFORMW 파츄리는\@ TALENT:연모 ?  소악마의 등장에 조금 기분이 안 좋게 되었지만, 곧바로 침착해 「어쩔 수 없네요」와 눈으로 신호를 해 온 # 들어 온 소악마에 일의 지시를 내리기 시작했다 \@
		;정
		ELSEIF CFLAG:현재위치 == 302 || CFLAG:현재위치 == 306
			PRINTL 「뭐? 내가 여기에 있는 것이 그렇게 드물까?」
			PRINTW 파츄리는 눈을 활짝 열며 놀라는 소악마를 가볍게 나무랐다
		;대목욕탕
		ELSEIF CFLAG:현재위치 == 333
			PRINTFORML 「소악마\@ TALENT:연모 ?  도 %CALLNAME:MASTER%에 등을 흘려 주면(자)? 기분이 좋아요 # , 사양하지 않고 들어 오세요 \@」
			PRINTFORMW 파츄리는\@ TALENT:연모 ?  매우 기분이 좋게 주인의 여유를 보이면서 # 문을 연 상태로 내내 서 있고 있는 \@소악마를 권했다
		;파츄리사실
		ELSEIF CFLAG:현재위치 == CFLAG:초기위치
			PRINTL 「소악마 아무쪼록 했어?」
			PRINTFORMW 파츄리는 소악마\@ TALENT:연모 ?  의 내방을 %마스터와% 함께 # 를 상냥하게 \@맞아들였다
		;그 이외
		ELSE
			PRINTFORML 「%CALLNAME:MASTER%, 차를 엄라고 주어? ……소악마, 들어와 주세요」
			PRINTW 파츄리는 소악마의 기색을 알아차리면(자) 1개 한숨 돌리고 나서 상냥하게 불러왔다
		ENDIF
	;사쿠야
	ELSEIF ARG == [[사쿠야]]
		;사쿠야사실
		IF CFLAG:현재위치 == CFLAG:ARG:초기위치
			PRINTL 「딱 좋았다, 사쿠야, 가끔씩은 당신의 끓인 차를 마시고 싶어요」
			PRINTW 방의 주인이 들어 왔는데도 관계없이 파츄리는 그 주인에게 향해 차를 주문했다
		;도서관
		ELSEIF CFLAG:현재위치 == 310
			PRINTL 「아, 사쿠야……청소일까?」
			PRINTFORMW 파츄리는 조금 유감스럽게 %CALLNAME:MASTER%에 시선을 보냈다
		;정
		ELSEIF CFLAG:현재위치 == 302 || CFLAG:현재위치 == 306
			PRINTL 「내가 밖으로 나가고 싶고들 있고로 거기까지 놀랄 필요는 없다고 생각하는데……」
			PRINTW 파츄리는 사쿠야가 놀랐던 것에 조금 쇼크를 받은 것 같다
		;대목욕탕
		ELSEIF CFLAG:현재위치 == 333
			PRINTFORML 「\@ TALENT:연모 ?  사쿠야, 조금 뜨겁지만 기분이 좋아요 # 소쇄인 메이드도 땀은 긁군요 \@」
			PRINTFORMW \@ TALENT:연모 ?  타올로 단단히가이드 한 사쿠야를 봐 파츄리는 형식적일 정도로 숨긴 # 파츄리는 조금 감탄한 것처럼 인간으로서는 매우 당연한 것을 말했다 \@
		;파츄리사실
		ELSEIF CFLAG:현재위치 == CFLAG:초기위치
			PRINTFORML 「사쿠야? 청소\@ TALENT:연모 ?  (이)라면%CALLNAME:MASTER%에 맡겨 있기 때문에 괜찮아요?  # (은)는 지금은 필요없어요 \@」
			PRINTW 갑작스러운 사쿠야의 방문에 파츄리는 조금 당황한 것 같다
		;그 이외
		ELSE
			PRINTFORML 「변함없이 바쁜 것 같구나……%CALLNAME:MASTER%, 차를 엄여(어) 주며」
			PRINTW 파츄리는 공기가 바뀐 것을 그다지 신경쓴 바람도 없고 사쿠야에 차를 권했다
		ENDIF
	;레밀리아
	ELSEIF ARG == [[레밀리아]]
		;레밀리아 사실
		IF CFLAG:현재위치 == CFLAG:ARG:초기위치
			PRINTL 「방을 빌리고 있어요, 레미」
			PRINTFORMW 레밀리아에 변변치 않다고 말해져 쓴웃음 짓고 있는 파츄리의 옆에서 %마스터는% 차의 준비를 시작했다
		;도서관
		ELSEIF CFLAG:현재위치 == 310
			PRINTL 「레미, 도서실에 와도 이제 바다는 없어요」
			PRINTW 요염한 일을 하는 것 같은 공기가 아닌 것을 헤아린 파츄리는 레밀리아에 조금의 빈정거렸다
		;파츄리사실
		ELSEIF CFLAG:현재위치 == CFLAG:초기위치
			PRINTL 노크도 없이 갑자기 카이네를 미치게 하고 연 문에 파츄리들은 뛰어넘도록(듯이) 놀랐다
			PRINTW 카이네를 미치게 한 범인인 레밀리아는 소리를 높여 웃어, 처음에는 멍하니 하고 있던 파츄리들도 이끌려 웃었다
		;대목욕탕
		ELSEIF CFLAG:현재위치 == 333
			PRINTFORML 「\@ TALENT:연모 ?  레미, 그렇게 우리들과 함께 들어가고 싶었어?  # 몸을 씻는데 흐름수를 사용하지만 괜찮아?  \@」
			PRINTFORMW 파츄리는 %CALLNAME:MASTER%\@ TALENT:연모 ?  의 팔을 잡으면서 레밀리아에 웃어 걸쳤다 # 로부터 멀어지고 레밀리아 쪽으로 모여 갔다\@
		;그 이외
		ELSE
			PRINTL 「관의 당주는 자유 제멋대이구나」
			PRINTFORMW 파츄리는 %마스터와% 미소를 주고 받으면(자) 레밀리아를 위해서(때문에) 장소를 열었다
		ENDIF
	;연모로 유폐 해제이므로 죽어 분기가 많은 플랑도르
	ELSEIF ARG == [[플랑]]
		;지하실(좋은 분위기로 지하실에 데리고 나가면 볼 수 있어? )
		IF CFLAG:현재위치 == CFLAG:ARG:초기위치
			PRINTL 「어머나 여동생님, 여기는 도서관 같아서 기분은 의외로 나쁘지 않네요……에서도 숨이 막힐 것 같다」
			PRINTFORMW 「……여기에 가두고 있는 우리들의 대사도 아니네요」라고 조금 후회를 숨긴 얼굴로 파츄리는 계속했다
		;도서관
		ELSEIF CFLAG:현재위치 == 310
			PRINTL 「여동생님, 어서오세요……책은 읽어도 괜찮지만 부수지 않게 조심해」
			PRINTFORMW 파츄리는 플랑도르\@ TALENT:연모 ?  에 모친과 같은 웃는 얼굴을 향한 # 쪽을 봐 상냥하게 말했다\@
		;파츄리사실
		ELSEIF CFLAG:현재위치 == CFLAG:초기위치
			PRINTFORML 「\@ CFLAG:1002 ?  오세요, 여동생님 # 내가 지하실에 가는 것은 있어도 여동생님이 여기에 와본 것은 처음 \@」
			PRINTW 파츄리는 플랑도르가 여기에 온 것을 기뻐하고 있는 것 같다
			CFLAG:1002 = 1
		;대목욕탕
		ELSEIF CFLAG:현재위치 == 333
			PRINTFORML 「여동생님,\@ TALENT:연모 ?  머리카락을 씻어 주어요. 여기에 부디 # 몸을 씻고 나서 목욕통에 익도록(듯이) 부탁해요\@」
			PRINTFORMW 파츄리는 그렇게 말하면(자)%CALLNAME:MASTER%로부터 멀어졌다
		;그 이외
		ELSE
			PRINTL 「이러니 저러니 해도 여동생님도 레미를 꼭 닮구나……」
			PRINTFORMW %마스터와% 얼굴을  아울러 미소지으면(자) 플랑도르를 손짓 했다
		ENDIF
	;그 이외(파츄리라든지? )
	ELSE
		IF ARG == 54
			PRINTW 「나는 무엇으로 분신 하고 있을까」
		ELSE
			PRINTW 「분위기 파악 못하는 쥐군요」
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;정사를 목격했다
;==================================================
@M_KOJO_EVENT_K54_6(ARG, ARG:1)
;말 주인은 TARGET
;ARG에 정사 상대
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;정사를 목격했다(친해져도:저)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTW 「유감이지만, 거기까지」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;질 수 없어 참가(친해져도:고)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORM 「아라,
		IF ARG == [[레밀리아]]
			PRINT 레미,
		ELSEIF ARG == [[플랑]]
			PRINT 여동생님,
		ENDIF
		PRINTW 즐거운 듯 하는 일을 해. 나도 섞이게 해 주어요」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;어색한 듯이 떠난다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF CFLAG:PLAYER:우후후 == 2
			PRINTW 「에~그럼……이것은 어떤 상황일까……」
		ENDIF
		RETURN 1
		;-------------------------------------------------
		;마그 깨었다(MASTER가 삽입중)
		;-------------------------------------------------
		IF MASTER_POSE(SET_V, SET_P, 1)
			PRINTW 「……좋은 곳이었다 같구나」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;마그 깨었다(MASTER에 삽입중)
		;기입 체크
		;-------------------------------------------------
		IF MASTER_POSE(SET_P, 6,1)
			PRINTW 「삽입중? 나빴어요」
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;MASTER에 이끌려 참가
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG:1 == 4
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;정사를 볼 수 있었다(목격자의 친해져도:저)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		;사쿠야
		IF ARG == [[사쿠야]]
			IF MASTER_POSE(SET_V,SET_P,1)
				PRINTL 「의외로 남의 눈에 띌까……장소가 나빴는지」
			ELSEIF MASTER_POSE(SET_P,6,1)
				PRINTFORML 의외로 기분이 좋은거야? 라고 파츄리는 사쿠야에 말하면서 %CALLNAME:MASTER%로부터 멀어졌다
			ELSE
				PRINTL 「사양이 없는……이제 멈추어요」
			ENDIF
		;파츄리사실
		ELSEIF CFLAG:현재위치 == CFLAG:초기위치
			;소악마에 보여졌다
			SIF ARG == [[소악마]]
				PRINTL 「주인의 방에 들어가는데 대답을 기다리지 않고 들어 온다고는……어떤 생각일까」
			PRINTFORML 파츄리는 당황하는 것도 아니고\@ EQUIP:0 ?  흐트러진 옷을 준비하고 # 자신의 침대의 주위에 산란한 옷을 껴입기 \@시작했다
		;대목욕탕
		ELSEIF CFLAG:현재위치 == 333
			PRINTFORML 파츄리는 침착한 모습으로 %CALLNAME:MASTER%로부터 멀어지고\@ TALENT:연모 ?  무사히, %CALLNAME:MASTER%의 근처에 허리를 안정시킨 # , 타올로 몸을 숨겼다 \@
		;침대가 있는 곳(중)
		ELSEIF BEDROOM()
			PRINTFORML 파츄리는 당황하는 일 없이\@ EQUIP:0 ?  흐트러진 옷을 준비하고 # 침대의 주위에 산란한 옷을 껴입기 \@시작했다
		;그 이외
		ELSE
			PRINTFORML 파츄리는 「장소가 나빴는지 해들……」등이라고 중얼거리면서 %CALLNAME:MASTER%로부터 멀어졌다
		ENDIF
		PRINTFORMW 「아무튼 볼 수 있었다면 어쩔 수 없네요……\@ TALENT:연모 ?  다음은 또 합시다 # 어쩔 수 없네요 \@」
		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_K54_8(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;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_K54_9(ARG, ARG:1)
#DIM 종류
#DIM 팬티소유
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
팬티소유 = 0
FOR 종류, 0, MAXPANTS
	IF PANTS_TEMP:54:종류
		팬티소유 = 1
		BREAK
	ENDIF
NEXT
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;같은 장소에 있어 팬티를 회수되었다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		;연모
		$BOSSYU
		IF TALENT:연모
			;불합리
			PRINTFORML 「\@ 팬티소유 ?  나보다 팬티(분)편이 좋은거야!# 어째서 나의 팬티가 아닌거야!\@」
			PRINTL 파츄리일까하고 화나 있다
			PRINTW 「이제(벌써)!몰수!」
		ELSE
			;무엇 패턴인가 있는 편이 괜찮을까?
			PRINTFORML 「\@ 팬티소유 ?  어째서 나의 팬티가 당신의 포켓트로부터 나올까?  # 이것은 당신의 팬티라고는 도저히 생각되지 않지만 \@」
			PRINTFORML %마스터는% 파츄리로부터 눈을 일등 해 아무것도 대답할 수 없었다
			PRINTL 「하아……이것은 세탁롱에 넣어 두어요」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;원거리이동중에 팬티를 회수되었다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		GOTO BOSSYU
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;MASTER를 덮치기(개시시)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:연모
			PRINTW 「저항해도 돼요……떼어 놓을 생각은 없는데」
		ELSE
			PRINTW 「조금 나의 실험에 교제하세요」
			TCVAR:352 = 1
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;달랠 수 있었다(종료시)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;만족하고 있지 않지만 끝. 아마 곧 밀어 넘어뜨려진다
		IF CFLAG:욕구불만도 > 300
			PRINTL 「아……이제, 끝이야?」
			PRINTFORMW 파츄리는 %마스터가% 떨어져 옷을 정돈하는 것을 원망스러운 듯이 보고 있었다
		ELSEIF TALENT:연모
			PRINTL 「대만족이예요……또 합시다」
			PRINTFORMW 파츄리는 그렇게 말하면(자)%CALLNAME:MASTER%의 뺨에 키스를 했다
		ELSEIF TCVAR:352
			PRINTFORML %마스터가% 발버둥 쳐 빠져 나가려고 하면(자) 파츄리는 간단히와 떨어졌다
			PRINTW 「응, 이젠 상관없어요……또 실험에 교제해」
		ENDIF
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1
;IF TALENT:연모
;	PRINTW 「안 돼요, 나는 만족하고 있지 않아요」
;ELSEIF TCVAR:352
;	PRINTW 「이봐、 아직 실험은 끝나지 않다」
;ENDIF
RETURN 0
;==================================================
;목욕탕에서 만남
;==================================================
@M_KOJO_EVENT_K54_11(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;내쫓아졌다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;시선이 마주쳤다(내쫓아지지 않다)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;내쫓아진다(분노)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;침상에 침입
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;침상에 침입(상대가 연모)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;침상에 침입(상대가 연모·쇠약)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;내쫓아진다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;내쫓아진다(쇠약)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1

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

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

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

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

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

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;미실장(덮치기 커맨드에 통합?
	;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_K54_16(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;동침을 시작한(개시시)(존재하지 않고
	;기입 체크
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;동침을 종료했다(종료시)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;시간정지 종료시
;==================================================
@M_KOJO_EVENT_K54_17(ARG, ARG:1)
;말 주인은 TARGET
;배타와 명기되어 있지 않은 물건은 상황에 따라서는 연속으로 표시되므로 주의
;ARG에 사정 상황
;ARG:1에 사정 상태
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;ARG=1~3은 배타
	;수수께끼의 쾌감
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;절정
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;팬티 분실
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【무자각입안 사정】
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;정액중독저정음
		IF ARG:1 == 1
		;정액중독저토출
		ELSEIF ARG:1 == 2
		;정액중독저손으로 가린다
		ELSEIF ARG:1 == 3
		;정액중독고정음
		ELSEIF ARG:1 == 4
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【무자각안면 사정】
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;정음경험 있어 닦아 잡기
		IF ARG:1 == 1
		;정음경험 이루어 닦아 잡기
		ELSEIF ARG:1 == 2
		;얼굴에 사정하기 정액 빨고 새
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【무자각수음 사정】
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;닦아 잡기
		IF ARG:1 == 1
		;빨고 새
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【무자각애널사정】
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;A감각 0
		IF ARG:1 == 1
		;그것 이외
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【무자각처녀상실】
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【무자각질내사정】
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;비처녀 질내사정 피임약 없음
		IF ARG:1 == 1
		;비처녀 질내사정 피임약 있음
		ELSEIF ARG:1 == 2
		;처녀 질내사정
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;싱싱한으로 시켜라 때
;==================================================
@M_KOJO_EVENT_K54_18(ARG, ARG:1)
;말 주인은 TARGET
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;피임요구 대사
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;끊었다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;끊었는데 다 달라붙어 끊어졌다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;위험일 이외 허가
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;위험일 허가
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;신사 생활을 승인해 받는다
;==================================================
@M_KOJO_EVENT_K54_19(ARG, ARG:1)
;말 주인은 ARG
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;인정된다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;인정되지 않는다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;귀가시
;==================================================
@M_KOJO_EVENT_K54_20(ARG, ARG:1)
;말 주인은 LOCALS or RESULT
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;통상 귀가
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;데이트중 귀가
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;현관앞에서 보류
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;함락 소질 취득시
;==================================================
@M_KOJO_EVENT_K54_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_K54_22(ARG, ARG:1)
;말 주인은 ARG
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------
IF LOCAL
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;목욕탕 데리고 나가
;==================================================
@M_KOJO_EVENT_K54_23(ARG, ARG:1)
;말 주인은 LOCAL
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;거절당했다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;함께 들어가 주었다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;회임
;==================================================
@M_KOJO_EVENT_K54_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_K54_25(ARG, ARG:1)
;말 주인은 LOCAL
;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;연모
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;사모
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;함락 소질 없음
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;무자각
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;그 외
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;딸딸이들킴
;==================================================
@M_KOJO_EVENT_K54_26(ARG, ARG:1)

;--------------------------------------------------
;기입 체크(=0, 비표시, 1, 표시)
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;볼 수 있던 순간
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;아무것도하지않는다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;그대로 속행
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;추방
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;해 치운다
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;사후
		;기입 체크(=0, 비표시, 1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF

@PATCHOULI_GASPING_VOICE(ARG, ARG:1)
;감각에 의해 바뀐다
;ARG가 허덕여 번, ARG:1이 허덕여소리, ARG:2가 그다지 느끼지 않았다
;루프 회수의 조절
SIF ARG:1 > ARG
	ARG:1 = ARG
ARG:2 = ARG - ARG:1
PRINT 「
WHILE ARG
	IF ARG:2 && RAND:2
		PRINTDATA
			DATA ……
			DATA ……
			DATA …응
			DATA 응―
			DATA 아―
			DATA 구
		ENDDATA
		ARG --
		ARG:2 --
	ENDIF
	SIF !ARG
		BREAK
	IF ARG:1 && RAND:2
		PRINTDATA
			DATA 아
			DATA …응
			DATA 히
			DATA 다, 안 돼!
			DATA 나
			DATA …거기
			DATA 으응--…
			DATA …아
			DATA 거기는!
			DATA 그렇게 하면(자)
			DATA 기분이……좋은거야…
			DATA !
			DATA …으음∼
			DATA 하아앗 아앗…
			DATA …좀 더
			DATA 좋은, 좋은 것!
			DATA 인가……하앗…
			DATA …꺅…
		ENDDATA
		ARG --
		ARG:1 --
	ENDIF
WEND
IF TALENT:연모 && !RAND:4
	SETCOLOR 0xff1493
	FONTITALIC
	PRINTFORM %UNICODE(0x2665) * 2%
	FONTREGULAR
	RESETCOLOR
	TRYCALL SET_KOJOCOLOR(TARGET)
ENDIF
PRINTW 」
[SKIPEND]

path: ERB/대사_메시지관련/개인대사/054 파츄리/M_KOJO_K54_イベント_t.ERB