code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;일상계 커맨드
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;300,회화
;TFLAG:193 (1=대성공 0=성공 -1=실패 -2=대실패 (TARGET이 MASTER보다 교양이 4이상 높다))
;TCVAR:302 (0=회화가능 1>=비연모시 회화불가)
;MARK:반발각인 (3이상=회화불가)(4이상은 버그)
;TCVAR:만취 (1=통상성공or대실패)
;==================================================
@M_KOJO_SUCCESS_COM_K6_300
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_300
;커맨드 공통 메시지(TRAIN_MESSAGE)
;삭제하면 「~이야기를 했다.」 이런 것들이 사라집니다. 또, 삭제했을 경우는 자동으로 구상색이 붙지 않습니다.
CALL TRAIN_MESSAGE
;구상메인호출
CALL M_KOJO_MESSAGE_COM_K6_300_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_300_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		ELSEIF CFLAG:318 == 1
			PRINTFORML 「………」
		ELSEIF TALENT:연모
			SELECTCASE RAND:11
				;CASE 9
					;PRINTFORML
					;PRINTFORMW
				;CASE 8
					;PRINTFORML
					;PRINTFORMW
				;CASE 7
					;PRINTFORML
					;PRINTFORMW
				CASE 6
					PRINTFORML 「조금 기다려」
					PRINTFORML 루나가 손가락으로 딱 소리를 내자 주변 소리가 사라졌다。
					PRINTFORML 「조용해지면 이야기 하기 쉽죠」
					PRINTFORMW 「그러니까 저기… 무슨 말을 해도 괜찮으니까…」
				CASE 5
					PRINTFORML 「저기、%CALLNAME:MASTER%는 어떤 아가씨가 취향？」
					PRINTFORMW 「…역시 어른 여자를 좋아하는 거야…？」
				CASE 4
					PRINTFORML 「나는 %CALLNAME:MASTER%에의 장난은 그만두지 않을거야」
					PRINTFORMW 「왜냐하면 %CALLNAME:MASTER%가 깜짝 놀라는 모습을 보고 싶은 걸」
				CASE 3
					PRINTFORML 「저、저기 우리들 옆에서 보면… 어、어떤 관계로 보일까？」
					PRINTFORML 「사이 좋은 친구들？……… 그、그렇구나。그렇게 보이겠네」
					PRINTFORMW 「… 하아」
				CASE 2
					PRINTFORML 「스타ー에게서 장미를 건네받았는데…」
					PRINTFORML 「『루나에게는 이 장미에 가시가 없는 것처럼 보일까？』라지 뭐야」
					PRINTFORMW 「하아… 스타ー는 이따금 뭘 생각하는지 모르겠어요」
				CASE 1
					PRINTFORML 「…저기、뭔가 바뀐 것 같지 않아？」
					PRINTFORML %CALLNAME:MASTER%가 주의 깊게 보니 루나는 루나는 검정 리본을 머리에 달고 있는 것 같았다。
					PRINTFORMW 잘 어울려 라고 %CALLNAME:MASTER%가 말해주자 루나의 뺨이 어렴풋이 붉게 물들었다。
				CASE 0
					PRINTFORML 「포ー…」
					PRINTFORML 「…아、미안합니다。듣지 못했어요」
					PRINTFORMW 「에ー 저기… 잉어와 산에 사는 마귀할멈 이야기였던가？」
				CASEELSE
					PRINTFORML 「최근 %CALLNAME:MASTER%과 있으면 가슴이 두근두근 거리는데 원인을 모르겠어…」
					PRINTFORMW 「설마 %CALLNAME:MASTER%에게 감기라도 옮은건가…？」
			ENDSELECT
		ELSEIF TALENT:사모
			SELECTCASE RAND:9
				;CASE 7
					;IF DAY:2 == 3
					;PRINTFORML 「가을이었을까。논에 널어놓은 볏짚을 셋이서 휘두르며 놀고 있었어」
					;PRINTFORML 「그랬더니 별안간 가을의 신이 나타나서 과자를 준거야。…기분 나빴어」
					;PRINTFORMW 「지금이라도 만나러 가면 과자 줄까…」
				CASE 6
					PRINTFORML 「남자아이니까 정신 차리지 않으면 안 돼」
					PRINTFORMW 「환상향은 여걸이 많기 때문에」
				CASE 5
					PRINTFORML 「어제는 두 명도 참 너무한 거야。나만 두고 도망쳐 버린 걸」
					PRINTFORMW 「서니ー와 스타ー 이 야박한 녀석ー！……%CALLNAME:MASTER%는 그런 일 하지 않지요？」
				CASE 4
					PRINTFORML 「근데 가까이서 보니 우리와 역시 다르군요」
					PRINTFORMW 「같은 키라도 힘이 나보다 더 세고… 뭔가 옮길 때는 도와 달라고 할까」
				CASE 3
					PRINTFORML 「소리를 지울 뿐이라、소리가 사라지면 내가 가까이 있는 줄 안다고？」
					PRINTFORMW 「………맹점이었네요」
				CASE 2
					PRINTFORML 「…%CALLNAME:MASTER%。혹시 키가 자랐어？」
					PRINTFORMW 「우리들 요정은 성장 같은 거 하지 않으니까、조금 부럽네요」
				CASE 1
					PRINTFORML 「%CALLNAME:MASTER%는 유령은 무섭지 않아？」
					PRINTFORML 「대체 뭐가 무서운지는 모르겠지만 나는 무서운걸… 부들부들」
					PRINTFORMW 「전에는 유령 사냥을 할 정도였는데」
				CASE 0
					PRINTFORML 「%CALLNAME:MASTER%는 왠지 느긋해 보이네」
					PRINTFORMW 「그렇게 우쭐거리다간 텐구한테 잡혀 가는 거야」
				CASEELSE
					PRINTFORML 「나와 서니ー가 있으면 모습도 소리도 지울 수 있으니까」
					PRINTFORMW 「그렇게 생각하다 발견된 것이 부지기수라서…。하아…」
			ENDSELECT
		ELSE
			SELECTCASE RAND:5
				CASE 3
					PRINTFORML 「올해는 평소보다 비가 많은 것 같아요」
					PRINTFORMW 「뭔가의 이변이라면 날뛸 수 있을 텐데」
				CASE 2
					PRINTFORML 「이렇게 보여도 %CALLNAME:MASTER%보다 훨씬 오래 산거야」
					PRINTFORMW 「… 라곤 해도 할머니가 아니에요！」
				CASE 1
					PRINTFORML 「환상향에는 이제 익숙해졌을까」
					PRINTFORMW 「너무 익숙해져서 머리가 요괴의 산의 무녀처럼 되도 곤란하지만」
				CASE 0
					PRINTFORML 「나 이외의 요정을 만나 보고 싶다고？」
					PRINTFORML 「그렇다면 미혹의 대나무숲이나 안개의 호수에 가면 만날 수 있어」
					PRINTFORMW 「다만… 호수의 빙정에게는 목숨이 아까우면 가까이 가지 않는 것이 신상에 좋아요」
				CASEELSE
					PRINTFORML 「못된 장난이야말로 요정의 사명」
					PRINTFORML 「그렇다 하더라도 역시 장소를 분별하는 정도는 해요」
					PRINTFORMW 「…… 기분이 내키면」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;301,차를 탄다
;TFLAG:193 (1=대성공 0=성공 -1=실패)
;==================================================
@M_KOJO_SUCCESS_COM_K6_301
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_301
CALL M_KOJO_MESSAGE_COM_K6_301_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_301_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		ELSEIF CFLAG:318 == 1
		ELSEIF TALENT:연모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「요정은 씁슬한 걸 싫어하기 때문에 %CALLNAME:MASTER%가 끓여준 차도 못 마시겠구나」
					PRINTFORMW 「즉 나의 독차지라는 것」
				CASE 0
					PRINTFORML 「%CALLNAME:MASTER%도 참 차를 끓이는 게 능숙해졌어」
					PRINTFORMW 「다도인이라도 목표로 하는 거야？」
				CASEELSE
					PRINTFORML 「응 맛있다」
					PRINTFORMW 「나중에 커피 끓이는 법도 가르쳐 줄게」
			ENDSELECT
		ELSEIF TALENT:사모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「『루나、차일듯？』」
					PRINTFORMW 「…시시한 개그라도 할 셈？」
				CASE 0
					PRINTFORML 「월차라는 허브티를 한 번 마셔 보고 싶어요」
					PRINTFORMW 「뭐라더라 잠을 편히 자는 효과가 있다던가」
				CASEELSE
					PRINTFORML 「응、최근에 차 끓이는 실력이 많이 늘었나 보네」
					PRINTFORMW
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「나는 이 정도 씁쓸한 걸 좋아하지만 %CALLNAME:MASTER%는 좀 어려운가？」
					PRINTFORMW
				CASE 0
					PRINTFORML 「나는 커피파지만…」
					PRINTFORMW 「하지만 모처럼이니까 받을께요」
				CASEELSE
					PRINTFORML 「응、고마워요」
					PRINTFORMW
			ENDSELECT
		ENDIF
	ENDIF
	RETURN 1
ENDIF
RETURN 1
;==================================================
;302,스킨십
;TFLAG:193 (1=대성공 0=성공 -1=실패)
;==================================================
@M_KOJO_SUCCESS_COM_K6_302
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_302
CALL M_KOJO_MESSAGE_COM_K6_302_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_302_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		ELSEIF CFLAG:318 == 1
		ELSEIF TALENT:연모
			SELECTCASE RAND:4
				CASE 2
					PRINTFORML %CALLNAME:MASTER%는 루나의 손에 손가락을 부드럽게 포갰다。
					PRINTFORMW 「%CALLNAME:MASTER%의 손、따끈따끈해서 따뜻하네…」
				CASE 1
					PRINTFORML %CALLNAME:MASTER%는 루나의 손가락을 휘감으며 가만히 그녀의 붉은 눈동자를 바라보았다。
					PRINTFORML 루나의 얼굴이 순식간에 새빨갛게 달아오른다…。
					PRINTFORMW 「그、그렇게 응시하지 말아요… 부끄럽다…」
				CASE 0
					PRINTFORML %CALLNAME:MASTER%는 살그머니 루나의 가슴에 얼굴을 묻었다。
					PRINTFORML 「응？……… 응」
					PRINTFORML 루나는 말없이 %CALLNAME:MASTER%의 머리를 껴안아 주었다。
					PRINTFORML 달콤하고 부드러운 향기가 난다…。
					PRINTFORMW 「큰 아기에요…」
				CASEELSE
					PRINTFORML %CALLNAME:MASTER%가 루나에게 미소지어 보았다。
					PRINTFORML 「이렇게… 일까나？」
					PRINTFORMW 루나는 당황하면서도 힘껏 환하게 미소 짓는 얼굴을 돌려주었다。
			ENDSELECT
		ELSEIF TALENT:사모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML %CALLNAME:MASTER%가 불의의 기습으로 루나의 날개를 만지자 흠칫 튀어오른다。
					PRINTFORML 「후앙…！？」
					PRINTFORMW 「나、날개를 만지는 건 그만두엇…！ 거기、약하니까！」
				CASE 0
					PRINTFORML %CALLNAME:MASTER%는 슬며시 루나의 손을 잡았다。
					PRINTFORMW 「？？ 무슨 일이야？」
				CASEELSE
					PRINTFORML %CALLNAME:MASTER%는 벽쿵을 하며 루나의 앞을 가로막고 섰지만
					PRINTFORML 루나는 멍한 표정으로 %CALLNAME:MASTER%를 바라보고 있다。
					PRINTFORMW 「……？」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「너무 달라붙지 말아요。움직이기 힘들어요」
					PRINTFORMW
				CASE 0
					PRINTFORML %CALLNAME:MASTER%와 루나 차일드는 등을 붙이고 키재기를 하고 있다。
					PRINTFORMW 「%CALLNAME:MASTER% 쪽이 조금 키가 더 크네」
				CASEELSE
					PRINTFORML %CALLNAME:MASTER%가 루나의 세로 롤을 쿡쿡 찌르자 루나는 귀찮다는 듯이 손으로 쳐낸다。
					PRINTFORML 「아 좀、멋대로 머리카락에 손대지 말아요。모양이 무너지잖아」
					PRINTFORMW
			ENDSELECT
		ENDIF
	ENDIF
	RETURN 1
ENDIF
RETURN 1
;==================================================
;303,사과한다
;TFLAG:193 (2=과자상자성공 1=대성공 0=성공 -1=실패 -2= 과자상자실패)
;==================================================
@M_KOJO_SUCCESS_COM_K6_303
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_303
CALL M_KOJO_MESSAGE_COM_K6_303_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_303_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		SELECTCASE TFLAG:193
		CASE 0,1,2
			IF TALENT:연모
				PRINTFORML 「그렇게 싫어했는데」
				PRINTFORML 「용서해 주고 싶어지다니 이상한 일이네요…」
				PRINTFORML 루나는 계속 고개를 숙이는 %CALLNAME:MASTER%의 뺨을 쥐고 얼굴을 들게 한다。
				PRINTFORML 「다음에 그러면 울어버릴 테니까…」
				PRINTFORMW 루나능 울 것 같은 얼굴로 말하면서 %CALLNAME:MASTER%를 꾹 껴안았다。
			ELSEIF TALENT:사모
				PRINTFORML 「정말이지 약삭빠르다니까…」
				PRINTFORMW 루나는 한숨을 내쉬며 양미간의 주름을 풀어 주었다。
			ELSE
				PRINTFORML 「내 쪽이 어른이니까 선심써서 용서해 줄게」
				PRINTFORML 「그래도 이 정도는 제재로 받을까나」
				PRINTFORML 찰싹！
				PRINTFORMW %CALLNAME:MASTER%는 귀싸대기를 한 발 맞았다。
			ENDIF
		CASEELSE
			IF TALENT:연모
				PRINTFORML 「적당한 말이나 하고 말야…！」
				PRINTFORMW 「%CALLNAME:MASTER%가 하는 입으로만의 사죄 같은 거 듣고 싶지 않아！」
			ELSEIF TALENT:사모
				PRINTFORML 「장난칠 때도 놀 때도 그래」
				PRINTFORML 「언제나 꽝 제비나 뽑다가 심한 꼴을 당하는 것은 나인 것이니까…」
				PRINTFORMW 루나는 볼을 부풀린 채 완전히 주눅들어 버렸다…。
			ELSE
				PRINTFORML 「―――――――」
				PRINTFORML 루나는 소리를 지워 %CALLNAME:MASTER%가 사과하는 소리를 셧아웃 시켜 버렸다。
			ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;304,일을 돕는다
;TFLAG:193 (1=대성공 0=성공 -1=실패)
;CFLAG:350 (업무내용(JOB_업무내용.ERB 참조할 것))
;TCVAR:도울수없다 (=2 도와줘도 빨리 끝나지 않거나, 시간정지 중 불가 영원정의 진찰 등)
;==================================================
@M_KOJO_SUCCESS_COM_K6_304
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_304
CALL M_KOJO_MESSAGE_COM_K6_304_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_304_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		;시간정지중
		IF FLAG:70
		;통상
		PRINTFORML %CALLNAME:MASTER%는 루나와 놀기로 했다。
		PRINTFORML
		ELSEIF TALENT:연모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 루나들과 보드게임을 하며 놀았다。
					PRINTDATA
						DATAFORM 「아이가 늘어나서 과적재처럼 되어 버렸어…」
						DATAFORM 「잠깐 기다려！ 오셀로에서 2대 1 같은 건 이길 수 있을 리가 없잖아！」
						DATAFORM 「어째서 쌍륙으로 100면 다이스를 흔드는 거야！」
						DATAFORM 「또 나에게 킹빈보가 붙었다…」
					ENDDATA
					PRINTFORML
				CASE 0
					PRINTFORML 루나들과 다음에 탐험할 장소를 서로 이야기했다。
					PRINTDATA
						DATAFORM 「%CALLNAME:MASTER%는 돈 가지고 있죠？ 우리들은 보는 것만으로 좋으니까 캐니어닝 가 보지 않을래？」
						DATAFORM 「요괴의 산은 과일이라던지 희귀버섯이라던지 딸 수 있는데、텐구가 무서운 거야…」
						DATAFORM 「언젠가 중유의 길에 있는 가게에서 놀고 싶네요。죽은 금붕어 건지기라든지 유서 움켜쥐기라든지 즐거울 것 같다」
						DATAFORM 「재고의 길？…… 저기는 안 돼요。바깥 세계의 인간을 노리는 요괴가 있으니까」
					ENDDATA
					PRINTFORML
				CASEELSE
					PRINTFORML 루나들과 소꿉놀이를 하기로 했다。
					PRINTFORML 「에、저ー 그게… %CALLNAME:MASTER%의 입에 바나나를 찔러 살해한 것은… 다、당신이야！」
					IF CFLAG:6:현재위치 == CFLAG:5:현재위치 && CFLAG:6:현재위치 == CFLAG:7:현재위치
						SETCOLOR C_AQUA
						PRINTFORML 「용서할 수 없었다…。바나나를 입이 아닌 곳에 꽂은 %CALLNAME:MASTER%가 …」
						SETCOLOR 255,230,250
						PRINTFORMW 「마지막 일격은 안타깝다…」
						RESETCOLOR
					ENDIF
			ENDSELECT
		ELSEIF TALENT:사모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 하쿠레이신사에 장난을 치러 가기로 했다。
					PRINTFORML 「%CALLNAME:MASTER%가 있으면 레이무씨에게 걸려도 손대중 해 줄 지도 몰라」
					PRINTFORMW 「그런 관계로 선진은 맡기겠어요。힘내세요 남자아이」
					PRINTFORML
					PRINTFORMW ………
					PRINTFORML
					PRINTFORMW 전원 혹이 생겨서 돌아왔다。
				CASE 0
					PRINTFORML 「오늘은 버섯따기 어때？」
					PRINTFORML 「희귀한 버섯은 하루도 못 가요」
					PRINTFORMW 「아、%CALLNAME:MASTER%가 손대면 죽는 버섯도 있으니까 조심해」
				CASEELSE
					PRINTFORML %CALLNAME:MASTER%과 루나는 탄막놀이를 하기로 했다。
					PRINTFORML 「그럼、얼마나 강해졌는지 시험해 볼게」

			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「도망갈 때 항상 나만 놔두고 서니ー랑 스타ー는 도망쳐 버리는 걸요」
					PRINTFORML 「오늘은 %CALLNAME:MASTER%가 있으니까 괜찮으면 좋겠어」
				CASE 0
					PRINTFORML 루나는 혼자 독서를 하고 있다。
					PRINTFORML 「… 잠깐 지금 좋은 부분이니까 말 걸지 말아줘」
					PRINTFORMW 안경을 쓴 루나는 조금 진지한 분위기가 있다。
				CASEELSE
					PRINTFORML 「루나 차일드 못 봤냐고요？」
					PRINTFORML 「그 루나 차일드…라는 것은、이런 얼굴입니까？」
					PRINTFORML 루나는 수수한 가면을 쓰고 뭔가 하고 있다…。
					PRINTFORMW 「…역시 그다지 놀라지 않네」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;305,무릎베개받는다
;TFLAG:193 (-5=MASTER가 TARGET보다 거구인 경우 (TALENT:MASTER:체형 > TALENT:체형 + 2) 1=대성공 0=성공 -1=실패) (-5 이외에는 지문 분기 없음)
;ABL:친밀 (6이상=얼굴을 들여다보면서 머리를 쓰다듬어 준다 3이상=그냥 머리를 쓰다듬어 준다 2이하=웅크리고 있다)
;==================================================
@M_KOJO_SUCCESS_COM_K6_305
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_305
CALL M_KOJO_MESSAGE_COM_K6_305_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_305_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		ELSEIF CFLAG:318 == 1
		ELSEIF TALENT:연모
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML 「노래라도 불러드릴까요？…」
					PRINTFORML 가사 없는 노래를 루나는 불러 주었다。
					PRINTFORMW %CALLNAME:MASTER%는 마음이 편안해지는 가성에 몸과 마음을 맡겼다。
				CASEELSE
					PRINTFORML 「졸리면 자도 괜찮아」
					PRINTFORMW 「일어날 때까지 쭉 지켜봐 줄 테니까」
			ENDSELECT
		ELSEIF ABL:6:친밀 > 2
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML 「꾸벅꾸벅…」
					PRINTFORMW 「앗… 미안… 잠들어버렸다」
				CASEELSE
					PRINTFORML 「남동생이 있으면 이런 기분일까」
					PRINTFORMW 루나는 눈을 가늘게 뜨고 %CALLNAME:MASTER%의 머리를 펑펑 어루만져 주었다。
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「왠지 차분하지가 않아…」
					PRINTFORMW 루나는 안절부절못하며 허공에 시선을 유영시키고 있다。
				CASE 0
					PRINTFORML 「잠깐만이야…」
					PRINTFORMW 「…근데、머리카락 만지는 건 금지！ 냄새 맡는 것도 안 돼！ 머리 동글동글도 그만！」
				CASEELSE
					PRINTFORML 「…… 거기에 머리를 놓으면 책을 못 읽는데」
					PRINTFORMW 「아、하지만 %CALLNAME:MASTER%의 머리를 스탠드로 삼으면 읽기 쉽겠네」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;306,배를 어루만진다
;TFLAG:193 (1=ABL:친밀6이상 및 임신시 0=성공 -1=ABL:친밀5이하)
;==================================================
@M_KOJO_MESSAGE_COM_K6_306
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_306_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_306_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		ELSEIF CFLAG:318 == 1
		ELSEIF TALENT:연모
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML %CALLNAME:MASTER%는 루나의 배를 만족할 때까지 만졌다。
					PRINTFORML 「읏…」
					PRINTFORML 떼려는 그 손을 루나가 달아오른 눈동자을 하고 붙잡는다。
					PRINTFORMW 「…부탁이야、조금만 더 쓰다듬어줘」
				CASEELSE
					PRINTFORML %CALLNAME:MASTER%는 루나의 배를 상냥하게 어루만지고 있다。
					PRINTFORML 「응…」
					PRINTFORMW 「뭔가 배 아래쪽이 뜨거워져…」
			ENDSELECT
		ELSEIF ABL:6:친밀 > 5
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML 「나는 아직 배가 고픈 건 아닌데…」
					PRINTFORMW 「머위 미소된장이라도 만들까。… 씁쓸한 것은 싫어？」
				CASEELSE
					PRINTFORML 「그쪽이 손댄다면 나도 %CALLNAME:MASTER%의 배를 만질테니까」
					PRINTFORMW 「…응、잠깐만 나보다 단단해？」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 루나의 배는 작고 말랑말랑했다。
					PRINTFORML 그대로 만지고 있다가 철썩 손을 맞아 버렸다。
					PRINTFORMW 「에～이 성가셔」
				CASE 0
					PRINTFORML 「꺄앗…」
					PRINTFORMW 「갑자기 손대지 말아요！ 깜짝 놀랐잖아！」
				CASEELSE
					PRINTFORML 「%CALLNAME:MASTER%의 간식？ 모르겠는데…」
					PRINTFORMW 「말해 두지만 내 배는 아무것도 숨기지 않았어」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;307,볼을 잡아당긴다
;TFLAG:193 (1=대성공 0=성공 -1=실패)(지문 분기 없음)
	;이하는 먼저 쓴 조건이 우선된다
	;TALENT:연모 (받아들이면서 웃는 얼굴로 맞받아친다)
	;ABL:친밀 (6이상=머뭇머뭇 맞받아친다)
	;ABL:순종 (5이상=해지는 대로)
;==================================================
@M_KOJO_SUCCESS_COM_K6_307
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패(주의, 껴안기모드 중에는 자동 성공), 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_307
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_307_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_307_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		ELSEIF CFLAG:318 == 1
		ELSEIF TALENT:연모
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML 「아무리 시간이 흘러도 언제까지나 어린아이라니까… 조금만이야？」
					PRINTFORMW %CALLNAME:MASTER%는 루나의 탱탱한 볼을 충분히 만끽했다。
				CASEELSE
					PRINTFORML 「이만큼 부드러우면 %CALLNAME:MASTER%의 뺨을 혹으로 오해한 오니에게 빼앗길지도 몰라」
					PRINTFORMW 루나는 %CALLNAME:MASTER%의 뺨을 말랑말랑 손대고 있다。
			ENDSELECT
		ELSEIF ABL:6:친밀 > 5
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「내 뺨으로 경단은 만들 수 없어요」
					PRINTFORMW 루나는 쓴웃음을 지으면서도 만지는 손을 밀어내지 않았다。
				CASE 0
					PRINTFORML 「%CALLNAME:MASTER%의 볼도 부드럽네」
					PRINTFORMW 「그다지 우리들과 별 차이 없다。조금만 더 만져도 돼？」
				CASEELSE
					PRINTFORML 「… 좀 부드러워졌어？」
					PRINTFORMW 「최근 너무 먹어서… 일지도 모른다。%CALLNAME:MASTER%는？」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「이제… 그만둬줬으면 좋겠어？」
					PRINTFORMW 「지금 좀 바쁘니까 이따가 해」
				CASE 0
					PRINTFORML 「남의 뺨을 장난감으로 삼으면 안 돼」
					PRINTFORML 「자기도 함부로 만져지고 싶지 않잖아」
					PRINTFORMW 루나는 부드럽게 %CALLNAME:MASTER%의 손을 잡고 뺨에서 떼어 놓았다。
				CASEELSE
					PRINTFORML 「아 아야야야、잠깐 힘이 너무 들어갔어！」
					PRINTFORMW 「만질 때 좀 더 상냥하게 하지 않으면 상대방이 화를 내요」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;308,볼을 콕콕 찌른다
;동침중 or 수면중 한정
;TFLAG:193 (1=대성공 0=성공 -1=실패)
;==================================================
@M_KOJO_SUCCESS_COM_K6_308
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패(주의, 껴안기모드 중에는 자동 성공), 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_308
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_308_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_308_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;통상
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		;수면중
		ELSEIF CFLAG:수면
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「서니ー 기다려… 그건 안 들어가니까…」
					PRINTFORMW
				CASE 0
					PRINTFORML 「그만둬 스타ー… 알았으니까…」
					PRINTFORMW
				CASEELSE
					PRINTFORML 「우～응 우～응…」
					PRINTFORMW
			ENDSELECT
		ELSEIF CFLAG:318 == 1
		ELSEIF TALENT:연모
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML 「언제까지나 어린아이라니까… 조금만이야？」
					PRINTFORMW %CALLNAME:MASTER%는 루나의 부드러운 볼을 충분히 만끽했다。
				CASEELSE
					PRINTFORML 「응석꾸러기씨。그렇게나 돌아봐줬으면 한 거야？」
					PRINTFORMW 루나는 쿡 찔려 약간 기쁜 표정을 짓고 있다。
			ENDSELECT
		ELSEIF ABL:6:친밀 > 5
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「너무 세게 찌르면 안 돼요」
					PRINTFORMW 루나는 쓴웃음을 지으면서도 만지는 손을 밀어내지 않았다。
				CASE 0
					PRINTFORML 「%CALLNAME:MASTER%의 볼도 부드럽구나」
					PRINTFORMW 「요정인 우리와 다를 바 없을 정도로。…츤츤」
				CASEELSE
					PRINTFORML 「나… 조금 부드러워졌어？」
					PRINTFORMW 「우ー응 최근 너무 먹어서… 일지도。%CALLNAME:MASTER%는？」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「… 내 볼에는 아무것도 안 들어 있는데」
					PRINTFORMW 「서니ー라면 쿡쿡 찌르면 뭔가 나올지도 몰라」
				CASE 0
					PRINTFORML 「%CALLNAME:MASTER%、슬슬 손톱을 깎는 편이 좋겠네요」
					PRINTFORMW 「네、손톱깍이」
				CASEELSE
					PRINTFORML 「…이건 무슨 흉내？、서니ー의 흉내일까」
					PRINTFORMW 「장난치길 좋아하는 사람이 많으면 곤란하다고요」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;309,머리를 쓰다듬는다
;TFLAG:193 (1=대성공 0=성공 -1=실패)
;ABL:친밀 (6이상=통상성공시 분기)
;==================================================
@M_KOJO_SUCCESS_COM_K6_309
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패(주의, 껴안기모드 중에는 자동 성공), 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_309
CALL M_KOJO_MESSAGE_COM_K6_309_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_309_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		ELSEIF CFLAG:6:수면
		ELSEIF CFLAG:318 == 1
		ELSEIF TALENT:연모
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「………」 부들부들
					PRINTFORMW 루나는 얼굴이 새빨갛게 하고서 부끄러운듯이 미소를 지은 채 견디고 있다。
			ENDSELECT
		ELSEIF TALENT:사모
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「의외로 부끄럽네요 이것…」
					PRINTFORMW 루나는 뺨을 조금 물들이며 고개를 숙였다。
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML 「좋은 아이 좋은 아이…라니、나는 %CALLNAME:MASTER%보다 연상이야！」
					PRINTFORMW
				CASEELSE
					PRINTFORML 「아얏… 이건 쓰다듬는 게 아니라 머릿결을 헝클어뜨린다는 거야」
					PRINTFORMW 「머리가 엉망이잖아 이제、어서 정돈하지 않으면…」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;331,차를 탄다(약 넣음)
;TFLAG:193 (1=대성공 0=성공 -1=실패)
;==================================================
@M_KOJO_SUCCESS_COM_K6_331
;성공실패 판정
;TFLAG:192 (-2=강제실패(주의, 커맨드 종료 X), -1＝강제실패, 0=COM의존, 1=강제성공or대성공(주의, 수면제 아이스티는 졸음이 오면 먹지 않는다))
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_331
CALL M_KOJO_MESSAGE_COM_K6_331_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_331_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TFLAG:193 == 1
		PRINTFORML 「？어떻게 된 거야、그렇게 빤히 쳐다보고 말야」
	ELSEIF TFLAG:193 == 0
		PRINTFORML 「뭔가 쓴맛 말고도 뭔가가 더 있는 것 같은… 기분 탓인가？」
		PRINTFORMW
	ELSEIF TFLAG:193 == -1
		PRINTFORML 「우～응 뭔가 이상해요…」
		PRINTFORMW 루나는 차의 수면을 응시하며 입에 대려고 하지 않는다。
	ELSE
		PRINTFORML 「차？」
		PRINTFORMW 「지금은 그렇게 목이 마르지 않은데…」
	ENDIF
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_K6_332
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_332_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_332_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF ALCOHOL_TASTE(TFLAG:194) >= 15
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「%CALLNAME:MASTER%가 가져올 줄 알았다면 안주라도 만들어 둘걸 그랬어」
				CASE 0
					PRINTFORML 「맛있어…」
					PRINTFORML 「잘도 찾았네、이런 맛있는 술」
					PRINTFORMW 「인간의 마을에서 파는 걸 사왔어？」
				CASEELSE
					PRINTFORML 「술은 마셔도 삼켜지지 말라던데 이렇게 맛있으면 삼켜져도 좋을지도」
					PRINTFORMW
				ENDSELECT
		ELSEIF ALCOHOL_TASTE(TFLAG:194) <= 9
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「좀 이건 힘드네요…」
					PRINTFORMW 루나는 한 모금만 마시고 찡그린 표정으로 입가를 눌렀다。
				CASE 0
					PRINTFORML 「너 강해… 우에」
					PRINTFORMW 「머리가 어질어질해…。이래서야 요정죽이기야」
				CASEELSE
					PRINTFORML 「이런 걸 계속 마시다간 눈 깜짝할 사이에 알콜 중독이겠네요…」
				ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「저기、%CALLNAME:MASTER%도 마실 거야？」
					PRINTFORMW 「… 뭐 괜찮겠죠。술은 맛있는 건데 마실 수 없다니 불쌍하기도 하고」
				CASE 0
					PRINTFORML 「그러고 보니、전에 술벌레를 뱃속에 넣었다가 대단한 꼴을 당한 적 있어」
					PRINTFORMW 「%CALLNAME:MASTER%도 조심해。만약 먹었다면 술을 마셔도 맛이 없어져 버리니까」
				CASEELSE
					PRINTFORML 「응、나쁘지 않은 맛이군요」
					PRINTFORMW
				ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;333,푸념을 듣는다
;TFLAG:193 (6=대성공(취기) 5=성공(취기) 4=실패(취기) 3=대성공 2=성공 1=실패)
;==================================================
@M_KOJO_SUCCESS_COM_K6_333
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_333
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_333_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_333_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 6
		;대성공 (취기)
			PRINTFORML 「이렇게 알아주는 건 %CALLNAME:MASTER%만이야…」
			PRINTFORMW 「자자 %CALLNAME:MASTER%도 마시세요。이렇게 된 이상 철저히 마셔서 휙 날려버릴 수 밖에 없어요」
		CASE 5
		;성공 (취기)
			PRINTFORML 「잘 말해줬어！ 과연 %CALLNAME:MASTER%、겉멋으로 요정한게 아니구나！」
			PRINTFORMW 「요정이 아니라고？ 이쯤 왔으면 세세한 일 따위 신경쓰지 말라구！」
		CASE 4
		;실패 (취기)
			PRINTFORML 「잠깐 %CALLNAME:MASTER%…、아직 이야기는 끝나지 않았어요…！」
			PRINTFORMW 누나의 눈이 침착해진다… %CALLNAME:MASTER%는 섣불리 거절하지 못하고、그대로 푸념을 계속 들어주었다。
		CASE 3
		;대성공
			PRINTFORML 「쌓인 걸 토해낸 덕분에 몸마저 가뿐해진 것 같아」
			PRINTFORMW 「상당히 쌓여 있던 것 같아。살아났어요 %CALLNAME:MASTER%。」
		CASE 2
		;성공
			PRINTFORML 「이런 일 %CALLNAME:MASTER%에게 말해도 소용 없지만、조금 기분이 편해졌어」
			PRINTFORMW 「이렇게 발산하는 것도 좋은거네」
		CASE 1
		;실패
			PRINTFORML 「나도 좋아서 넘어지는게 아니니까…」
			PRINTFORMW 「조금만 더 그 두사람도 도와주면 좋을텐데… 투덜투덜투덜」
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;334,잔을 주고받는다
;TFLAG:193 (1=대성공 0=성공 -1=실패)
;CFLAG:임신자각상태 (1=식사)
;TALENT:술내성 (-2=식사)
;==================================================
@M_KOJO_SUCCESS_COM_K6_334
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_334
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_334_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_334_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 1
		;대성공
			PRINTFORMW 「맛있는 술과 요정의 번영을 위하여、건배」
		CASE 0
		;성공
			PRINTFORML 「건배 하고 싶은 거야？ 네네、건배」
			PRINTFORMW 루나는 짠 하고 %CALLNAME:MASTER%의 잔에 마주친 다음 술을 다 마셨다。
		CASE -1
		;실패
			PRINTFORML 「건배ー…」 쨍그랑!
			PRINTFORMW 「잔이 깨졌다…」
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;335,간호한다
;TFLAG:193 (1=대성공 0=성공 -1=실패)
;==================================================
@M_KOJO_SUCCESS_COM_K6_335
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_335
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_335_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_335_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 1
		;대성공
			PRINTFORML 「%CALLNAME:MASTER% 덕분에 상당히 편해졌는지도…」
			PRINTFORMW %CALLNAME:MASTER%는 루나를 옆으로 눕히고 그녀의 곁에 있어주기로 마음먹었다。
		CASE 0
		;성공
			PRINTFORML 「우ー응 우ー응… 이제 좀 페이스를 낮춰줬으면 좋겠어…」
			PRINTFORMW 루나는 %CALLNAME:MASTER%에게 받은 물을 마시며 근처의 벽에 기대고 있다。
		CASE -1
		;실패
			PRINTFORML 루나는 반짝반짝 거리는 액체를 토해내고 있다…。
			PRINTFORMW 「오로로로로……」
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;336,무릎베개한다
;ABL:친밀 (4이하=불편하게 9이하=수줍게 그이상=기쁜듯이)
;TIME_PROGRESS(TFLAG:무릎베개)(44以下=失敗
;==================================================
@M_KOJO_SUCCESS_COM_K6_336
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_336
CALL M_KOJO_MESSAGE_COM_K6_336_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_336_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:시간정지
	ELSEIF CFLAG:318 == 1
		PRINTFORML
	ELSEIF TALENT:연모
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
			;CASE 0
				;PRINTFORML
			CASEELSE
				PRINTFORML 「으、응… 기분 좋아…」
				PRINTFORMW 「그렇지만 나는 %CALLNAME:MASTER%에게 해 주고 싶었는데… 새、생각했어요」
		ENDSELECT
	ELSEIF TALENT:사모
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
			;CASE 0
				;PRINTFORML
			CASEELSE
				PRINTFORML 「갑자기 무릎베개 해주고 싶다니 무슨 일이야？」
				PRINTFORML 「잘 때의 기분？… 뭐 나쁘진 않지만」
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
			;CASE 0
				;PRINTFORML
			CASEELSE
				PRINTFORML 「………이제 일어나도 괜찮아？」
				PRINTFORMW
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;350,덮친다 (시간(時姦)시 장난친다)
;TFLAG:194 (0=성공 1=남의 눈이 있다　2=야외는 싫사옵니다　3=다수와의 플레이는 양해　4=합의가 있어도 무드가 부족하다　100=합의는 있으나 구상 특수판정으로 실패)
;TCVAR:껴안고첫회　1=보통으로 합의 겟　2=먼저 키스정도는 하고　3=미약or발정에는 이길 수 없었다…　4=억울해…각인만 없었으면 움찔움찔
;5=강요당하면 거절할 수 없다(소질 겁쟁이 전용) 6=그다지 나쁘지 않다　7=안돼　8=논외 98=구상내 특수판정에 의한 실패 99=구상내 특수판정에 의한 성공
;구상내 특수 판정은 해당 CFLAG가 0이면 무효
;==================================================
@M_KOJO_MESSAGE_COM_K6_350
;CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_350_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_350_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:시간정지
	ELSEIF CFLAG:318 == 1
		PRINTFORML
	ELSEIF TFLAG:194
		SELECTCASE TFLAG:194
			;0=成功
			CASE 0
				IF TALENT:연모
					PRINTFORML
					PRINTFORML
				ELSEIF TALENT:사모
					PRINTFORML
					PRINTFORML
				ELSE
					PRINTFORML
					PRINTFORML
				ENDIF
			;1=人目がある
			CASE 1
				IF TALENT:연모
					PRINTFORML
					PRINTFORML
				ELSEIF TALENT:사모
					PRINTFORML
					PRINTFORML
				ELSE
					PRINTFORML
					PRINTFORML
				ENDIF
			;2=野外は嫌
			CASE 2
				IF TALENT:연모
					PRINTFORML
					PRINTFORML
				ELSEIF TALENT:사모
					PRINTFORML
					PRINTFORML
				ELSE
					PRINTFORML
					PRINTFORML
				ENDIF
			;3=多人数プレイは勘弁
			CASE 3
				IF TALENT:연모
					PRINTFORML
					PRINTFORML
				ELSEIF TALENT:사모
					PRINTFORML
					PRINTFORML
				ELSE
					PRINTFORML
					PRINTFORML
				ENDIF
			;4=合意があってもムードが足りぬ
			CASE 4
				IF TALENT:연모
					PRINTFORML
					PRINTFORML
				ELSEIF TALENT:사모
					PRINTFORML
					PRINTFORML
				ELSE
					PRINTFORML
					PRINTFORML
				ENDIF
		ENDSELECT
	ELSEIF TCVAR:껴안고첫회
		SELECTCASE TCVAR:껴안고첫회
			;1=普通に合意ゲット
			CASE 1
				IF TALENT:연모
					PRINTFORML
					PRINTFORML
				ELSEIF TALENT:사모
					PRINTFORML
					PRINTFORML
				ELSE
					PRINTFORML
					PRINTFORML
				ENDIF
			;2=先にキスぐらいしろよ
			CASE 2
				IF TALENT:연모
					PRINTFORML
					PRINTFORML
				ELSEIF TALENT:사모
					PRINTFORML
					PRINTFORML
				ELSE
					PRINTFORML
					PRINTFORML
				ENDIF
			;3=媚薬or発情には勝てなかったよお…
			CASE 3
				IF TALENT:연모
					PRINTFORML
					PRINTFORML
				ELSEIF TALENT:사모
					PRINTFORML
					PRINTFORML
				ELSE
					PRINTFORML
					PRINTFORML
				ENDIF
			;4=悔しい…刻印さえなければﾋﾞｸﾋﾞｸﾝ
			CASE 4
				IF TALENT:연모
					PRINTFORML
					PRINTFORML
				ELSEIF TALENT:사모
					PRINTFORML
					PRINTFORML
				ELSE
					PRINTFORML
					PRINTFORML
				ENDIF
			;6=まんざらでもない
			CASE 6
				IF TALENT:연모
					PRINTFORML
					PRINTFORML
				ELSEIF TALENT:사모
					PRINTFORML
					PRINTFORML
				ELSE
					PRINTFORML
					PRINTFORML
				ENDIF
			;駄目
			CASE 7
				PRINTFORML
			;論外
			CASE 8
				PRINTFORML
				PRINTFORML
		ENDSELECT
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;351,데리고 나간다
;==================================================
@M_KOJO_MESSAGE_COM_K6_351
;데리고 나간다 에는 TRAIN_MESSAGE가 없다
CALL M_KOJO_MESSAGE_COM_K6_351_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_351_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF TALENT:연모
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML 「혹시 단 둘이서…？」
					PRINTFORMW 「미안、조금 긴장해 버렸어…」
				CASEELSE
					PRINTFORML 「조금만 시간을 줘！」
					PRINTFORML 몇분 후、루나는 곱게 차려입고 %CALLNAME:MASTER%에게 돌아왔다。
					PRINTFORMW 「오래 기다리셨어요、자 가죠」
			ENDSELECT
		ELSEIF TALENT:사모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「장난치러 간다면 기꺼이 가겠지만、제대로 감싸줘」
					PRINTFORMW
				CASE 0
					PRINTFORMW 「재미있을 것 같구나。조속히 갈까요」
			CASEELSE
					PRINTFORML 「도와줬으면 하는 일이라도 있어？」
					PRINTFORMW
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「%CALLNAME:MASTER%가 이상한 곳에 가지 않는지、지켜봐 줄게」
					PRINTFORMW
				CASE 0
					PRINTFORML 「어딘가에 가고 싶은 거야？ 좋아요、따라가 줄게」
					PRINTFORMW
				CASEELSE
					PRINTFORML 「여기서부터 얼마나 시간이 걸릴려나」
					PRINTFORMW 「너무 늦지 않도록 해야겠어…」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;352,고백한다
;FLAG:생활능력무 (1=실패)
;TFLAG:193 (1=성공 0=실패)
;==================================================
@M_KOJO_SUCCESS_COM_K6_352
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_352
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_352_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_352_1
#DIM LCOUNT
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
;告白ループ用
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF TFLAG:193 == 1
			 IF TIME:2 >= 5 && TIME:2 <= 7 && TIME:5 < 2 && ABL:MASTER:교양 > 1
			 ;月が見える夜に告白した場合。教養がないとできない
				PRINTFORML 달이 예쁘네요―――
				PRINTFORML 「………%CALLNAME:MASTER%」
				PRINTFORML 「그 말의 의미、알고 하는 소리야？」
				PRINTFORMW 「그래… 그러면 대답을 들려줄게。」
				PRINTFORML
				PRINTFORML
				PRINTFORMW 「…… 나는 요정이니까、%CALLNAME:MASTER%과 함께 있어 줄 수 없을지도 몰라」
				PRINTFORMW 「그런데도 좋다면 대답해 줄게」
				PRINTFORML
				PRINTFORML
				PRINTFORMW ――― 나、죽어도 좋아요
			ELSEIF CFLAG:6:임신자각상태 && !CFLAG:6:무자각임신
			;こいつら交尾したんだ！！
				PRINTFORML 「……하아」
				PRINTFORML 「이제야 겨우 각오를 다질 마음이 생겼구나。늦다니까 참…」
				PRINTFORML 「그렇지만、제대로 대답을 해 줄 마음이 생겨서… 다행이다」
				PRINTFORML 「이 아이를 위해서도、오래도록 행복하게 지내요。파파%UNICODE(0x2665) *1%」
			ELSEIF TALENT:연모
			;연모状態の場合
				PRINTFORML
				PRINTFORML 「……겨、결혼해 줘！？」
				PRINTFORML 「싫다、거짓말、나 꿈이라도 꾸고 있는거죠、… 아야야」
				PRINTFORML 「아프다는 건 꿈이 아니네요…。그렇지만 이런 일…」
				PRINTFORML 「！… 설마 %CALLNAME:MASTER%에게 누군가가 빙의라도 했다던가…？ 에、달라？」
				PRINTFORML 「… 그러면 지금 유행하는 철렁？」
				PRINTFORML 「왜냐하면 믿을 수 없어요！ 이런 일…」
				PRINTFORML 「언제나 꽝 제비나 뽑았는 걸…」
				PRINTFORML 「만약에 이게 사실이 아니라면 나―――」
				PRINTFORML
				PRINTFORMW …루나의 목소리가 도중 끊겼다。그녀가 소리를 지워버린 것이다。
				PRINTFORML 주위가 무서울 정도로 쥐죽은 듯 조용해지고、루나는 울음 섞인 눈동자로 그저 지면을 내려다 보고 있다。
				PRINTFORML %CALLNAME:MASTER%의 소리는 전해지지 않는다。그러니 %CALLNAME:MASTER%는…
				PRINTFORML
				$LOOP
				PRINTFORML
				PRINTFORML
				PRINTFORML
				PRINTFORML
				SIF TALENT:MASTER:키스미경험 && TALENT:6:키스미경험
					PRINTL [0] 첫 키스를 바친다
					PRINTL [1] 러브레터를 건네준다
				SIF MARK:6:괘씸각인 > 1 || MARK:6:시간각인 > 1
					PRINTL [2] 창을 보여준다
				INPUT
				;연모でお互いにキス経験がない場合
				IF RESULT == 0 && TALENT:MASTER:키스미경험 && TALENT:6:키스미경험
					PRINTFORML %CALLNAME:MASTER%는 아무런 말 없이 루나의 손을 잡는다。
					PRINTFORML 「……%CALLNAME:MASTER%？」
					PRINTFORML 당혹스러워 하면서도 루나는 %CALLNAME:MASTER%를 불안해 하는 눈동자로 바라보자、그 시선을 %CALLNAME:MASTER%는 곧바로 무언의 시선으로 응시해 돌려준다。
					PRINTFORML 「…………」
					PRINTFORML 서로의 고동이 강하고 격렬하게 높아져 간다。두근두근 당장이라도 서로에게 들릴 것만 같을 정도로。
					PRINTFORML 어느 쪽이랄까 할 것도 없이 눈을 감고서、두 사람의 사이가 줄어들어…
					PRINTFORML 「――응…」
					PRINTFORML 두 명의 작은 그림자가 겹쳤다。
					PRINTFORML
					PRINTFORML 「키스… 해 버렸군요」
					PRINTFORML 「%CALLNAME:MASTER%도 처음이었어？… 후후、나도」
					PRINTFORMW 「……%CALLNAME:MASTER%를 좋아해」
					CALL SET_FIRSTKISS(MASTER, 6, 0)
					CALL SET_FIRSTKISS(6, MASTER, 0,"무음의 시간 속")
				;연모以外特に何もない場合
				ELSEIF RESULT == 1
					PRINTFORML %CALLNAME:MASTER%는 이런 일도 있으리라 여겨 연예편지를 루나에게 내밀었다。
					PRINTFORML 「――！？」
					PRINTFORML 루나는 돌연한 일에 깜짝 놀라、머뭇머뭇 편지를 받아들었다。
					PRINTFORML 편지를 찢지 않도록 초승달의 씰을 천천히 벗겨내고、정중하게 내용을 열고 읽기 시작한다。
					PRINTFORML 「…………」
					PRINTFORML %CALLNAME:MASTER%가 루나에 대한 생각이 담겨진 편지。
					PRINTFORML 손으로 직접 쓴 편지에 가린 루나의 표정은 %CALLNAME:MASTER%로부터는 보이지 않아、그저 그녀가 다 읽기만을 기다렸다。
					PRINTFORML 「……%CALLNAME:MASTER%」
					PRINTFORML %CALLNAME:MASTER%가 확 얼굴을 들었을 대、루나는 %CALLNAME:MASTER%의 연예편지를 다시 되돌려 주고 있었다。
					PRINTFORML 열린 그대로의 편지가 의미하는 것에 %CALLNAME:MASTER%는 싸악ー 하고 핏기가 사라지기 시작해…
					PRINTFORML 「기다려요、편지를 끝까지 봐 주세요」
					PRINTFORML 그 소리에 힘없이 편지의 말미를 바라보자、사랑스러운 글씨가 덧붙여 써 있었다。그 내용은…
					PRINTFORML 『나도 %CALLNAME:MASTER%와 결혼하고 싶을 정도로 정말 좋아합니다』
					PRINTFORMW
				ELSEIF RESULT == 2 && TALENT:MASTER:성별 == 1
				;ルナを調教済みだけどあなたが女の場合
					PRINTFORMW 나 있지 않습니다。
					GOTO LOOP
				ELSEIF RESULT == 2 && MARK:6:괘씸각인 > 1 || RESULT == 2 && MARK:6:시간각인 > 1
				;ルナを調教済みの場合
					PRINTFORML %CALLNAME:MASTER%는 아무것도 말하지 않고 속솟을 내려、자신의 강직을 과시했다。
					PRINTFORML 숨이 막힐 것 같은 젊은 수컷의 향을 휘감고、불끈 하며 맥박치는 남근을 루나의 코끝에 들이댄다。
					PRINTFORML 「아…… 아아…%UNICODE(0x2665) *1%」
					PRINTFORML 「안 돼… 그런 걸 보여주면 나…%UNICODE(0x2665) *1%」
					PRINTFORML 신체에 배인 암컷의 본능이 루나를 부른다。어린 여성기가 수컷의 향기에 환희하며、걸쭉한 꿀을 늘어뜨리기 시작하고 있다。
					PRINTFORML 「좋아해… %CALLNAME:MASTER%… 좋아행%UNICODE(0x2665) *1%」
					PRINTFORMW 넋을 잃은 표정을 지은 루나는、가장 사랑하는 사람의 남근에 뺨을 비비며 %CALLNAME:MASTER%에게의 영원한 친애와 복종을 맹세했다。
				ELSEIF LCOUNT >5
				;早く答えてあげなよ
					PRINTFORMW 루나는 당장이라도 울 것 같다…。
					GOTO LOOP
				ELSE
					PRINTFORML
					LCOUNT ++
					GOTO LOOP
				ENDIF
			ELSE
				;연모がない。恋慕がなくても告白はできるハズ？
				PRINTFORML 「…… 결혼을 전제로 교제해 주세요？」
				;PRINTFORML 루나는 자신에 꽃다발을 내미는 %CALLNAME:MASTER%에게、딱 입을 벌릴 수 밖에 없었다。
				PRINTFORML 「에ー 저기…%CALLNAME:MASTER%、침착하게 잘 생각하세요」
				PRINTFORML %CALLNAME:MASTER%를 차분하게 하려고、루나는 %CALLNAME:MASTER%의 어깨를 눌러 앉혔다。
				PRINTFORML 루나는 %CALLNAME:MASTER%를 걱정하는 눈으로 바라보며、바로 곁에 앉는다。
				PRINTFORML 「나는 요정。%CALLNAME:MASTER%와는 종족이 다르고 수명도 다르다」
				PRINTFORML 「나와 쭉 함께 있을 수 없어요？」
				PRINTFORML 「%CALLNAME:MASTER%를 위해서도 같은 종족끼리 결혼하는 것이 제일이라 생…！」
				PRINTFORML %CALLNAME:MASTER%는 그녀가 단언하기에 앞서、그 가녀린 신체를 껴안는다。
				PRINTFORML 루나는 저항하지 않았다。그를 받아들여、%CALLNAME:MASTER%의 가슴의 고동에 귀를 기울였다。
				PRINTFORML 「…… 그렇게 내가 좋은… 건가。……… 그렇구나」
				PRINTFORML 「나도 %CALLNAME:MASTER%를 싫어하지 않아…」
				PRINTFORML 「그렇게까지 말한다면… 응」
				PRINTFORML 「――― 기뻐、기꺼이 받아들여요」
				PRINTFORML 미소지으며 해 준 루나의 대답、무심코 뛰어오를 정도로 %CALLNAME:MASTER%는 기뻐한다。
				PRINTFORML 그 모습을 나무라기라도 하듯이、루나는 %CALLNAME:MASTER%의 뺨을 꾹 눌렀다。
				PRINTFORML 「그래도 결혼은 아직 안 돼요。분명하게 %CALLNAME:MASTER%가 어른이 되고 나서」
				PRINTFORML 「대신에…」
				PRINTFORML 가까이 다가온 눈을 감은 루나의 얼굴。… 그리고 %CALLNAME:MASTER%의 입술에서 느껴지는 레몬의 맛。
				PRINTFORML 「응…」
				PRINTFORML 「맹세의 키스는 아니지만、예약은 받아들였으니까」
				IF EXP:MASTER:키스경험 < 0
					PRINTFORMW ………그 키스는 %CALLNAME:MASTER%에겐 너무 자극적인 것 같다。
					PRINTFORMW %CALLNAME:MASTER%는 깜짝 놀라 그 자리에서 쓰러져 버렸다。
					PRINTFORML 「！？ 잠깐 %CALLNAME:MASTER%！ 키스만으로 쓰러지지 말아요！？」
					PRINTFORMW 「하아… 앞날이 걱정되네요」
				ENDIF
				PRINTFORMW 「앞으로도 내가 잘 봐주지 않으면…。노력하세요 %CALLNAME:MASTER%」
			ENDIF
			PRINTFORML
		ELSE
			PRINTFORML 「%CALLNAME:MASTER%도 참 쭈뼛쭈뼛 하고 무슨 일이야？」
			PRINTFORMW
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;353,장난한다
;FLAG:생활능력무 (1=실패)
;==================================================
@M_KOJO_MESSAGE_COM_K6_353
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_353_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_353_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
ENDIF
RETURN 1
;==================================================
;354,동침한다 (상대는 일어나서 이불 속으로 초대하는 느낌)
;CFLAG:쇠약 (1이상=일어나지 않는다)
;CFLAG:초대 (0이외=일어나지 않는다)
;==================================================
@M_KOJO_MESSAGE_COM_K6_354
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_354_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_354_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		ELSEIF CFLAG:쇠약 >= 1 || CFLAG:초대 != 0
			PRINTFORMW
		ELSEIF TALENT:연모
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「그냥 잠만 잘 뿐… 그저 함께 잠만 잘 뿐이니까…！」
					PRINTFORMW 「꺼림칙한 짓은 말야、안 돼요…！」
			ENDSELECT
		ELSEIF TALENT:사모
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「뭐야 %CALLNAME:MASTER%도 잘 수 없어？」
					PRINTFORMW 「좋아요、잠깐 밤늦게까지 자지 않고 같이 있어 줄게」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「음냐… 왜 그래 %CALLNAME:MASTER%？ 이렇게 밤 늦게…」
					PRINTFORMW 「그런 얼굴 하지 말아요。정말… 오늘 밤만 함께 있어 줄게」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;355,시간정지（지문의 개변 정도로 그쳐야)
;==================================================
@M_KOJO_MESSAGE_COM_K6_355
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_355_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_355_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
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_K6_360
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_360_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_360_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TCVAR:20
		;골짜기를 과시한다
		CASE 27
			PRINTFORML
			PRINTFORMW
		;前から抱きつく
		CASE 32
			PRINTFORML
			PRINTFORMW
		;치마 속을 드러낸다
		CASE 35
			PRINTFORML
			PRINTFORMW
		;파이즈리
		CASE 53
			PRINTFORML
			PRINTFORMW
		;파후파후
		CASE 73
			PRINTFORML
			PRINTFORMW
		;젖을 빨게 한다
		CASE 77
			PRINTFORML
			PRINTFORMW
		;V삽입する
		CASE 85
			PRINTFORML
			PRINTFORMW
		;정말좋아 hold
		CASE 86
			PRINTFORML
			PRINTFORMW
		;허리振りV
		CASE 88
			PRINTFORML
			PRINTFORMW
		CASEELSE
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;361,저항한다
;TCVAR:20 (27=골짜기를 과시한다 32=앞에서 안겨든다 35=치마 속을 드러낸다 53=파이즈리 73=파후파후 77=젖을 빨게 한다 85=V삽입한다 86=정말좋아 hold 87=A삽입한다 88=V허리흔들기 89=A허리흔들기)
;==================================================
@M_KOJO_MESSAGE_COM_K6_361
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_361_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_361_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TCVAR:20
		;前から抱きつく
		CASE 32
			PRINTFORML
		;치마 속을 드러낸다
		CASE 35
			PRINTFORML
		;파이즈리
		CASE 53
			PRINTFORML
		;파후파후
		CASE 73
			PRINTFORML
		;젖을 빨게 한다
		CASE 77
			PRINTFORML
		;정말좋아 hold
		CASE 86
			PRINTFORML
		CASEELSE
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;363,읽어준다 ([유치]소유 전용)
;TFLAG:193 (1=대성공 0=성공 -1=실패)(지문 분기 없음)
;CFLAG:동침중 (1=이불or침대 속에서 책을 읽음)
;MASTER가 TARGET보다 더 큰 체격일 경우, 무릎 위에 TARGET를 올려주는
;==================================================
@M_KOJO_SUCCESS_COM_K6_363
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_363
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_363_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;364,콩뿌리기 (스이카, 유우기, 스칼렛자매용)
;TFLAG:193 (콩뿌리기에 참여하는 인원)
;==================================================
@M_KOJO_MESSAGE_COM_K6_364
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_364_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;365,모리야신사로 이동 (사나에、카나코、스와코용)
;==================================================
@M_KOJO_MESSAGE_COM_K6_365
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_365_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;402,취침
;TFLAG:193 (0=통상 1=아이를 사이에 두고 함꼐 잔다)
;==================================================
@M_KOJO_MESSAGE_COM_K6_402
;취침에 TRAIN_MESSAGE는 없음
CALL M_KOJO_MESSAGE_COM_K6_402_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_402_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF CFLAG:318 == 1
		ELSEIF TALENT:연모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「혹시 서니ー랑 스타ー가 못된 장난을 치면 크게 소리쳐」
					PRINTFORML 「그러면 나도 섞여서… 가 아니라고 도와주러 올 테니까！」
					PRINTFORMW
				CASE 0
					PRINTFORML 「설마 달에게 질투하는 날이 오다니」
					PRINTFORML 「……으응 아무것도 아니야、잘 자요 %CALLNAME:MASTER%」
					PRINTFORMW %CALLNAME:MASTER%는 창문으로 들여다 보이는 달에 고개를 갸웃하면서 잠이 들었다。
				CASEELSE
					PRINTFORML 루나는 고개를 돌리고 힐끔힐끔 거리며 %CALLNAME:MASTER%를 보고 있다。
					PRINTFORML 「저기… 괜찮다면 함께、함께…」
					PRINTFORMW 「여、역시 아무것도 아니에요。잘 자요」
			ENDSELECT
		ELSEIF TALENT:사모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「…이야기 좀 하지 않을래？」
					PRINTFORMW %CALLNAME:MASTER%는 루나와 이야기를 나누고 잠이 들었다。
				CASE 0
					PRINTFORML 「함께 자고 싶다고？」
					PRINTFORMW 「네네、%CALLNAME:MASTER%는 그런 어린애는 아니니깐。편히 쉬세요」
				CASEELSE
					PRINTFORML 「이렇게 달이 예쁜데 벌써 잠들다니…」
					PRINTFORMW 「유감스럽네。잘 자요 %CALLNAME:MASTER%」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「빨리 안 자면 요괴가 와서 잡아가요」
					PRINTFORMW 「…우응 농담이 아니라니까」
				CASE 0
					PRINTFORML 「나는 좀 더 일어나 있을게。잘 자요」
					PRINTFORMW
				CASEELSE
					PRINTFORML 「이제 잘 시간이야。잘 자요」
					PRINTFORMW
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;403,휴식
;CFLAG:TARGET:수면 (1=TARGET이 자는 옆에서 휴식)
;==================================================
@M_KOJO_MESSAGE_COM_K6_403
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_403_1
RETURN RESULT
@M_KOJO_MESSAGE_COM_K6_403_1
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		ELSEIF CFLAG:318 == 1
		ELSEIF CFLAG:6:수면
			PRINTFORML 「쿠우… 쿠우…」
		ELSEIF TALENT:연모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「…………」
					PRINTFORML 「………」
					PRINTFORMW （가슴이 두근두근거려서 무슨 말을 해야할지 전혀 모르겠어！）
				CASE 0
					PRINTFORML 시선이 느껴져 돌아보자 루나가 당황해 새빨간 얼굴로 눈을 피하고 있었다。
					PRINTFORMW 「따、딱히 %CALLNAME:MASTER%를 보고 있진 않았다고」
				CASEELSE
					PRINTFORML 루나는 %CALLNAME:MASTER%에게서 조금 떨어져 쉬고 있다。
					PRINTFORMW 「거리가 멀다고？ 기、기분탓이야。필시 석 자가 어느새 길어진 걸거야」
			ENDSELECT
		ELSEIF TALENT:사모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「오늘은 얼마나 더 놀 수 있을까」
					PRINTFORMW 「%CALLNAME:MASTER%는 어디 가보고 싶은 데 있어？」
				CASE 0
					PRINTFORML 「끄덕… 끄덕…」
					PRINTFORMW 루나는 %CALLNAME:MASTER%의 등에 기대어 좋고 있다。
				CASEELSE
					PRINTFORML 「%CALLNAME:MASTER%도 신문 읽어？… 뭐야 읽지 않는 건가」
					PRINTFORMW 「오늘도 텐구의 신문은 이상야릇한 말만 써 있어서 재미있어요」
			ENDSELECT
		ELSE
			SELECTCASE RAND:4
				CASE 2
					PRINTFORML 「언제 어디서든 휴식을 취하고 있으면 레이무씨라든지 주민들에게 걷어차일지도 몰라」
					PRINTFORML 「숙소라든지 식당 같은 쉴 수 있는 장소에서 쉬는게 안전할거야」
				CASE 1
					PRINTFORML 「서당이나 대도서관 같은 곳에서도 쉬어도 괜찮아」
					PRINTFORMW 「왜냐면 자다가도 책을 읽는 척하면서 넘어갈 수 있으니까」
				CASE 0
					PRINTFORML 「휴식이 끝나면 신발끈이 사라져 있지 않은지 살펴보는 편이 좋아」
					PRINTFORMW 「쉬고 있을 때야말로 요정의 절호의 사냥감이니까」
				CASEELSE
					PRINTFORML 루나는 책을 탐독하고 있다。
					PRINTFORMW 조용하게 읽고 싶은 것인지 주위의 소리가 들리지 않는다。
			ENDSELECT
		ENDIF
	ENDIF
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;405,나간다 (동행시 데이트)
;조건이 복잡하기 때문에, COMF405 외출한다.ERB를 참조할 것
;==================================================
@M_KOJO_MESSAGE_COM_K6_405
;외출한다에 TRAIN_MESSAGE는 없음
CALL M_KOJO_MESSAGE_COM_K6_405_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_405_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		;TARGET과 데이트
		IF CFLAG:동행
			IF CFLAG:318 == 1
		 		PRINTFORML
			ELSEIF TALENT:연모
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 「나랑 같이 있어도 돼냐고？」
						PRINTFORML 「시、싫지 않아요。자、자 빨리 가죠！」
						PRINTFORMW %CALLNAME:MASTER%의 손을 이끌고 반대 방향으로 나아가는 루나를 황급히 멈췄다。
					CASE 0
						EQUIP:6:2 = 2
						PRINTFORML %CALLNAME:MASTER%는 루나가 갈아입는 것을 기다리고 있다。
						PRINTFORML 「오래 기다리셨어요。… 어、어때？」
						PRINTFORML 오늘의 루나는 평소의 모자가 아니라 검은 리본을 달고 있었다。
						PRINTFORML %CALLNAME:MASTER%가 잘 어울려 사랑스럽다고 말해주자、루나는 얼굴이 확 붉어진다。
						PRINTFORML 「고、고마워요。………… 가、가죠！」
						PRINTFORMW %CALLNAME:MASTER%는 루나의 손에 끌려가면서도、그녀가 넘어지지 않도록 평소보다 주의하며 데이트에 임했다。
					CASEELSE
						PRINTFORML 「에、그… 그거 데이트…？」
						PRINTFORML 「으、응 지금 준비 할 테니까、곧 준비할테니！…… 와앗！」
						PRINTFORMW 당황해 달리기 시작한 루나는 몇 번이나 굴러 넘어지며 준비를 시작했다。
				ENDSELECT
			ELSEIF TALENT:사모
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 「그렇구나、기분 전환으로 멀리 나가 보는 것도 괜찮을 것 같아」
						PRINTFORMW 「빨리 나가죠。그러지 않으면 서니ー나 스타ー도 따라와 시끄럽게 굴테니」
					CASE 0
						PRINTFORML 「…응、좋아요」
						PRINTFORMW
					CASEELSE
						PRINTFORML 「헤에… 그런 재미있는 것이 있다니」
						PRINTFORMW 「조금 신경이 쓰이네。그러면 지금부터 준비할 테니까」
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 「마침 잘됐다。나도 가고 싶다고 생각했던 참이야」
						PRINTFORMW 「커피원두 같은게 좀 줄었으니까 가져와야지」
					CASE 0
						PRINTFORML 「나가는거야？ 기다려 나도 따라간다」
						PRINTFORMW 「%CALLNAME:MASTER% 같은 아이가 혼자 다니면 눈 깜짝할 사이에 요괴에게 습격당할지도 모르고…」
					CASEELSE
						PRINTFORML 「나는 집에서 독서도 재밌지만…」
						PRINTFORMW 「걱정되니까 따라가 줄게」
				ENDSELECT
			ENDIF
		;TARGET이외와 데이트
		ELSEIF CFLAG:MASTER:동행
		;외출 배웅
			IF TALENT:연모
				SELECTCASE RAND:3
					;CASE 1
						;PRINTFORML
					CASE 0
						PRINTFORML 「………잘 다녀오세요」
						PRINTFORMW 루나는 가슴을 쿡쿡 찌르는 아픔을 애써 억누르며 %CALLNAME:MASTER%를 전송했다。
					CASEELSE
						PRINTFORMW 「………… 먼저 권하지 그랬어」 (중얼중얼)
				ENDSELECT
			ELSEIF TALENT:사모
				SELECTCASE RAND:3
					;CASE 1
						;PRINTFORML
						;PRINTFORMW
					;CASE 0
						;PRINTFORML
					CASEELSE
						PRINTFORML 「그 사람과 함께라면 안심이에요。조심해」
						PRINTFORMW
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					;CASE 1
						;PRINTFORML
						;PRINTFORMW
					CASE 0
						PRINTFORML 「밤까지 돌아오지 않으면 요괴에게 먹혀 버릴지도 몰라… 어쩌지」
						PRINTFORMW
					CASEELSE
						PRINTFORML 「모르는 사람을 따라가면 안 돼」
						PRINTFORMW 「이미 알고 있는 사람？ 그렇다면、괜찮으려나」
				ENDSELECT
			ENDIF
		ELSE
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;410,청소
;FLAG:70 (1=시간정지중)
;TFLAG:193 (0=보고만 있다 1=같이 청소)
;TFLAG:194 (3=오염 고 2=오염 중 1=오염 저 0=오염 최소)
;OUTROOF(CFLAG:현재위치)(야외청소 (겨울은 눈치우기)
;==================================================
@M_KOJO_MESSAGE_COM_K6_410
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_410_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_410_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:70
		ELSEIF CFLAG:6:수면
			PRINTFORML 「새근ー…새근ー…콜록 콜록」
		ELSEIF CFLAG:318 == 1
			PRINTFORMW
		ELSEIF TALENT:연모
			SELECTCASE RAND:3
				CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「빠、빨리 끝내죠！」
					PRINTFORMW （아아아아… 둘이서만 있으면 이상하게 의식해 버려！)
			ENDSELECT
		ELSEIF TALENT:사모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「언제나 그 둘만 도망쳐서 내가 뒷정리를 해」
					PRINTFORMW 「덕분에 청소가 능숙해졌어。…하아」
				CASE 0
					PRINTFORML 「바깥 세계에서 『룸바』라는 청소의 요정이 대활약 하고 있데」
					PRINTFORMW 「만약 만날 수 있다면 소개해 주지 않을래？」
				CASEELSE
					PRINTFORML 「높은 곳은 내가 날아서 청소할게」
					PRINTFORMW 「%CALLNAME:MASTER%는 바닥이라든지 부탁해」
			ENDSELECT
		ELSEIF TFLAG:193 == 1
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「홍마관에 인간 메이드씨가 있잖아？」
					PRINTFORMW 「돈이 들지만 홉고블린을 파견해 청소해 주는 것 같아」
				CASE 0
					PRINTFORML 「청소는 큰일。매일 청소하지 않으면 눈 깜짝할 사이에 더러워지니까」
					PRINTFORMW 「……뭐 우리들의 못된 장난으로 더러워지는 일도 있지만」
				CASEELSE
					PRINTFORML 「추워도 더워도 청소하지 않으면…」
					PRINTFORMW 「더러운 방에서 살고 싶지 않은 것은 요정도 인간과 똑같아요」
			ENDSELECT
		ELSE
			PRINTFORML
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;411,전투훈련
;TFLAG:194 (3=여름의 낮 2=위험한날씨 1=악천후 0=실내or통상날씨)
;==================================================
@M_KOJO_MESSAGE_COM_K6_411
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_411_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_411_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:318 == 1
		PRINTFORMW
	ELSEIF TALENT:연모
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			;CASE 0
				;PRINTFORML
				;PRINTFORMW
			CASEELSE
				PRINTFORML 「봐주지 않을 테니까…」
				PRINTFORML 「야부 『나이트 페어리즈』」
				PRINTFORML  요정을 본뜬 달과 같은 광구가 %CALLNAME:MASTER%를 어디까지나 추적해온다！
				PRINTFORMW （……뭔가 다른 때보다 더 잘 뒤쫓는 것 같은데）
		ENDSELECT
	ELSEIF TALENT:사모
		SELECTCASE RAND:3
			CASE 1
				PRINTFORML 루나와 전력을 다해 전투훈련을 했다。… 너무 열심히 해서 둘 다 녹초가 되었다。
				PRINTFORMW 「하아하아… 좀 슬슬 쉬지 않을래？」
			;CASE 0
				PRINTFORML 「자신의 안에서는 이길 수 있다！ 라고 생각해도 실제로 탄막 승부를 벌이면 이길 수 없는 경우가 많아」
				PRINTFORMW 「승부도 그때그때의 운이라는 녀석이군요」
			CASEELSE
				PRINTFORML 「우리들 빛의 3요정은 세명이서 하나」
				PRINTFORML 「그러니까 %CALLNAME:MASTER%에게 져도 어쩔 수 없다…응…」
				PRINTFORMW %CALLNAME:MASTER%에게 탄막으로 진 루나는 투덜투덜 혼잣말을 중얼거리고 있다。
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			CASE 1
				PRINTFORML 루나에게서 탄막 승부에 대해 강의를 받았다。
				PRINTFORML 「우선 명명 결투법이라는 것 부터가 맨먼저야～」
				PRINTFORML 「그래서、스펠 카드라는 것은～」
				PRINTFORML 「그 마을의 버섯 스튜가～～」
				PRINTFORMW 「우엉의 한가운데 있는 정강이털 아래의…… 어라、무슨 얘기였더라？」
			CASE 0
				PRINTFORML 「우선은 도망쳐라。안 되면 피하는 것이 중요할까」
				PRINTFORMW 「그리고 넘어지지 않는 것도……」
			CASEELSE
				PRINTFORML 「요괴에게 습격당하면 이 물이 든 한 됫병을 쳐들고… 에잇！」
				PRINTFORMW 「이렇게 만나자마자 내던져」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;412,공부
;ABL:교양 (ABL:MASTER:교양 보다 높다=MASTER가 가르침을 받는다 ABL:MASTER:교양보다 적다=TARGET이 가르침을 받는다)
;==================================================
@M_KOJO_MESSAGE_COM_K6_412
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_412_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_412_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		ELSEIF CFLAG:318 == 1
			PRINTFORMW
		ELSEIF TALENT:연모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML %CALLNAME:MASTER%가 문득 루나를 보니 공책 모서리에 낙서를 하고 있는 것 같다。
					PRINTFORML 뒤에서 넘겨 보니 하트 마크 안에 뭔가를 기입하고 있다…。
					PRINTFORML 『……과 서로 사모해……』 「아니、언제부터 봤어！ 저리 가！」
				CASE 0
					PRINTFORML 「%CALLNAME:MASTER%는 나를… 저기、얼마나 공부했어？」
					PRINTFORML %CALLNAME:MASTER%는 득의의 표정을 지으며 환상향 요정의 생태에 대한 구변을 토해냈다。
					PRINTFORML 「으、으응… 알았어…」
					PRINTFORMW 루나는 어째선지 풀썩 어깨를 떨구고 있다。
				CASEELSE
					PRINTFORML 「나 같은 걸로 괜찮아？ 인간 마을의 교사라든지 가르치는 것이 능숙한 사람은 그 밖에도 있는데」
					PRINTFORML 「루나와 함께 있는것이 기쁘다… 라는 말을 들으면 공부 할 기분이 아니라고…」
					PRINTFORMW 루나는 얼굴을 붉히며 고개를 숙인 채 입을 다물어 버렸다。
			ENDSELECT
		ELSEIF TALENT:사모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「아침이 졸려？ 그것은 요괴 탓이군요」
					PRINTFORML 「싫어하던 피망을 먹을 수 있게 되었어？ 그것도 요괴 탓이네요」
					PRINTFORMW
				CASE 0
					PRINTFORML 「…새근……새근」
					PRINTFORML   …………Zzz
					PRINTFORMW %CALLNAME:MASTER%는 루나에 이끌려 잠의 세계로 빠져들어갔다。
				CASEELSE
					PRINTFORML 「누가 있어도 공부는 진척된다고？」
					PRINTFORML 「이것이 서니ー라면 곧바로 잠들고 스타ー라면 날 가지고 놀려고 할 걸…」
					PRINTFORMW
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「공부해서 교양을 갖추면、위화감이나 위험을 눈치채 갈 수 없던 곳도 안전하게 들어갈 수 있게 될 거야」
					PRINTFORMW 「우리들이 살고 있는 큰 나무도 그렇네。그리고 근처에 있는 몽환유적도」
					PRINTFORMW 「나는 얼마나 공부해야 달에 갈 수 있을까…」
				CASE 0
					PRINTFORML 「인간이 육체적인 상처에 약하다면 요괴는 정신적인 상처에 약한거야」
					PRINTFORML 「그렇다고 욕설로 요괴를 물리치려 하지 말 것」
					PRINTFORMW 「……도리어 아픈 경험을 당하게 될 테니까」
				CASEELSE
					PRINTFORML 「지금의 환상향은 요괴 현자들이 만든거야」
					PRINTFORMW 「하쿠레이대결계로 바깥세계와 갈라선지 수백년… 세월 참 빠르네요」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;413,요리
;TFLAG:194 (100이상=금단의 메뉴 3=디저트 2=주식 1=간식)
;==================================================
@M_KOJO_MESSAGE_COM_K6_413
;TFLAG:194가 100이상인 경우에만
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_413_1
RETURN RESULT
@M_KOJO_MESSAGE_COM_K6_413_1
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		ELSEIF CFLAG:318 == 1
			PRINTFORML
		ELSEIF TALENT:연모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 루나가 어째선지 소리를 지우고 요리하고 있다。… 집중하고 싶은 걸까。
					PRINTFORML 「맛있어 져ー라、맛있어 져ー라」
					PRINTFORML 「모처럼 %CALLNAME:MASTER%에게 식사대접 하는걸。부끄럽지만 이 정도 하지 않으면」
					PRINTFORMW
				CASE 0
					PRINTFORML 「요즘은 가정에 들어가면 남자도 여자도 요리를 만들 수 있어야 한다고 말하지만」
					PRINTFORML 「나는 %CALLNAME:MASTER%에게 요리를 만들어 주고 싶어…」
					PRINTFORMW 「…！ 지、지금 한 말 깊은 의미는 없으니까！」
				CASEELSE
					PRINTFORML 「%CALLNAME:MASTER%는 어떤 요리를 좋아해？」
					PRINTFORMW 「나도 요리할 줄 아니까 다음에 해줄게」
			ENDSELECT
		ELSEIF TALENT:사모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 루나는 익숙한 솜씨로 속재료를 다듬고 있다。
					PRINTFORML 「우리 요정은 별로 먹지 않아도 죽지 않지만 제대로 미각도 있고 술에 취할 수도 있는 걸」
					PRINTFORMW 「기왕이면 맛있는 거 먹고 기분 좋게 떠들고 싶잖아？」
				CASE 0
					PRINTFORML 「서니ー는 야채를 싫어하기 때문에 방심하면 요리를 하던 중에 채소를 빼려고 한다」
					PRINTFORMW 「야채는 쓴맛이 있어서 맛을 돋보이게 해주는데… 아깝다고 생각하죠？」
				CASEELSE
					PRINTFORML 「%CALLNAME:MASTER%、이거 맛 좀 봐」
					PRINTFORML 「조금 싱거워？ 그러면 좀 더 소금을 넣을까…」
					PRINTFORMW 루나와 분담해가며 맛있게 요리했다。
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「화상 입지 않게 조심해요…」
					PRINTFORMW 루나는 뒤에서 %CALLNAME:MASTER%가 상처를 입지 않는지 지켜보고 있다。
				CASE 0
					PRINTFORML 「%CALLNAME:MASTER%가 요리？…… 괜찮아？」
					PRINTFORMW
				CASEELSE
					PRINTFORML 「처음은 경식부터 만드는 편이 좋아요」
					PRINTFORML 「경험을 쌓아가면 생선요리나 디저트를 능숙하게 만들 수 있게 될 거야」
					PRINTFORMW 「덧붙여…… 먹을 수 없는 것을 요리하려 들지 말아요」
					;PRINTFORML 「美味しそうなのができたね」
					;PRINTFORML 「ちょっと分量が雑だったとこもあるけど…」
					;PRINTFORMW 「みんな最初はそんなもの。流石ね%CALLNAME:MASTER%」
			ENDSELECT
		ENDIF
	ENDIF
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
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_SUCCESS_COM_K6_414
;성공실패 판정
;TFLAG:192 (-2=커맨드(비TARGET시 강제실패), -1=강제실패, 0=COM의존(비TARGET시 강제성공), 1=강제 성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_414
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_414_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_414_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_MESSAGE_COM_K6_415_1
ENDIF
RETURN 1
;==================================================
;415,식사를 대접한다
;TFLAG:193 (1=대성공 0=성공 -1=실패)
;TCVAR:MASTER:308 (bit0=진한 맛 bit1=담백한 맛 bit3=몹시 매운 bit4=몹시 단 bit5=와사비 bit6=몹시 신)
;==================================================
@M_KOJO_SUCCESS_COM_K6_415
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_415
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_415_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_415_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:시간정지
	ELSEIF CFLAG:318 == 1
		PRINTFORML
	ELSEIF TALENT:연모
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			;CASE 0
				;PRINTFORML
				;PRINTFORMW
			CASEELSE
				PRINTFORML 루나는 머뭇머뭇 %CALLNAME:MASTER%에게 요리를 내밀려고 하고 있다。
				PRINTFORML 「%CALLNAME:MASTER%… 네、네에～……」
				PRINTFORML 「으으으 미안！ 지금 건 잊어줘！」
				PRINTFORMW 루나가 주려던 음식은 유턴해서 새빨개진 얼굴을 한 루나의 입으로 돌아가고 있었다。
		ENDSELECT
	ELSEIF TALENT:사모
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			;CASE 0
				;PRINTFORML
				;PRINTFORMW
			CASEELSE
				PRINTFORML 「이대로도 맛있지만、조금만 더 진한 양념으로 하면 맛이 더 좋아질 것 같아」
				PRINTFORML 「만약 괜찮다면 다음에 같이 요리 합시다」
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			;CASE 0
				;PRINTFORML
				;PRINTFORMW
			CASEELSE
				PRINTFORML 「これ%CALLNAME:MASTER%가 만들었어？ 헤에ー 잘 만들었잖아」
				PRINTFORML 「맛은 어떨까？… 우물우물」
				PRINTFORML 「응、나쁘지 않네요。좀 하잖아」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;416,연주한다
;TFLAG:193 (1=대성공 0=성공 -1=실패)
;TFLAG:사용악기 (1=키보드 2=피아노 3=기타 4=트럼펫 5=바이올린)
;==================================================
@M_KOJO_SUCCESS_COM_K6_416
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_416
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_416_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_416_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:시간정지
	ELSEIF CFLAG:318 == 1
		PRINTFORMW
	ELSEIF TALENT:연모
		SELECTCASE TFLAG:193
			CASE 1
				PRINTFORML 「%CALLNAME:MASTER%… 그다지 남의 앞에서 연주하지 않는 것이 좋아요…」
				PRINTFORML 「그런게 능숙하다면 %CALLNAME:MASTER%가 인기가 많아져 버리잖아！」
				PRINTFORMW
			CASE 0
				PRINTFORML 「우리들과 %CALLNAME:MASTER%가 있으면 콰르텟을 짤 수 있겠네요」
				PRINTFORMW 「선전광고대가 될지 성가대가 될지 숙련도에 따라 다르겠지만…」
			CASEELSE
				PRINTFORML 「이것이 천년의 사랑도 식는다고 하는 걸까…」
				PRINTFORMW 루나는 새파래진 얼굴로 %CALLNAME:MASTER%의 연주를 듣고 있다。
		ENDSELECT
	ELSEIF TALENT:사모
		SELECTCASE TFLAG:193
			CASE 1
				PRINTFORML 「나도 %CALLNAME:MASTER% 정도로 능숙하게 칠 수 있으면 좋겠어」
				PRINTFORMW 「어디서 배웠어？ 역시 소령(騒霊)에게서？」
			CASE 0
				PRINTFORML 「%CALLNAME:MASTER%의 연주도 좋아하지만 밤의 음악도 좋아해」
				PRINTFORMW 「벌레 소리와 초목이 흔들리는 소리、강물이 흐르는 소리가 합쳐져서 하나의 음악이 되는거야」
			CASEELSE
				PRINTFORML 「처、처음으에는 피안에서 연습하는 것이 좋지 않을까…？」
				PRINTFORMW 「그렇지 않으면 레이무씨에게 이변으로서 퇴치 당해 버려요」
		ENDSELECT
	ELSE
		SELECTCASE TFLAG:193
			CASE 1
				PRINTFORML 「나도 알아들을 정도로 연주하는게 능숙하네요」
				PRINTFORMW 「%CALLNAME:MASTER%는 음악의 재능이 있는지도」
				PRINTFORMW
			CASE 0
				PRINTFORML 「그건 무슨 악기야？ 소령(騒霊)이 사용하고 있는 것과 비슷한 것 같은데」
				PRINTFORMW 루나는 찬찬히 %CALLNAME:MASTER%가 들고 있는 악기를 바라보고 있다。
			CASEELSE
				PRINTFORML 「오늘만큼 내 능력에 감사한 적은 없을지도…」
				PRINTFORMW
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;417,낮잠잔다
;TFLAG:193 (0=MASTER를 다키마쿠라로 하고 자고 있다 1=MASTER의 무릎을 베고 자고 있다 2=자는 얼굴에 키스 당했다 3=자는 얼굴을 들여다 보였다 4=MASTER가 무릎을 베고 있다 5=가랑이or페니스 비비기)
;CFLAG:동침중 (1=함께 자고 있다)
;==================================================
@M_KOJO_MESSAGE_COM_K6_417
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_417_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_417_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		ELSEIF CFLAG:318 == 1
			PRINTFORML
		ELSEIF TALENT:연모
			SELECTCASE TFLAG:193
			;自分用メモTFLAG:193は馴れ合い度が1以上（セクハラができるようになる）時にランダムで割り振られる？
				CASE 5
				;ペニス揉まれた
					PRINTFORML 루나는 쳐다보고 있는 것도 모르고 화끈 달아오른 얼굴로 %CALLNAME:MASTER%의 사타구니를 계속 비비고 있다。
					PRINTFORMW 「… 무후ｰ」 만지작만지작 만지작만지작 만지작만지작 만지작만지작 만지작만지작
				CASE 4
				;MASTERがルナに膝枕されてる
					PRINTFORML 「%CALLNAME:MASTER%、최근 피곤한 것 아냐？」
					PRINTFORML 「내가 이렇게 해도 곤히 자고 있는 걸」
					PRINTFORMW 「우리처럼 맘대로 살아도 벌을 받지는 않을거라 생각해」
				CASE 3
				;寝顔をのぞき込まれた
					PRINTFORML 「어、얼굴에 보푸라기가 붙어 있어서 떼 주려던 것 뿐이야！」
					PRINTFORML 「아、아무것도 안 했다니까！ 조금도 안 하려고 했으니까！…… 하웃！」
					PRINTFORMW 루나는 새빨개진 얼굴로 뒤로 물러나다가 턱에 넘어져 몸부림치게 되는 것이었다。
				CASE 2
				;寝顔にキスされた？
					PRINTFORML 루나는 이상하게 송구스런 모습으로 정좌를 하고 있다。%CALLNAME:MASTER%의 얼굴을 보려고도 하지 않는다…。
					PRINTFORML 「아、안녕…%CALLNAME:MASTER%…」
					PRINTFORML 「내 얼굴이 빨갛다고？…… 저기、자고 일어났으니까 그래 분명히…！」
					PRINTFORMW （어째서 그 타이밍에 일어나는 거야…。앞으로 조금이면 키、키스 할 수 있었는데…）
				CASE 1
				;MASTERの膝を枕にして寝ている
					PRINTFORML %CALLNAME:MASTER%는 무릎을 베고 있는 루나를 일으키려 했지만、등뒤로 꽉 안고 있어서 떼어낼 수 없었다…。
					PRINTFORML 「쿠울… 쿠울…」 그､ 그그그극…！
					PRINTFORMW 기분 좋게 자고 있는 루나의 잠든 얼굴을 바라보면서、%CALLNAME:MASTER%는 루나가 일어나는 것을 기다리기로 했다。
				CASE 0
				;MASTERを抱き枕にして寝ている
					PRINTFORML %CALLNAME:MASTER%는 자신을 안는 베개 삼아 자고 있는 루나를 일으키려고 했지만、겉보기 이상의 힘으로 꽉 거머쥐고 있어서 떼어낼 수가 없었다…。
					PRINTFORML 「새근… 새근…」 그､ 그그그극…！
					PRINTFORMW 기분 좋은 듯이 자고 있는 루나의 잠든 얼굴을 바라보면서、%CALLNAME:MASTER%는 루나가 일어나는 거을 기다리기로 했다。
				CASEELSE
					PRINTFORMW 「새근ー… 새근ー…」
			ENDSELECT
		ELSEIF TALENT:사모
			SELECTCASE TFLAG:193
				CASE 5
				;ペニス揉まれた
					PRINTFORML 「후응、여긴 이렇게 되어 있구나」
					PRINTFORML 「…아」
					PRINTFORML 「…언제부터 일어나 있었어？」
					PRINTFORMW 한동안 %CALLNAME:MASTER%과 루나 사이에 거북한 공기가 흘렀다
				CASE 4
				;MASTERがルナに膝枕されてる
					PRINTFORML 「%CALLNAME:MASTER%의 볼 부드럽네」
					PRINTFORML 「익숙해졌다고 방심해서 살이 좀 찐 것 아냐？」
					PRINTFORMW
				CASE 3
				;寝顔をのぞき込まれた
					PRINTFORML %CALLNAME:MASTER%는 가슴이 답답해서 눈을 뜨자、나무 열매를 손에 든 루나가 눈앞에 있었다。
					PRINTFORML 「아、일어났다」
					PRINTFORML 「과연 귀에 나무 열매를 채웠더니 %CALLNAME:MASTER%라도 일어나네요」
					PRINTFORML 「뽀、뽑은 나무 열매를 나에게 처넣을 생각！？ 알았어 내가 나빴어！！ 음ー！！」
					PRINTFORMW %CALLNAME:MASTER%와 루나는 잠자리 기상 운동으로 나무 열매 찌르기 공격 전투를 벌이며 좋은 땀을 흘렸다。
				CASE 2
				;寝顔にキスされた？
					PRINTFORML 「%CALLNAME:MASTER%－ 슬슬 일어나ー」
					PRINTFORML 「저기 일어나란 말야ー…아 이제 좀」
					PRINTFORML 「………」
					PRINTFORMW 「…언제나 고마워요」 쪽
					PRINTFORML
					PRINTFORML
					PRINTFORML 「겨우 일어났다。이대로 자고 있으면 밤이 되어 버려요」
					PRINTFORMW %CALLNAME:MASTER%가 일어났을 때、뺨의 희미한 따뜻함에 고개를 갸웃했다。
				CASE 1
				;MASTERの膝を枕にして寝ている
					PRINTFORML 「새근… 새근… 어머、자 버렸다」
					PRINTFORML 「미안해요。너무 기분 좋은 부드러움이라 베개로 삼아 버렸어」
				CASE 0
				;MASTERを抱き枕にして寝ている
					PRINTFORML 「쿠울ー…쿠울ー……。…후에…%CALLNAME:MASTER%？」
					PRINTFORML 「지금 서니ー를 안는 베개로 하고 있었던 꿈을 꾸고 있었어」
					PRINTFORMW 「%CALLNAME:MASTER%는 우리와 같은 키니까 안는 베개로 삼을 보람이 있네요」
				CASEELSE
					PRINTFORMW 「새근ー… 새근ー…」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「후와아암… 잘 잤다」
					PRINTFORMW 「이걸로 이 후의 놀이가 끓어오를 것 같네요」
				CASE 0
					PRINTFORML 「아후… 조금 잠이 안 올지도」
					PRINTFORMW 루나는 멍한 눈을 비비며 기분 좋게 기지개를 피고 있다。
				CASEELSE
					PRINTFORML 「저기 내 얼굴에 장난으로 글자 쓰기 같은 거 되어 있지 않지？」
					PRINTFORMW 「섣불리 낮잠을 자면 누군가씨가 얼굴을 낙서장으로 삼아 버려서…」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;421,발원한다
;조건이 복잡하기 때문에 COMF421 발원함.ERB및, EVENT_MESSAGE_COM400.ERB의 발원함 항을 참조할 것
;==================================================
@M_KOJO_MESSAGE_COM_K6_421
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_421_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;422~430는, 특수 커맨드이므로 템플릿으로는 대응하지 않습니다
;==================================================

;==================================================
;431,욕탕에서 쉰다
;自分用メモ自分の家のお風呂でくつろいだ場合？
;TFLAG:209 (4=인간마을 목욕탕에서 카운터짱을 화나게 했다 1=목욕탕에 들어갔다)
;TFLAG:211 (4=지저의 온천에서 카운터 요괴를 화나게 했다 1=온천에 들어갔다)
;TFLAG:194 (1=연속입욕불가(표시 안될 가능성 있음?))
;==================================================
@M_KOJO_MESSAGE_COM_K6_431
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_431_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_431_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		ELSEIF CFLAG:318 == 1
			PRINTFORML
		ELSEIF TALENT:연모
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
				;CASE 0
					;PRINTFORML
				CASEELSE
					PRINTFORML 「…저、저기」
					PRINTFORML 「몸、씻어 줄까…」
					PRINTFORML 조심스런 동작으로 타올을 감은 루나가 %CALLNAME:MASTER%에게 다가온다。
					PRINTFORML 「영차… 응、%CALLNAME:MASTER%도 남자아이네。몸이 좀 단단하다…」
					PRINTFORML 「…싫다 나、뭘 두근두근 하고 있는 거야」
					PRINTFORMW 「에、다음은 내 차례？… 괘、괜찮아！ 거기는 스스로 씻을 테니까！」
			ENDSELECT
		ELSE
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;432,욕탕에서 쉰다
;自分用メモ人間の里や地底の銭湯に入った場合？
;표시 타이밍은 입욕 후이므로, 목욕 끝난 후로
;TFLAG:209 (4=인간마을 목욕탕에서 카운터짱을 화나게 했다 1=목욕탕에 들어갔다)
;TFLAG:211 (4=지저의 온천에서 카운터 요괴를 화나게 했다 1=온천에 들어갔다)
;==================================================
@M_KOJO_MESSAGE_COM_K6_432
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_432_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_432_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TFLAG:209 == 4 || TFLAG:211 == 4
		PRINTFORML 「…가게의 사람 엄청 화났던데 뭘 한 거야？」
		PRINTFORMW 「돈이 없는데도 목욕탕에 들어가는 시늉을 몇 번이나 했다고？ 뭐 하는 거야 정말로…」
	ELSEIF FLAG:시간정지
	ELSEIF CFLAG:318 == 1
		PRINTFORML
	ELSEIF TFLAG:209 == 1 || TFLAG:211 == 1
		SELECTCASE RAND:4
			CASE 2
				IF TFLAG:209 == 1
					PRINTFORML 루나는 서늘한 가로대에 걸터앉아 따끈하게 쉬고 있다。
					PRINTFORML 「우리 욕실과 달리 대목욕탕은 넓고 상쾌하구나」
					PRINTFORML 「욕심을 부리자면 그 목욕탕을 대절해서 천천히 느긋하게 쉬어 보고 싶지만…」
					PRINTFORMW 「인간의 마을에 살고 있는 부자가 아니면 할 수 없는 사치죠」
				ELSE
					PRINTFORML %CALLNAME:MASTER%가 남탕에서 나오자 식혜를 든 루나가 마중나왔다。
					PRINTFORML 「네 %CALLNAME:MASTER%의 몫、차가워서 맛있어요 이거」
					PRINTFORML 「저기의 오니 같이 찬 술도 나쁘지 않지만 말야。나는 이걸 좋아해」
					PRINTFORML 「그렇다 치더라도… 저 오니가 마시고 있는 술 세 보이네。저것이 일반적으로 말하는 오니고로시인가」
					PRINTFORMW 「여기의 물로 만들면 뭐든 오니고로시가 된다는 것 같아」
				ENDIF
			CASE 1
				PRINTFORML %CALLNAME:MASTER%가 남탕에서 나오자、루나는 프루츠 우유로 달아오른 몸을 식히고 있었다。
				PRINTFORML 「꿀꺽꿀꺽…」
				PRINTFORMW …………
				PRINTDATA
					DATAFORM %CALLNAME:MASTER%는 빵을 엉덩이에 끼고 오른손 손가락을 콧구멍에 넣고 왼손으로 권투를 하면서 「목숨을 소중히」라고 외쳤다。
					DATAFORM %CALLNAME:MASTER%는 대두꺼비에게 잡아먹히기 직전인 치르노의 얼굴 재주를 선보였다。
					DATAFORM %CALLNAME:MASTER%는 수달 귀신에 빙의된 마리사의 흉내를 내 보였다。
				ENDDATA
				PRINTFORML
				PRINTFORML 「푸흡！？」
				PRINTFORML 「쿨럭쿨럭！ 뭐하는 짓이야 %CALLNAME:MASTER%아아아！！」
				PRINTFORMW
			CASE 0
				PRINTFORML 「후우 기분 좋았어。날개의 응어리가 풀린 것 같아」
				PRINTFORML 「봐요 봐。날개가 투명해서 가볍게 느껴져」
				PRINTFORML 루나가 반들반들한 날개를 넓게 펼쳐 보이자、기분 좋은 바람이 %CALLNAME:MASTER%를 어루만진다…。
				PRINTFORMW 「아、정말… 내 날개로 바람쐬지 말아요」
			CASEELSE
				PRINTFORML 「좋은 탕이었지만 조금 긴장했어요」
				PRINTFORML 「\@ TFLAG:209 == 1 ? 마을의 목욕탕 # 지저의 온천 \@의 손님으로 온 요정은 나 혼자 뿐이었던 거야」
				PRINTFORML 「모처럼이니 %CALLNAME:MASTER%과 같이 남탕에 들어갈 걸 그랬어」
				PRINTFORMW
		ENDSELECT
	ELSE
		PRINTFORML
	ENDIF
ENDIF
RETURN 1
;==================================================
;436,독서
;TFLAG:193 (선택지 문학(1=인살 (문학?) 2=실패 3=문학), 선택지 실용서(4=실패 5=실용서), 선택지 야한 책(6=얇고 비싼 책 7=보건체육 8=카마수트라))
;==================================================
@M_KOJO_MESSAGE_COM_K6_436
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_436_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_436_1
;660,독서を参照
CALL M_KOJO_MESSAGE_COM_K6_660_1
;==================================================
;440,기다린다
;==================================================
@M_KOJO_MESSAGE_COM_K6_440
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_440_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_440_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:시간정지
	ELSEIF CFLAG:318 == 1
		PRINTFORMW
	ELSEIF TALENT:연모
		SELECTCASE RAND:3
			CASE 1
				PRINTFORML
				PRINTFORMW
			CASE 0
				PRINTFORML ルナは%CALLNAME:MASTER%로부터 조금 떨어진 장소에서 혼잣말을 중얼거리고 있다。
				PRINTFORML 「무、무슨 말을 해야 좋을지 모르겠다…」
				PRINTFORML 「좋아하는 음식 물어볼까？ 그치만 그런 건 이제 와서 새삼스럽고…」
				PRINTFORMW
			CASEELSE
				PRINTFORML 「…」
				PRINTFORML 「……」
				PRINTFORML 「………」
				PRINTFORMW 「…………20분이 이렇게 길었던가」
		ENDSELECT
	ELSEIF TALENT:사모
		SELECTCASE RAND:3
			CASE 1
				PRINTFORML 「뭔가 재미있는 일이라도 생기지 않으려나…」
				PRINTFORMW
			CASE 0
				PRINTFORML 「가위ー 바위 보…」
				PRINTFORML %CALLNAME:MASTER%는 루나와 가위바위보 놀이로 시간을 때웠다。
				PRINTFORMW 「엣？ 굿촛파(유희왕 카드)라니 뭐야！？」
			CASEELSE
				PRINTFORML %CALLNAME:MASTER%는 루나한테 책을 빌려서 한 권 읽고 있다。
				PRINTFORMW 「읽는 것은 좋지만 더럽히지 말아요…」
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			CASE 2
				PRINTFORML 「그냥 기다리는것만으로도 의외로 피곤하네…」
				PRINTFORMW
			CASE 1
				PRINTFORML 「히에엣！？」
				PRINTFORML 루나는 아무것도 없는 곳에서 넘어지고 있다。
				PRINTFORMW
			CASE 0
				PRINTFORML 「기다리다 지쳐 버리는 인간 따위는 우리의 절대 봉이에요」
				PRINTFORMW
			CASEELSE
				PRINTFORML 「마냥 기다리는 것이라 해도 그 장소의 여러가지를 볼 수 있어서 즐거운거야」
				PRINTFORMW
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;441,수업을 받는다 (케이네 전용)
;==================================================
@M_KOJO_MESSAGE_COM_K6_441
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_441_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;442,벌채한다 (미실장)
;==================================================
@M_KOJO_MESSAGE_COM_K6_442
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_442_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;442以降のコマンドは、実行しても口上はおそらく表示されないのでテンプレでもスルー
;==================================================

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

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

ENDIF
RETURN 1

;==================================================
;601,데이트 스킨십
;==================================================
@M_KOJO_MESSAGE_COM_K6_601
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_601_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;602,데이트 키스
;==================================================
@M_KOJO_MESSAGE_COM_K6_602
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_602_1
RETURN RESULT

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

ENDIF
RETURN 1
[SKIPEND]
;==================================================
;603,손을 잡는다
;TFLAG:193 (1=대성공 0=성공 -1=실패)(실패라도 뿌리치거나 하지는 않습니다)
;==================================================
@M_KOJO_SUCCESS_COM_K6_603
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_603
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_603_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_603_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		ELSEIF CFLAG:318 == 1
			;PRINTFORMW
		ELSEIF TALENT:연모
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML 두근…두근…두근…。
					PRINTFORMW 루나의 가슴이 뛰는 소리가 점점 빨라지는 것이 맞잡고 있는 %CALLNAME:MASTER%의 손바닥으로도 잘 알 수 있었다。
				CASEELSE
					PRINTFORML 루나는 내밀어진 %CALLNAME:MASTER%의 손을 쭈뼛쭈뼛 움켜쥐었다。
					PRINTFORMW 「최대의 행복…이야。정말로 그럴지도 몰라」 중얼중얼
			ENDSELECT
		ELSEIF TALENT:사모
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML 「여기서부터 이 앞은 조금 발밑이 위험한 것 같아」
					PRINTFORML 「응… 고마워요」
					PRINTFORMW %CALLNAME:MASTER%들은 서로 손을 마주잡고 넘어지지 않도록 조심하면서 나아갔다。
				CASEELSE
					PRINTFORML 「여기가 지름길이야」
					PRINTFORMW %CALLNAME:MASTER%가 손을 잡는 것보다 먼저 루나는 %CALLNAME:MASTER%의 손을 잡고 앞으로 나아갔다。
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML 「어머、뭔가 불안해？」
					PRINTFORML 루나는 %CALLNAME:MASTER%가 그녀의 손을 잡아도 싫어하지 않고 손을 마주 잡아 주었다。
					PRINTFORML 「괜찮아요。무슨 일이 있어도 도망갈 자신이… 자신이………」
					PRINTFORMW 「무슨 일이 있으면 열심히 도망칩시다…。넘어지면 도와줘…」
				CASEELSE
					PRINTFORML 「이 길은 익숙하지 않지？」
					PRINTFORML 「게다가 내가 있어도 요정에게 길을 잃게 될지도 모르니、손을 잡고 가죠」
					PRINTFORMW 루나가 내민 손은 작았다。… 그런데도 충분히 따뜻했다。
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;604,산책한다
;데이트중일 경우, CFLAG:현재위치 에 이동장소가 이미 들어가있다
;==================================================
@M_KOJO_MESSAGE_COM_K6_604
;산책한다 에는 TRAIN_MESSAGE가 없다
CALL M_KOJO_MESSAGE_COM_K6_604_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;605,어딘가 들른다
;TFLAG:193 (1=대성공 0=성공 -1=실패)(地の文無し
;==================================================
@M_KOJO_SUCCESS_COM_K6_605
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_605
;어딘가 들른다 에는 TRAIN_MESSAGE가 없다
CALL M_KOJO_MESSAGE_COM_K6_605_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_605_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:시간정지
	ELSEIF CFLAG:318 == 1
		PRINTFORMW
	ELSEIF TALENT:연모
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			CASE 0
				PRINTFORML %CALLNAME:MASTER%과 루나는 기분이 좋아 보이는 풀밭에서 잠깐 쉬었다。
				PRINTFORMW 「…이건 이것대로 한가로이 %CALLNAME:MASTER%와 보낼 수 있어서 좋을지도」
			CASEELSE
				PRINTFORML 「저기 빨리 먼저 가자」
				PRINTFORMW 「왜냐면 데이트 시간이 짧아지잖아…」
		ENDSELECT
	ELSEIF TALENT:사모
		SELECTCASE RAND:3
			CASE 1
				PRINTFORML
				PRINTFORML 「올해는 평소보다 비가 많은 것 같아」
				PRINTFORMW 「역시 장마라는 녀석일까？」
			CASE 0
				PRINTFORML 「작은 뱀을 발견하면 가르쳐줘。그렇게 하면 먹고 싶은 대로 먹을 수 있어」
				PRINTFORMW 「무슨 말이냐고？ 여기의 이야기야 여기의 이야기」
			CASEELSE
				PRINTFORML %CALLNAME:MASTER%가 수풀에 들어가려고 하다가、들요정의 풀매듭에 걸려 넘어지고 말았다。
				PRINTFORML 「어머나、한눈 팔지 말고 조심해서 다녀요… 꺄앗！」
				PRINTFORMW 똑같이 루나도 걸려 넘어져 사이좋게 풀무더기가 되어버렸다。

		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			CASE 1
				PRINTFORML %CALLNAME:MASTER%와 루나가 들러가기를 하던 중 큰 동굴을 찾아냈다。
				PRINTFORML 「이런 구멍 안에 있는 건 보통 곰이나 요정이야」
				PRINTFORMW 「어느 쪽이든 좋을 일은 없네요。갑시다」
			CASE 0
				PRINTFORML 루나와 함께 근처를 산책했다。
				PRINTFORML 「혹시 희귀한 버섯이 나 있을지도 몰라요」
				PRINTFORMW 게다가 희귀한 버섯은 하루도 못 가요」
			CASEELSE
				PRINTFORML …… 멀리 개 짖는 소리가 어디선가 들려왔다。
				PRINTFORML 「히에엑！」
				PRINTFORML 루나는 %CALLNAME:MASTER%의 등에 매달려 겁먹은 표정으로 주위를 살피고 있다。
				PRINTFORML 「승냥이、승냥이 아냐？」
				PRINTFORMW 「전에 쫓기고 나서 트라우마야…」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

;==================================================
;610,식사를 권유한다
;TFLAG:193 (1=대성공 0=성공 -1=실패)
;==================================================
@M_KOJO_SUCCESS_COM_K6_610
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_610
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_610_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_610_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:시간정지
	ELSEIF CFLAG:318 == 1
		PRINTFORML 루나는 %CALLNAME:MASTER%에게 눈길도 주지 않고 담담하게 눈 앞의 요리를 처리하고 있다。
		PRINTFORMW 「흥」 우물우물
	ELSEIF TFLAG:193 == -1
		SELECTCASE RAND:3
			CASE 1
				PRINTFORML 「…일이 난처하게 된 것 같아 %CALLNAME:MASTER%。저 안쪽 자리의 사람、요전에 장난친 사람이야…！」
				PRINTFORML 「들키면 그냥은 넘어가지 않을 것 같아。부디 들키지 않았으면…」
				PRINTFORML %CALLNAME:MASTER%과 루나는 마음 속이 편치 않은 분위기 속에서 식사를 대충대충 넘겼다。
				PRINTFORMW 「먹긴 다 먹었는데 어떤 맛이었는지 하나도 생각이 안 나…」
			CASE 0
				PRINTFORML 「………」 시끌벅적
				PRINTFORML 「………」 어서 오십시오ｰ
				PRINTFORML 「아직 요리 할 수 없는 것 같네…」 밖에서 기다려 주세요
				PRINTFORML 점심식사 시간이라 그런지、좀처럼 마음에 둔 요리가 도착할 기미가 보이지 않는다。
				PRINTFORMW %CALLNAME:MASTER%와 루나는 붐비는 가게 안에서 주문이 오기를 마냥 기다리는 처지가 되었다。
			CASEELSE
				PRINTFORML 「%CALLNAME:MASTER%도 참、팔꿈치를 괴면서 먹는 것은 예의에 어긋나요」
				PRINTFORML 「그렇게 소리를 내면 보기 흉해요。제대로 입을 다물고 먹어」
				PRINTFORMW %CALLNAME:MASTER%는 루나에게 매너를 주의받으면서도 꾸물꾸물 식사를 계속했다…。
		ENDSELECT
	ELSE
	;自分用メモ。食べ物共通口上後に恋慕等の口上に移行
		SELECTCASE RAND:10
			CASE 8
				PRINTFORML 「가끔씩은 이런 것도 나쁘지 않네요」
				PRINTFORML 「우물우물… 이 오뎅도 잘 배어 있다」
				PRINTFORMW %CALLNAME:MASTER%는 루나와 포장마차 대로를 먹으러 돌아다니며 식사를 했다。
			CASE 7
				PRINTFORML 「당근、감자、양파、쇠고기가 집어 넣고」
				PRINTFORML 「그것들을 진한 갈색이 될 때까지 삶은 요리」
				PRINTFORML 즉 이것이 비프 스튜ー라는 것…？」
				PRINTFORMW 루나는 고기감자조림을 앞에 두고 고개를 갸우뚱했다。
			CASE 6
				PRINTFORML 「에、초밥이라고 하면 이거 아냐？」
				PRINTFORML 루나는 루나는 의아스러운 표정으로 %CALLNAME:MASTER%를 쳐다보고 있다。그 앞에 스케로쿠즈시(김초밥과 유부초밥)이 옮겨져 왔다。
				PRINTFORMW 「날생선을 위에 올린다니… 그런 거 먹으면 배탈 나잖아」
			CASE 5
				PRINTFORML %CALLNAME:MASTER%과 루나는 일본식 샌드위치를 사이좋게 나누었다。
				PRINTFORML 「샌드위치는 간편하게 한 손으로 먹을 수 있어 좋아」
				PRINTFORMW 「그렇다고 뭘 하면서 먹는 건 버릇 없으니까 하면 안 돼요」
			CASE 4
				PRINTFORML 「……… 뭐야」
				PRINTFORMW 루나는 %CALLNAME:MASTER%의 의미 있는 듯한 시선을 받으며 밤밥을 먹고 있다。
			CASE 3
				PRINTFORML 「이 요리는 바깥 세계에선 이제 더 이상 먹을 수 없는 요리인 것 같아」
				PRINTFORML 「이렇게 맛있는데 바깥 세상 사람들은 유감이네」
				PRINTFORMW %CALLNAME:MASTER%는 생육회를 먹으면서도 배탈이 나지 않기만을 신에게 기도했다。
			CASE 2
				PRINTFORML 「여기의 피자는 요리할 때 좋아하는 재료를 얹어주네요ー。재미있을 것 같다」
				PRINTFORMW 「그러면 버섯에 아스파라거스에 햄에… 맛이 어떨지 기대가 되네요」
			CASE 1
				PRINTFORML 「맛있지만、이런 붉은 몸의 민물고기가 있었던가…」
				PRINTFORML 루나는 가다랭이의 카르파초를 이상하다는 듯이 바라보고 있다。
				PRINTFORMW 「사실은 요괴어라든가 일 리 없겠죠…？」
			CASE 0
				PRINTFORML 「필라프에 햄버그에 새우튀김、푸딩까지 붙어 있다니」
				PRINTFORML 「이것이 바깥 세계에서 말하는 프렌치 요리의 풀 코스군요。후후、조금 어른스러워진 기분」
				PRINTFORMW 루나는 어린이 런치 셋트를 앞에 두고 자랑스럽게 웃고 있다。
			CASEELSE
				PRINTFORML 「응、이 산채 튀김 맛있다。기름이 달라서인가？」
				PRINTFORMW 「기름이라도 가져가면 이 맛을 재현할 수 있… 을 리 없겠지」
		ENDSELECT
		PRINTFORML
		PRINTFORML
		IF TALENT:연모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「입가가 더러워졌어。닦아준다」 쓱싹쓱싹
					PRINTFORMW 「아무리 시간이 흘러도 아이네。… 그러니 마음에 드는지도」
				CASE 0
					PRINTFORML 「아、맛있네 이거」
					PRINTFORMW 「%CALLNAME:MASTER%도 먹고 싶다고？ 먹다만 거지만 줄께…！」
					PRINTFORMW （이거 간접 키스 아냐…！？） 「여、역시 안 돼！」
				CASEELSE
					PRINTFORML （새삼스럽지만 이건 데이트네）
					PRINTFORMW （……%CALLNAME:MASTER%는 나를 어떻게 생각하고 있을까나）
			ENDSELECT
		ELSEIF TALENT:사모
			SELECTCASE RAND:4
				CASE 2
					PRINTFORML 「쉐어 하죠。%CALLNAME:MASTER%의 것도 조금 줘」
					PRINTFORMW
				CASE 1
					PRINTFORML 「서니ー와 스타ー의 몫도 선물용으로 사버렸어」
					PRINTFORMW 「그렇게 하지 않으면 뒤가 무서우니까…」
				CASE 0
					PRINTFORML 「다 먹을 수 없으니까 %CALLNAME:MASTER%에게 조금 줄게」
					PRINTFORMW 「네、아ー앙」
				CASEELSE
					PRINTFORML 「고마워요。오늘은 대접받았네」
					PRINTFORMW 「답례로 다음에 집에 오면 요리 대접해 줄게」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「요정은 먹지 않아도 괜찮지만 이 맛을 알고나니 그만둘 수가 없네」
					PRINTFORMW 「요정은 먹지 않아도 괜찮지만 이 맛을 알면 그만둘 수가 없네」
				CASE 0
					PRINTFORML 「그러고 보니 여기 이외에도 식사할 수 있는 장소가 더 있는 거야」
					PRINTFORMW 「미혹의 대나무숲에서 밤참새가 포장마차를 열고 있으니까 마음이 있으면 가보는 게 좋을 거야」
				CASEELSE
					PRINTFORML 「하아 긴장해 버렸다」
					PRINTFORML 「밖에서 식사를 하다니 옛날 같으면 어림도 없어요」
					PRINTFORMW 「%CALLNAME:MASTER% 덕분에 당당하게 식사할 수 있어서 감사할 따름이야 」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;613,돈을 번다 (제외되었습니다)
;==================================================
@M_KOJO_SUCCESS_COM_K6_613
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_613
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_613_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;614,식재료 장보기
;TFLAG:193 (1=구매&데이트경험 업 0=구매 -1=미구매)
;==================================================
@M_KOJO_MESSAGE_COM_K6_614
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_614_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_614_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:시간정지
	ELSEIF CFLAG:318 == 1
		PRINTFORMW
	ELSEIF TALENT:연모
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			;CASE 0
				;PRINTFORML
				;PRINTFORMW
			CASEELSE
				PRINTFORML （모처럼의 데이트인데 여기 쇼핑하러 올 것까지는 없잖아…）
				PRINTFORMW
		ENDSELECT
	ELSEIF TALENT:사모
		SELECTCASE RAND:3
			CASE 1
				PRINTFORML 「이렇게 잔뜩 쌀이 있는데 하나쯤 가져가도…」
				PRINTFORMW 「노、농담이야…」
			CASE 0
				PRINTFORML 「%CALLNAME:MASTER%도 요리하려는 거네」
				PRINTFORMW 「쌀로 소바를 만들어？ 메밀가루가 아닌 소바는 다른 요리잖아…」
			CASEELSE
				SIF TFLAG:193 == 0
					PRINTFORML 「힘들 것 같은데 좀 들어줄까？…아니、혼자서 힘내겠다고？ 그래…」
				PRINTFORMW 「그럼 다음으로 갈까요」
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			CASE 1
				PRINTFORML 「에ー저기 『특매일은 반액！』… 이래 」
				PRINTFORMW 「어머？ 그치만 언제 할지 안 적혀 있네」
			CASE 0
				PRINTFORML 「흰쌀밥은 맛있지만 비싸네요ー…」
				PRINTFORMW 「그래서 우리 같은 경우는 빌리는 일이 많지만」
			CASEELSE
				PRINTFORML 「나 잡곡은 그다지 좋아하지 않아요。소박해서 먹기 힘들고」
				PRINTFORML 「다른 아가씨도 좋아하지 않는 사람이 많은 것 같아요」
				PRINTFORMW
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;615,도시락을 먹는다
;실행 가능 장소　지장길, 수양버들아래, 안개의 호수, 현무의늪, 큰두꺼비의연못, 절경의언덕, 산의호수, 천계
;TFLAG:193 (1=대성공 0=성공 -1=실패)
;ABL:요리기능 (2미만=미묘한 만듦새 4미만=그럭저럭 맛있다 4이상=일품)
;==================================================
@M_KOJO_MESSAGE_COM_K6_615
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_615_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_615_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:시간정지
		RETURN 1
	ELSEIF CFLAG:318 == 1
		RETURN 1
	ELSEIF ABL:요리기능 > 3
		SELECTCASE RAND:3
			CASE 1
				PRINTFORML 「이대로도 맛있을 거라고 생각했는데 확실히 요리를 잘 해서 먹으니까 훨씬 맛있어졌어요」
				PRINTFORML 「밤의 중화풍 팥밥에 오니훈제의 소테ー、디저트로는 주목나무 열매의 젤리도 있으니까요」
				PRINTFORMW

			CASE 0
				PRINTFORML 「오늘은 우리들 빛의 3요정을 이미지로 해서 만들어 봤어」
				PRINTFORML 「우선 서니ー는 벚꽃과 어묵의 비빔밥」
				PRINTFORML 「나 루나는 콜리플라워와 치즈의 크림 버무림」
				PRINTFORMW 「그리고 스타ー는 구운 가지 나물로 해봤어。어때？」
			CASEELSE
				PRINTFORML 「조금 너무 의욕이 넘쳤나…」
				PRINTFORML 루나가 찬합을 내려 놓을 때 난 쿵 하는 소리만으로도 상당한 양이 들어가 있다는 것을 %CALLNAME:MASTER%도 잘 알 수 있었다。
				PRINTFORML 1단째에는 주먹밥이 수북했고、２단째에는 다종다양한 반찬、그리고 ３단째는 디저트인 과일이 담겨 있어 보기만 해도 배가 부를 것 같다。
				PRINTFORMW 「%CALLNAME:MASTER%는 식용이 왕성한 시기니까 이 정도쯤은 아무렇지도 않겠죠？」
		ENDSELECT
	ELSEIF ABL:요리기능 > 2
		SELECTCASE RAND:3
			CASE 1
				PRINTFORML %CALLNAME:MASTER%는 생기 없는 눈으로 흰 쌀밥밖에 없는 도시락을 내려다보고 있다。
				PRINTFORML 「그、그렇게까지 실망하지 말아요…」
				PRINTFORML 「그래도 한 보람이 있네요。조금 쌀밥을 들어봐요」
				PRINTFORML 루나가 말한 대로 밥을 치워보니 그 아래에는… 카레ー다！
			CASE 0
				PRINTFORML 「미안… 오늘은 시간이 별로 없어서、안주 남은 걸로 때웠어」
				PRINTFORML 닭꼬치와 버섯 볶음、오뎅의 무와 같이 술에 곁들일 요리 뿐이다。
				PRINTFORMW 「… 내친 김에 남은 술도 가져왔어야 했나」
			CASEELSE
				PRINTFORML 「네、이것이 %CALLNAME:MASTER%의 몫」
				PRINTFORML 루나가 가져온 도시락상자를 열어보니 맛있을 것 같은 향기가 퍼진다。
				PRINTFORML 안에는 볶은 된장의 비빔밥과 뿌리채소의 튀김이 담겨져 있었다。
				PRINTFORMW 「호지차도 있으니까」
		ENDSELECT
	ELSE
	;自分用メモ。お弁当を食べられる場所
	;하쿠레이 신사    10:벚꽃길토리이
	;명련사     110:지장길  120:수양버들아래
	;紅魔館     310:안개의호수
	;妖怪の山   720:현무의늪    730:큰두꺼비의연못
	;妖怪の山頂 820:절경의언덕    830:산의호수	 890:천계
	;미혹의 죽림 460:무명의언덕
	;마법의 숲   530:고목의큰나무
	;夢の世界   1080:복숭아숲~모래사장
		SELECTCASE CFLAG:6:현재위치
				CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML %CALLNAME:MASTER%는 루나와 도시락을 먹으면서 한가로이 보냈다。
					PRINTFORMW
			ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;617,단것을 먹자고 한다
;TFLAG:193 (1=대성공 0=성공 -1=실패)(지문 분기는 대성공만 추가
;==================================================
@M_KOJO_SUCCESS_COM_K6_617
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K6_617
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_617_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_617_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:시간정지
	ELSEIF CFLAG:318 == 1
		PRINTFORMW
	ELSEIF TALENT:연모
		SELECTCASE RAND:8
			CASE 6
				PRINTFORML 「바깥의 과자？… 마치 달처럼 생겼네。모란병의 달이라고 할까？」
				PRINTFORMW 「아、안에 크림 들어가 있어。폭신폭신해서 맛있다」
			CASE 5
				PRINTFORML 「이 초콜릿 술이 들어가 있어。응、부드러워」
				PRINTFORMW 「아、%CALLNAME:MASTER%는 많이 먹으면 안 돼요。취하니까」
			CASE 4
				PRINTFORML 「꺄…。이 가게 갑자기 경단을 내 왔군요」
				PRINTFORMW 「에？ 과자의 이름도 갑자기 경단(いきなり団子)이야？」
			CASE 2
				PRINTFORML 「월병… 이름만으로는 떡일까하고 생각했는데 만쥬네」
				PRINTFORMW 「팥소가 묵직하게 들어있는게… 조금 무겁네요 이거」
			CASE 1
				PRINTFORML 「밤킨톤(일본 전통 밤과자)… 이게 고급스러운 단맛이라고나 할까」
				PRINTFORMW 「… 잠깐 %CALLNAME:MASTER%、뭘 히죽히죽 하고 있는 거야？」
			CASE 0
				PRINTFORML 「후우… 경단 맛있다。아」
				PRINTFORML 「마지막 한 개군요。……%CALLNAME:MASTER% 먹어도 좋아요」
				PRINTFORML %CALLNAME:MASTER%는 경단을 루나의 입가로 쓱 내밀었다。
				PRINTFORML 「반 주는 거야？ 조、조금 부끄럽지만… 아～앙」
				PRINTFORML 「아음…… 아、아무도 안 보겠죠」
				PRINTFORMW
			CASEELSE
				PRINTFORML 「아、딸기의 쇼트케이크다。이 새콤달콤함이 좋네요」
				PRINTFORMW 「집에서도 누군가 만들 수 있으면 좋을 텐데… 공부해볼까」
		ENDSELECT
	ELSEIF TALENT:사모
		SELECTCASE RAND:3
			CASE 1
				PRINTFORML 「달콤한 감미에는 씁쓸한 차가 알맞아요～。후우…」
				PRINTFORMW 「…%CALLNAME:MASTER%는 허세부리지 말고 감주로 했으면 좋았을텐데」
			CASE 0
				PRINTFORML 「%CALLNAME:MASTER%。볼에 팥소가 붙어 있다」
				PRINTFORMW 「좀 가만히 있어 봐。… 네 잡았다」
			CASEELSE
				PRINTFORML 「아 좀 %CALLNAME:MASTER%。맛있다고 떡을 그렇게 볼이 미어지게 넣으면… 봐요 목이 메이잖아요」
				PRINTFORMW 「자… 여기 차。잘 씹어 먹지 않으면 안 돼요」
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			CASE 1
				PRINTFORML 「%CALLNAME:MASTER%… 확실히 돈 가지고 있어？」
				PRINTFORMW 「마을에서 버젓이 물건을 살 때는 돈 없이는 살 수 없으니까…」
			CASE 0
				PRINTFORML 「자、잘먹겠습니다」
				PRINTFORML 루나는 쭈뼛쭈뼛 눈앞에 나온 감미를 먹고 있다。
				PRINTFORML 긴장했는지 굉장히 진지한 표정으로 음미하고 있다…。%CALLNAME:MASTER%는 걱정스러운 표정으로 지켜보았다。
				PRINTFORMW （아、이거 달고 맛있어…）
			CASEELSE
				PRINTFORML 루나는 감미처에 들어간 후에도 안절부절못하고 있다。
				PRINTFORML 「… 인간의 마을에서 소란을 피우면 몇몇 녀석들이 가만있지 않는다구？」
				PRINTFORMW 「게다가 요정이니까 주목 받고 있을 터라… 괜찮을까」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;618,꽃집 (구상은 표시되지 않는 모양?)
;==================================================
@M_KOJO_MESSAGE_COM_K6_618
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_618_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_618_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
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_K6_620
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_620_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_620_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		ELSEIF CFLAG:318 == 1
			PRINTFORMW
		ELSEIF TALENT:연모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「연애 편지는 어떻게 쓰는지 알고 있나요…？」
					PRINTFORMW 루나는 소곤소곤 점주에게 뭔가 상담하고 있는 것 같다。
				CASE 0
					PRINTFORML 「%CALLNAME:MASTER%는 무슨 책을 빌렸어？」
					IF TFLAG:193 == 1
						PRINTFORMW 「그거 빌린 거야？…… 다음에 나도 읽어 봐도 좋아？」
					ELSE
						PRINTFORMW 「원하는 책이 없었어？ 그래、유감이구나…」
					ENDIF
				CASEELSE
					PRINTFORML 루나가 열심히 책을 탐독하고 있다。
					PRINTFORML 「『～가 실형되려면 초승달의 날에 핑크 종이에』……！！」
					PRINTFORML 「어、어어언제부터 보고 있었어？！…… %CALLNAME:MASTER% 하고는 관계없으니까！」
					PRINTFORMW 루나는 난폭하게 책을 다시 선반에 올려놓더니 허둥지둥 멀어져 버렸다。
			ENDSELECT
		ELSEIF TALENT:사모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「홍마관보다 책은 적지만、복잡한 사정의 것이 많은 것 같네」
					PRINTFORMW
				CASE 0
					PRINTFORML 루나는 펼진 책을 뚫어져라 노려보고 있다
					PRINTFORMW 「어려운 한자가 많아서 읽을 수가 없다…」
				CASEELSE
					PRINTFORML 「책에는 쌀이나 금이 들어가 있데」
					PRINTFORMW 「거、거짓말이 아니에요ー！… 아직 본 적은 없지만」
			ENDSELECT
		ELSE
			SELECTCASE RAND:4
				CASE 2
					PRINTFORML 「어려운 글씨가 있어서 읽어달라고？」
					PRINTFORMW 「……미안해요。이건 나도 모른다」
				CASE 1
					PRINTFORML 「우ー응 이쪽을 노려보고 있다。요정이니까 역시 경계되고 있어요」
					PRINTFORMW 「그치만 말썽을 일으킨 건 여기 가게가 더 많은데요…」
				CASE 0
					PRINTFORML 「뭔가 하고 싶은 게 있다면 이곳에서 책을 빌리면서 하면 몸에 더 잘 붙을지도」
					PRINTFORMW 「이미 빌려갔을 수도 있으니 선착순이군요」
				CASEELSE
					PRINTFORML 「…히익、방금 거기서 뭔가 움직이지 않았어？」
					PRINTFORMW 「어라、기분탓…？」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;621,낚시를 한다
;TFLAG:193 (0=낚이지 않음 1~4=물고기 11~15=맛있는물고기 610=목재 131=모리야부적 21=로터 609 = 얼음의비늘 606=용의손톱)
;TFLAG:194 (1000이상이면 TARGET이 낚은)
;==================================================
@M_KOJO_MESSAGE_COM_K6_621
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_621_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_621_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		ELSEIF CFLAG:318 == 1
			PRINTFORML
		ELSEIF TALENT:연모 || TALENT:사모
			IF TFLAG:194 > 1000
			;ルナが釣った
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 「물고기가 소리에 민감하니까 이렇게 소리를 지우면…… 얏！」
						PRINTFORMW 루나는 가볍게 사냥감을 낚아 올렸다。
					CASE 0
						PRINTFORML 「우와… 미끈미끈 해…」
						PRINTFORML 루나는 낚아올린 사냥감을 잡지 못하고 우왕좌앙 하고 있는 것 같다。
						PRINTFORML 「%CALLNAME:MASTER%、좀 부탁해도 될까…？」
						PRINTFORMW %CALLNAME:MASTER%는 악전고투하며 낚싯바늘에 꽂힌 사냥감에서 바늘을 빼냈다。
					CASEELSE
						PRINTFORML 「에、저기… 거짓말！ 당기고 있어！？」
						PRINTFORML %CALLNAME:MASTER%는 사냥감에 질질 끌려가는 루나를 끌어안으며 장대를 힘껏 당겼다。
						PRINTFORML 「와、와、와아아아！」
						PRINTFORML 사냥감을 낚아올린 여세로 %CALLNAME:MASTER%와 루나는 땅바닥에 힘껏 나동그라졌다。
						PRINTFORML 「해、해냈다……」
						PRINTFORMW 땅바닥에 드러누운 채로、낚시의 성과를 서로 기뻐했다。
				ENDSELECT
			ELSE
				SELECTCASE TFLAG:193
					CASE 0
					;何も釣れない
						SELECTCASE RAND:3
							CASE 1
								PRINTFORML 「자연의 소리를 들으면서 물고기가 오기를 기다린다…」
								PRINTFORML 「이것도 낚시의 묘미일지도」
								PRINTFORMW %CALLNAME:MASTER%는 루나와 함께 멍하니 호수면을 응시하고 있다。
							CASE 0
								PRINTFORML 「스타ー를 데려왔으면 물고기의 낌새를 알아차릴텐데」
								PRINTFORMW 「……역기 『내게 좋은 생각이 있어요！』라고 말해서 큰일이 날지도」
							CASEELSE
								PRINTFORML 「… 전혀 보이질 않네」
								PRINTFORMW
						ENDSELECT
					CASE 1 TO 4
					;魚が釣れた
						PRINTFORML 「싱싱한게 낚였잖아。꼭 오늘 밤 저녁식사로 합시다」
						PRINTFORMW
					CASE 11 TO 15
					;うまい魚が釣れた
						PRINTFORML 「맛있을 것 같은 물고기。과연 %CALLNAME:MASTER%」
						PRINTFORMW 「꽤 커서 생선구이나 조림으로 해도 맛있을 것 같아」
					CASE 610
					;木材が釣れた
						PRINTFORML 「목재…？ 뭐야 꽝이구나」
						PRINTFORMW 「그러고 보니 인간의 마을에서 목재상이라는 사람이 그것을 모으는 것 같은데…… 팔릴지도」
					CASE 131
					;守矢の守札が釣れた
						PRINTFORML 「확실히 요괴의 산꼭대기에 있는 신사에서 제비를 뽑을 수 있댔지」
						PRINTFORMW 「３명이서 모아 뽑으러 갔을 때는 바깥 세상의 초콜릿이 당첨됐어。그거 맛있었지」
					CASE 21
					;ローターが釣れた
						PRINTFORML 「이것은……」
						PRINTFORML 「이、이것은 아직 %CALLNAME:MASTER%에게 너무 일러요…！」
						PRINTFORMW 루나는 부끄러운 기분이 들어 진동하는 완구로부터 눈을 피하고 있다。
					CASE 609
					;氷の鱗が釣れた
						PRINTFORML 「아、이것은 마리사씨가 모으고 있었던 녀석이다」
						PRINTFORMW 「조제에 사용한다든가 말한 것 같은데…。%CALLNAME:MASTER%라면 쓸모가 있을 것 같구나」
					CASE 606
					;龍の爪が釣れた
						PRINTFORML 「매우 예리한 손톱… 이 크기는 요수의 손톱 같은게 아니야…」
						PRINTFORMW 「이것을 조합이나 재료로 쓰면 얼마나 굉장한 도구가 만들어질까나…」
					CASEELSE
						PRINTFORMW 「뭐가 낚였어？」
				ENDSELECT
			ENDIF
		ELSE
			SELECTCASE RAND:4
				CASE 2
					PRINTFORML 「우와… 낚시 미끼의 지렁이 같은 걸 잘도 만지네」
					PRINTFORMW 「히익！ 여기에 다가오지 마！」
				CASE 1
					PRINTFORML 루나는 %CALLNAME:MASTER%의 뒤에서 흥미롭게 지켜보고 있다。
					PRINTFORMW 「그렇게 화려한 가짜 미끼로 낚을 수 있을까？」
				CASE 0
					PRINTFORML 「환상향에는 %CALLNAME:MASTER% ３인분보다 큰 물고기도 있으니까」
					PRINTFORMW 「낚으려다 낚여버렸다！같은 일이 일어나지 않도록 조심하세요」
				CASEELSE
					PRINTFORML 「물고기군요…。물고기라면 삼도천의 우루미에게서 가져오면 편한데」
					PRINTFORMW 「그렇지만 %CALLNAME:MASTER%라면 원만하게 뭔가와 교환하는 편이 안전할지도」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;660,독서
;TFLAG:193 (선택지 문학(1=인살 (문학?) 2=실패 3=문학), 선택지 실용서(4=실패 5=실용서), 선택지 야한 책(6=얇고 비싼 책 7=보건체육 8=카마수트라))
;==================================================
@M_KOJO_MESSAGE_COM_K6_660
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_660_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_660_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		ELSEIF CFLAG:318 == 1
			PRINTFORML
		ELSEIF TALENT:연모
			SELECTCASE TFLAG:193
				CASE 1
				;忍殺
					PRINTFORML 「으음…아 음？ 닌자？ 뭐、뭔데？」
					PRINTFORMW 「전혀 달라？더 격렬하게？？」
					PRINTFORMW %CALLNAME:MASTER%과 루나는 한동안 닌자 놀이에 힘썼다。
				CASE 2
				;文学失敗
					PRINTFORML 「아야야야… 요정인 나에게는 너무 벅찼는지도…」
					PRINTFORMW 루나는 머리를 누르며 어질어질 하고 있다。
				CASE 3
				;文学成功
					PRINTFORML 「과연…」
					PRINTFORMW 「서니ー라면 어려워서 책을 걷어차고 있겠지요」
				CASE 4
				;実用書失敗
					PRINTFORML 「한꺼번에 외우려고 하면 오히려 안 들어가요」
				CASE 5
				;実用書成功
					PRINTFORML 「흐ー음…이것은 참고가 될 것 같다」
					PRINTFORMW 루나도 새로운 지혜를 얻은 것 같다。
				CASE 6
				;薄い高い本
					PRINTFORML 「…몰수。이 호색가！」
					PRINTFORMW %CALLNAME:MASTER%는 중요한 곳에서 루나에게 책을 회수당했다。
				CASE 7
				;保健体育
					PRINTFORML 「아니、이것은 아직 빠르다고 할까…」
					PRINTFORMW 「나、나쁜 책은 아니지만… 우우…」
				CASE 8
				;カーマスートラ
					PRINTFORML 「…뭐냐 이 책\/\/\/」
				CASEELSE
					PRINTFORMW 「흠、뭐가 쓰여져 있는지 전혀 모르겠다」
			ENDSELECT
		ELSEIF TALENT:사모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「………………」
					PRINTFORMW 조용한 시간이 흐르고 있다。
				CASE 0
					PRINTFORML 「%CALLNAME:MASTER%가 읽고 잇는 책이 더 재미있을 것 같아」
					PRINTFORMW 「나중에 나한테도 빌려줄 수 있어？」
				CASEELSE
					PRINTFORML 「…키득」
					PRINTFORMW 루나는 바깥 세계의 만화책을 읽고 있는 것 같다。
			ENDSELECT
		ELSE
			SELECTCASE RAND:4
				CASE 2
					PRINTFORML 「다른 책도 읽어보고 싶어？」
					PRINTFORML 「마리사씨라든가, 인간 마을의 반요선생이라든가, 집에 많은 책을 가지고 있지만…」
					PRINTFORMW 사이좋게 지내야 책을 읽을 수 있지 않아？」
				CASE 1
					PRINTFORML 「요마책같이 이따금 변변치 않은 책이 있으니까 주의하지 않으면」
					PRINTFORMW 「나도 전에 그래서 심한 꼴을 당한 걸…」
				CASE 0
					PRINTFORML 「실용서군요」
					PRINTFORML 「가라데 지도서… 당류 요리 식단초… 자연의 연필… 그 밖에도 여러가지 있는 것 같지만」
					PRINTFORMW 「반드시 경험이 몸에 배이는 건 아니니까 긴장해서 읽지 않는 편이 좋지 않을까？」
				CASEELSE
					PRINTFORML 안경을 쓴 루나는 다른 때보다 더 사랑스러워 보인다。
					PRINTFORMW 「…지금 좋은 부분이니까 방해 하지 말아줘」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;698,방에 들어간다
;TARGET의 방에 들어가는 경우에만 표시

;==================================================
@M_KOJO_MESSAGE_COM_K6_698
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_698_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K6_698_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
;どこで表示されるか確認中
IF LOCAL
	IF FLAG:시간정지
	ELSEIF CFLAG:318 == 1
		PRINTFORMW
	ELSEIF TALENT:연모
		SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「아、조… 조금 기다려, 지금 정리할 테니까！」
			CASE 0
				PRINTFORML 「괜찮아？ 상처는 없어？ 누군가에게 승격당하지 않았어？」
				PRINTFORMW 「여기까지 와 주는 건 기쁘지만、도중의 일이 걱정이라서…」
			CASEELSE
				PRINTFORML 「아、%CALLNAME:MASTER%。어서오세요」
				PRINTFORMW 「모처럼 왔으니 달콤한 음료 정도는 내줄게」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;699,밖으로 나온다
;==================================================
@M_KOJO_MESSAGE_COM_K6_699
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K6_699_1
RETURN RESULT

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

ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;파생 커맨드
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;60,귀이개
;전턴 무릎베개 후 스킨십 커맨드
;TFLAG:193 (1=대성공 0=성공 -1=실패)(실패하는 건 TARGET)
;==================================================
@M_KOJO_SUCCESS_SCOM_K6_60
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_SCOM_K6_60
CALL M_KOJO_MESSAGE_SCOM_K6_60_1
;RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K6_60_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:시간정지
	ELSEIF CFLAG:318 == 1
		PRINTFORMW
	ELSEIF TALENT:연모
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			CASE 0
				PRINTFORML 「떠、떨어지지 않아…」
				PRINTFORMW
			CASEELSE
				PRINTFORML 「수、숨이 난폭해？… 단순한 산들바람이야！」
				PRINTFORMW 「손이 떨리고 있다고？… 그、그냥 지진탓이야！」
		ENDSELECT
	ELSEIF TALENT:사모
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			CASE 0
				PRINTFORML 「앗！………아ー」
				PRINTFORMW
			CASEELSE
				PRINTFORML 「우ー응… 안쪽에 굳어 있는 게 떨어지질 않아…」
				PRINTFORMW
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			CASE 0
				PRINTFORML 「자주 치워주지 않으면 막혀 버려요」
				PRINTFORMW
			CASEELSE
				PRINTFORML 「어째서 내가…」
				PRINTFORMW 「아、잠깐 움직이지 말아요。지금 좋은 곳이니까」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;61,다키마쿠라
;(TARGET수면시간or쇠약)동침중, 전턴을 껴안고 취침 커맨드
;분기 없음
;==================================================
@M_KOJO_MESSAGE_SCOM_K6_61
CALL M_KOJO_MESSAGE_SCOM_K6_61_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K6_61_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:시간정지
	ELSEIF CFLAG:318 == 1
		PRINTFORMW
	ELSEIF TALENT:연모
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			;CASE 0
				;PRINTFORML
				;PRINTFORMW
			CASEELSE
				PRINTFORML （…%CALLNAME:MASTER%가… 의 얼굴이 이렇게나 가까이）
				PRINTFORMW 루나는 핑 하고 몸이 뻣뻣하게 굳어져 단단한 베개가 되어 버렸다。
		ENDSELECT
	ELSEIF TALENT:사모
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			;CASE 0
				;PRINTFORML
				;PRINTFORMW
			CASEELSE
				PRINTFORML 「그러면 나도 %CALLNAME:MASTER%를 다키마쿠라로 해도 문제 없겠네요？ 그럼」
				PRINTFORMW %CALLNAME:MASTER%와 루나와 졸릴 때까지 서로 장난치며 놀았다。
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			;CASE 0
				;PRINTFORML
				;PRINTFORMW
			CASEELSE
				PRINTFORML 「……… 오늘 뿐이야」
				PRINTFORML 눈을 가늘게 뜬 루나는 그렇게 말하고 잠들었다。
				PRINTFORMW
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;62,이마 뽀뽀
;전턴 머리를 쓰다듬고 키스하기
;TFLAG:193 (1=대성공 0=성공 -1=실패)(지문 분기 없음)
;ABL:욕망 (5이상=부족하다)
;ABL:친밀 (5이상=쑥스러워하다)
;==================================================
@M_KOJO_SUCCESS_SCOM_K6_62
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_SCOM_K6_62
;CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K6_62_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K6_62_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:시간정지
	ELSEIF CFLAG:318 == 1
		PRINTFORMW 「…뭐야」
	ELSEIF TALENT:연모
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			;CASE 0
				;PRINTFORML
			CASEELSE
				PRINTFORML 「햐읏…！ 한다면 사전에 말 좀 해요…\/\/\/」
		ENDSELECT
	ELSEIF ABL:6:친밀 >=5
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			CASE 0
				;PRINTFORML
			CASEELSE
				PRINTFORML 「%CALLNAME:MASTER%도 참 무슨 장난하는 거야 이제와서…」
				PRINTFORMW 루나는 부끄러운 기분에 이마를 누르고 있다。
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			CASE 0
				;PRINTFORML
			CASEELSE
				PRINTFORML 루나는 의아하다는 듯이 고개를 갸웃했다。
				PRINTFORMW 「어딘가의 인사…？ 별로 좋은 기분이 들지 않네요」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;63,좀 더 키스한다
;전턴 키스 후 키스한다
;분기조건은 EVENT_MESSAGE_COM500.ERB 참조
;==================================================
@M_KOJO_SUCCESS_SCOM_K6_63
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_SCOM_K6_63
;CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K6_63_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K6_63_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL

	IF FLAG:시간정지
	ELSEIF CFLAG:318 == 1
		PRINTFORMW
	ELSEIF TALENT:연모
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			;CASE 0
				;PRINTFORML
				;PRINTFORMW
			CASEELSE
				PRINTFORML
		ENDSELECT
	ELSEIF TALENT:사모
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			;CASE 0
				;PRINTFORML
				;PRINTFORMW
			CASEELSE
				PRINTFORML
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			;CASE 0
				;PRINTFORML
				;PRINTFORMW
			CASEELSE
				PRINTFORML
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;80,손을 잡아당긴다
;데이트 출발 후 목적지에 도착할 때까지
;TFLAG:193 (1=대성공 0=성공 -1=실패)
;==================================================
@M_KOJO_SUCCESS_SCOM_K6_80
;성공실패 판정
;TFLAG:192 (-2=커맨드 종료, -1＝강제실패, 0=COM의존, 1=강제성공or대성공)
TFLAG:192 =0

@M_KOJO_MESSAGE_SCOM_K6_80
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K6_80_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K6_80_1
;-------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:연령 == -1 || TALENT:MASTER:애같음 || CFLAG:6:1001 == 1
		IF FLAG:시간정지
		ELSEIF CFLAG:318 == 1
		ELSEIF TALENT:연모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML （%CALLNAME:MASTER%의 손、부드럽지만 따뜻하고 탄탄해…）
					PRINTFORMW （뭔가 믿음직하다… 라고 생각하는 건 기분 탓이야？）
				CASE 0
					PRINTFORML 루나는 반대로 %CALLNAME:MASTER%의 손을 이끌고 앞길을 재촉하고 있다。
					PRINTFORML 귓볼까지 새빨간 것은 숨을 헐떡이고 있기 때문일까。
					PRINTFORMW （앞서 가지 않으면 부끄러워하고 있는 걸 들켜버려…！）
				CASEELSE
					PRINTFORML 「아、%CALLNAME:MASTER%의 손이…」 퐁…！
					PRINTFORML %CALLNAME:MASTER%가 루나의 손을 잡자 주전자처럼 루나가 달아올랐다。
					PRINTFORMW 「…괘、괜찮으니까 신경쓰지 마！」
			ENDSELECT
		ELSEIF TALENT:사모
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML %CALLNAME:MASTER%가 손을 잡아 당기자 루나도 함께 발걸음을 빨리 한다。
					PRINTFORMW 「서두르고 있는 거죠？ 갑시다」
				CASE 0
					PRINTFORML 루나는 날면서 %CALLNAME:MASTER%에게 손이 끌려가고 있다。
					PRINTFORMW 「…이래서야 연날리기 같네」
				CASEELSE
					PRINTFORML %CALLNAME:MASTER%는 루나가 넘어지지 않도록 손을 잡아 당기면서 신중하게 걸음을 빨리 했다。
					PRINTFORML 「신경써주는 것은 기쁘지만 그렇게나 기다릴 수 없는 거야？」
					PRINTFORMW 「%CALLNAME:MASTER%가 그렇게까지 서두르다니 어떤 곳일까」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「잠깐 좀 기다려요！」
					PRINTFORML 「그렇게 서두르면 넘어져요… 와아！」
					PRINTFORMW %CALLNAME:MASTER%는 넘어진 루나를 황급히 부축해 일으켰다。
				CASE 0
					PRINTFORML 「조금 기다려 나를 두고 가지 마―！」
					PRINTFORMW 루나는 다리가 꼬이면서도 어떻게든 %CALLNAME:MASTER%를 따라 잡으려고 하고 있다。
				CASEELSE
					PRINTFORML 「와、와、와…！」
					PRINTFORMW
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1

path: ERB/대사_메시지관련/개인대사/006 루나/M_KOJO_K6_日常系コマンド.ERB