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


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에 상관없이 한 마음에 의한 수정을 허가합니다
;그 때는 원처리를 삭제하지 않고 코멘트 아웃 해 수정 처리를 삽입해 주세요

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

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

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

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

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

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

;押し倒し禁止に1を入れると、自分から押し倒してこなくなります
;以下は恋慕かセフレがつくまで押し倒してこなくなる使用例
;IF !TALENT:X:恋慕 && !TALENT:X:セフレ
;	CFLAG:X:押し倒し禁止 = 1
;ELSE
;	CFLAG:X:押し倒し禁止 = 0
;ENDIF

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

;### 구상색판정 ###################################
@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 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORML 「거기 있는 거야?」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;타캐릭터와 데이트중에 조우했다
	;ARG:1에 데이트상대
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML 「거기 있는 거야?」
		RETURN 1
	ENDIF
	; ;그 외
	; PRINTFORML 「거기에 있는 거야?」
ENDIF
RETURN 1

;==================================================
;아침에 일어 났을 때(안녕 말)
;==================================================
@M_KOJO_EVENT_K54_2(ARG,ARG:1)
CALL MESSAGE_GOODMONING(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 = 1
	;-------------------------------------------------
	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 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		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
			;그 외
			PRINTL 꾸벅
			PRINTW 독서를 계속하면서도 가볍게 인사를 해 주었다
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;무시해 통과했다
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;온전히 인사를 하고 있지 않다
		IF !CFLAG:1001
			PRINTFORMW 보라색의 머리카락을 한 소녀는 %마스터를% 알아차리고, 시선을 향했지만 멈출 기미가 없는 것을 보자마자 책으로 눈을 돌렸다
		ELSEIF !RAND:5
			PRINTFORML 「소악마\@ CFLAG:2:300 == CFLAG:3:300 ?  , 차를 내려 주세요 # 없는 거야 ―？ \@」
			PRINTFORMW 파츄리는 %CALLNAME:MASTER%를 눈치 채지 못하고 소악마\@ CFLAG:2:300 == CFLAG:3:300 ?  에게 차를 재촉했다 # 를 찾고 있었다 \@
		ELSEIF !RAND:4
			PRINTFORMW 파츄리는 %마스터가% 그저 바쁘게 지나가는 것을 바라보기만 했다
		ELSEIF !RAND:3
			PRINTFORML 파츄리는 꾸벅꾸벅 하고 있어서 %마스터를% 알아차린 것 같지는 않았다
			PRINTFORMW %마스터는% 그걸 곁눈질로 보면서 지나갔다
		ELSEIF !RAND:2
			PRINTFORML %마스터는% 파츄리가 보고 있는 것을 깨닫자 멈춰 서서 예를 표했다
			PRINTFORMW 파츄리는 아무 신경 쓰는 기색 없이 독서를 재개했다
		ELSE
			PRINTL 「…………」
			PRINTW 파츄리는 독서에 집중하느라 이쪽을 깨닫지 못한 것 같다
		ENDIF
		RETURN 1
	ENDIF
ENDIF

;==================================================
;다른 사람 개입으로 무드 변화
;==================================================
@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 파츄리는 소악마의 낌새를 알아차리자 숨을 한 번 내쉬고 부드럽게 불러들였다
		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 ;KR판 오리지날. 일판에선 off
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;정사를 볼 수 있었다(목격자의 친해져도:저)
	;기입 체크(=0, 비표시, 1, 표시)
	LOCAL:1 = 1 ;KR판 오리지날. 일판에선 off
	;-------------------------------------------------
	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 」

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