code:
;-------------------------------------------------
; eraTW 4.800用 レティ口上（キャラクターの名前を入れる、下にコンセプトなど一言あれば入れる）
;-------------------------------------------------
;타인에 의한 수정, 가필, 개변에 대해서는, 동봉한 라이센스 조항에 따라 주세요.

;------ 오려내기 시작 -----------
;eraTheWorld proto4.07 패치 도입용 Ver1.13
;템플릿 사용법
;初めに置換コマンド等により K74 を K(キャラNo) に変更して下さい
;キャラNoはCSVフォルダのCharaファイルを参照　例(霧雨 魔理沙の場合)：K74 =置換=> K11
;
;------ 오려내기 종료 -----------

;**** FlagManagement **********************************************************
;본 구상에서 사용하고 있는 CFLAG · TCVAR 등
;
;
;
;******************************************************************************

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

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

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

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

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

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

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

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

;### 구상색판정 ###################################
@M_KOJO_COLOR_K74

;여기에 SETCOLOR 함으로써 구상에 색을 입힐 수 있습니다
;예: SETCOLOR 0xC07070

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"UPDATE판정"
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_UPDATE_K74
;구상 독자적인 UPDATE용
;ENCOUNTER 전용으로 자체 분기 플래그를 넣었을 경우 등에 사용하시기 바랍니다
;UPDATE판정으로 CFLAG등의 캐릭터 변수를 사용하는 경우, 캐릭터 번호를 지정해야 합니다

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"계 이벤트 (엑스트라 구문)
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K74
;첫대면, 인사 타이밍
;TALENT 변경은 이쪽에서 부디.
	PRINTFORMW 「어머？」
	PRINTFORMDL 새하얀 피부의 여성이 눈앞에 서 있었다。그녀에게서 냉기 같은 차가움이 전해져 온다…… 같은 생각이 들었다。
	PRINTFORMW 「당신은 인간이네。그런데、겨울은 좋아해？」
	PRINTFORMW 「나는 단연 겨울을 좋아해。여름 같은 것은 더워서 녹초가 되어 길가에 쓰러질 걸」
	PRINTFORMW 「자기소개가 아직이였구나。레티・화이트락이야。잘 부탁해」
	PRINTFORMDL 그녀가 내민 손을 마주잡았다。
	PRINTFORMW 「뭐、평소 겨울 이외에는 밖에 나오지 않지만。최근에는 평화로우니까」
	PRINTFORMW 「적어도、겨울을 만끽하며 날고 있었을 뿐인데 뭇매를 맞는 일은 없네요」
	PRINTFORMDL 레티는 어딘가 먼 눈을 하고 있다。
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"계 이벤트
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;데이트에서 돌아오는 길에 퍼스트 KISS (합의도 붙는다)
;==================================================
@M_KOJO_SPEVENT_K74_1(ARG,ARG:1)
;구상주는 TARGET
;지문표시
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------
;地の文
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
IF LOCAL
	PRINTFORMW 「오늘은 즐거웠어요」
	PRINTFORMDL 레티의 부끄러워하는 모습은、어딘가 덧없어 보인다。
	PRINTFORMDW 새하얀 피부 탓일까。
	PRINTFORMW 「……%CALLNAME:MASTER%」
	PRINTFORMDL 불러 세워져、무심코 뒤를 돌아보았다。
	PRINTFORMDW 동시에 생각지도 않은 그녀의 입술이、%CALLNAME:MASTER%의 입술에 닿는다。
	PRINTFORMW 「즐겁게 해 준 답례」
	PRINTFORMDL 그녀의 입술은 흠칫할 정도로 차가웠고、놀라울 정도로 따스했다。
	PRINTFORMDW 어안이 벙벙해 있는 %CALLNAME:MASTER%를 향해、레티가 쿡쿡 웃는다。
	PRINTFORMW 「한 건 해냈다。%CALLNAME:MASTER%의 그런 얼굴을 볼 수 있었다는 것만이라도、대만족이에요」
	PRINTFORMDL 그렇게 말하고 있는 그녀도、과연 귀까지 새빨갛게 달아오르고 있다는 것을 알고는 있을까。
	PRINTFORMW 「후후、데이트……。또 기대하고 있을게요」
	;키스캔슬 하고싶은 경우 다음을 개방
	;TCVAR:키스캔슬 = 1
ENDIF
RETURN 1

;==================================================
;데이트에서 돌아오는 길에 고백 (애인이 붙는다)
;==================================================
@M_KOJO_SPEVENT_K74_2(ARG,ARG:1)
;구상주는 TARGET
;지문표시
CALL SPEVENT_MESSAGE_2(ARG,ARG:1)
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;고백내용
	;이 고백 내용 표시 후에 받을지 말지의 선택 분기가 표시됩니다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		IF FIRSTTIME(1110)
			PRINTFORMW 「……%CALLNAME:MASTER%」
			PRINTFORMW %CALLNAME:MASTER%를 불러 세우는 목소리。그 소리는 조금 떨리고 있다。
			PRINTFORML 「아시다시피、저는 겨울 이외에는 질색。그렇지만、요즘은 조금씩 극복하고 있어」
			PRINTFORML 「%CALLNAME:MASTER%가 많이 데리고 나가 준 덕분이야」
			PRINTFORML 「만약、길가에 쓰러져 버려도 %CALLNAME:MASTER%가 도와준다라는 안심감이 있기 때문인 걸까나？」
			PRINTFORMW 그렇게 말을 던지는 레티의 미소는、어딘지 어색했다。
			PRINTFORML 크게 숨을 내쉬더니、가슴 앞에 주먹을 쥐고 모은다。
			PRINTFORMW 「사실은 알고 있는 거야。어째서인지」
			PRINTFORMW 「저는 %CALLNAME:MASTER%을 좋아하게 되버린 겁니다」
			PRINTFORML 「그 기분은、나날이 크게 부풀어만 가」
			PRINTFORMW 요동치듯 떨리는 눈동자。그런데도、그녀는 각오를 다진 표정으로――
			PRINTFORMW 「%CALLNAME:MASTER%…… 사랑합니다。그러니、저와 사귀어 주세요」
			PRINTFORMW 「요괴와 인간이 어울리지 않는다는 것은 알고 있어요。종족의 벽은 넘기 힘들 정도로 두껍다는 것도。하물며、저는――」
			PRINTFORMW 「그런데도、단념하고 싶지 않아」
			PRINTFORMW 「%CALLNAME:MASTER%를…… 포기하고 싶지 않다」
			PRINTFORML 그녀의 목소리 음색은、점점 떨리고 있다。
	;二回目
	ELSE
			PRINTFORMW 「끈질기다는 것은 알고 있어」
			PRINTFORMW 「그렇지만、역시 단념하고 싶지 않다」
			PRINTFORMW 「……좋아해、뭐가 되든」
			PRINTFORMW 「%CALLNAME:MASTER%를 위해서라면、사막이라도 견뎌 보인다」
			PRINTFORMW 「……부탁이야」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;고백OK (애인이 붙는다)
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「고마워요……%CALLNAME:MASTER%」
		PRINTFORMDW 조용히 레티가 포옹해 왔다。
		PRINTFORMDW 그녀의 몸은 차갑고도 따스했다。
		PRINTFORML 「나、%CALLNAME:MASTER%를 행복하게 해준다」
		PRINTFORML 「겨울 이외에도 노력할게。일생 목숨을 걸고」
		PRINTFORMDW 너무 노력해서、쓰러지지 말라고 농담조로 말을 건냈다。
		PRINTFORML 「후후、그 때는 %CALLNAME:MASTER%가 도와 줄거지요？」
		PRINTFORMDL 미소짓는 그녀는 어느새인가 %CALLNAME:MASTER%의 얼굴에 슬그머니 얼굴을 밀어오고 있었다。
		PRINTFORML 「츄웃」
		PRINTFORMDL 사랑스러운 소리와 함께、입술이 가볍게 닿는다
		PRINTFORMW 「후후、이것이 연인이 되서 한 첫번째 키스군요♪」
					 	EXP:키스경험 += 1
			 			EXP:MASTER:키스경험 += 1
						TALENT:키스미경험 = 0
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;고백실패
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「그런가요……」
		PRINTFORML 「우응。신경쓰지 않으니、마음쓰지 마요」
		PRINTFORML 「그렇지만、제가 %CALLNAME:MASTER%를 좋아한다는 것만은 기억해 줘요」
		RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;데이트에서 돌아오는 길
;==================================================
@M_KOJO_SPEVENT_K74_3(ARG,ARG:1)
;구상주는 TARGET
;지문표시
CALL SPEVENT_MESSAGE_3(ARG,ARG:1)
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;통상 귀가
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		IF CFLAG:318 == 1
			PRINTFORMW 「나름대로 즐거웠어요」
			PRINTFORMW 레티는 머리를 가볍게 숙여 보이고、그대로 날아갔다。
		ELSEIF TALENT:연인
			PRINTFORMW 「즐거웠어요。다음에 또 데이트 하죠」
			PRINTFORMW 그럼、또 내일도 할까 하고 농담인 체해 말해보았다。
			PRINTFORMW 「후후、기대하고 있을께」
			PRINTFORMW 「그럼 또 다시」
			PRINTFORMW (또 다시 보자……인가。만날 수 있겠지？)
		ELSEIF TALENT:연모
			PRINTFORMW 「오늘도 즐거웠어」
			PRINTFORMW 「%CALLNAME:MASTER%가 데려가 줄 때마다、내 안에서 여러가지가 퍼져 가는 거야」
			PRINTFORMW 킥킥 하고 그녀가 웃는다。
			PRINTFORMW 「다음도 기대해도 좋을까？」
		ELSEIF TALENT:사모
			PRINTFORMW 「오늘은 즐거웠다」
			PRINTFORMW 「또、이야기 나눌 일 있으면 불러 주세요」
			PRINTFORMW 레티는 미소를 짓고 있다。
		ELSE
			PRINTFORMW 「그러면、안녕」
		ENDIF
		RETURN 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;반발각인 소거 이벤트
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;반발각인2>1 레벨 다운 이벤트
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;반발각인3>2 레벨 다운 이벤트
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"계 이벤트
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;방에서 조우
;==================================================
@M_KOJO_EVENT_K74_1(ARG,ARG:1)
;구상주는 TARGET
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;仕事中ではなく、今日会ってない。
	IF !TCVAR:74:오늘만났는지
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;MASTER가 들어왔다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
			;正月、발렌타인、ハロウィン、クリスマスの場合
			IF (DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1) || (DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000) || (DAY:2 == 3 && DAY:3 == 30) || (DAY:2 == 4 && DAY:3 == 25)
				CALL SPECIALDAY_EVENT_K74
			ELSEIF TALENT:연인
				PRINTFORMW 「아、%CALLNAME:MASTER%」
				PRINTFORMW 「오늘은、어디로 가？ 아니면、데리고 들어가지는 거야？」
				PRINTFORMW 「후후、저는 %CALLNAME:MASTER%의 연인인 걸요」
				PRINTFORMW 레티는 서서히 붉어지는 자신의 뺨을 손으로 누르며、꺄ー 꺄ー 말하고 있다。
			ELSEIF TALENT:연모
				PRINTFORMW 「아라、%CALLNAME:MASTER%」
				PRINTFORMW %CALLNAME:MASTER%가 있는 것을 알아차린 레티는 부끄러워했다。
				PRINTFORMW 「오늘은 뭘 할 거야？」
				PRINTFORMW 「뭐든지 교제해 드려요」
			ELSEIF TALENT:사모
				PRINTFORMW 「아、%CALLNAME:MASTER%」
				PRINTFORMW %CALLNAME:MASTER%를 알아차린 레티는 미소를 지었다。
				PRINTFORMW 「그래서、뭐를 할 거야？」
				PRINTFORMW 「이상한 일이 아니면 뭐든지 좋아요」
			ELSE
				PRINTFORMW 레티는 이쪽을 슬쩍 확인했다。
			ENDIF
			RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGET이 들어왔다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGET이 목욕탕에 들어와서 같이 들어간다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGET이 목욕을 하고 나갔다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGET이 목욕을 해서 쫓겨났다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;외출처에서 조우했다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;다른 캐릭터와 데이트중에 조우했다
	;ARG:1은 데이트 상대
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MAIN_MAP 위에서 하루 첫인사
	;주의, 이 뒤에 통상적인 조우 구상,ARG==1 OR ARG==2에 접속합니다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;외출처에서 하루 첫인사
	;ARG:1은 데이트 상대, ARG:1이 0일 경우에는 데이트X
	;주의, 이 뒤에 통상적인 외출처에서 조우 구상, ARG==6 OR ARG==7에 접속합니다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;ARG:1로 데이트중
		IF ARG:1
		;혼자서 외출
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
ENDIF
RETURN 1

;==================================================
;特別な日イベント用関数
;==================================================
;サグメ口上様からお借りしました
;-------------------------------------------------
@SPECIALDAY_EVENT_K74
;-------------------------------------------------
	;謹賀新年
	IF DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1
		IF TALENT:연인
			PRINTFORMW 「새해 복 많이 받으세요」
			PRINTFORMW 「하루가 지나는 것이、빠르게 느껴져요」
			PRINTFORMW 「금년 일년도 아무쪼록 부탁해요」
			PRINTFORMW 그렇게 말하면서、레티는 몸을 기대며 팔을 껴안아 왔다。
		ELSEIF TALENT:연모
			PRINTFORMW 「새해 복 많이 받으세요」
			PRINTFORMW 「금년도 좋은 한 해로 합시다」
		ELSEIF TALENT:사모
			PRINTFORMW 「축하합니다」
			PRINTFORMW 레티는 고개를 숙인다。
			PRINTFORMW 「금년도 잘 부탁드립니다」
			PRINTFORMW 「빨리 겨울이 오지 않으려나」
		ELSE
			PRINTFORMW 레티는 정중하게 고개를 숙인다。
			PRINTFORMW 「새해 복 많이 받으세요」
			PRINTFORMW 「저는 겨울이 지나서 실망이지만」
		ENDIF
	;バレンタインデー
	ELSEIF DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000
		IF TALENT:연인
			PRINTFORMW 「%CALLNAME:MASTER%、건네주고 싶은 것이 있어요」
			PRINTFORMW 「반드시 이 앞으로도、%CALLNAME:MASTER% 밖에 건네주지 않는다고 생각해요」
		ELSEIF TALENT:연모
			PRINTFORMW 「%CALLNAME:MASTER%、이것 줄게」
		ELSEIF TALENT:사모
			PRINTFORMW 「%CALLNAME:MASTER%、자 받아주세요」
		ELSEIF CFLAG:2 >= 1000
			PRINTFORMW 「%CALLNAME:MASTER%、준다」
		ENDIF
		SELECTCASE CFLAG:호감도
		CASE 1000 TO 3000
			PRINTFORMW 「초콜릿 줄게요」
			PRINTFORMW 레티는 초콜릿을 건네주었다。
			PRINTFORMW 「아쉬워 하는 얼굴 하다니 뭔가요？　이것으로 충분하죠」
		CASE 3001 TO 5000
			PRINTFORMW 초콜릿을 건네받았다。
			PRINTFORMW 「이거、평소의 답례」
		CASE IS > 5000
			IF EXP:애정경험 >= 100
				PRINTFORMW 「이거、만들어 보았어요」
				PRINTFORMW 레티는 초콜릿을 건네주었다。
				PRINTFORMW 「분명히 맛있게 만들었을 거라고 생각하니까。먹어 주면 기뻐요」
			ELSE
				PRINTFORMW 「준다」
				PRINTFORMW 이렇게 말하면서 레티는 초콜릿을 건네준다。
				PRINTFORMW 「아마、맛있을 거라 생각한다。비싼 걸 골랐으니까」
			ENDIF
		ENDSELECT
	;ハロウィン
	ELSEIF DAY:2 == 3 && DAY:3 == 30
		IF TALENT:연인
			PRINTFORMW 「%CALLNAME:MASTER%、트릭・오어・트리트」
			PRINTFORMW 레티는 그렇게 말하더니 %CALLNAME:MASTER%의 귓가에 살그머니 속삭인다。
			PRINTFORMW 「지금부터 못된 장난 해줄래？」
		ELSEIF TALENT:연모
			PRINTFORMW 「트릭・오어・트리트」
			PRINTFORMW 「못된 장난을 해주지 않으면、못된 장난을 해버리겠어」
			PRINTFORMW 「달라？　맞잖아요♪」
			PRINTFORMW 기대어 오는 그녀의 귀는 조금씩 붉어지고 있다。
			PRINTFORMW
		ELSEIF TALENT:사모
			PRINTFORMW 「트릭・오어・트리트」
			PRINTFORMW 레티는 조용하게 등 뒤에서 다가오며、나직하게 중얼거렸다。
			PRINTFORMW 「아라、이제부터 못된 장난 당하려나？　과자를 받으려고 했지만♪」
		ELSE
			PRINTFORMW 「트릭・오어・트리트」
			PRINTFORMW 「오늘은、공짜로 과자를 받을 수 있는 날인 것 같네요」
			PRINTFORMW 「……달라？」
		ENDIF
	;クリスマス
	ELSEIF DAY:2 == 4 && DAY:3 == 25
		IF TALENT:연인
			PRINTFORMW 「메리 크리스마스」
			PRINTFORMW 레티는 의기양양하게 %CALLNAME:MASTER%에게 말을 건다。
			PRINTFORMW 「데이트 하지 않을래？」
			PRINTFORMW 「그렇지 않으면、집에서 함께 보내？」
			PRINTFORMW 기대하는 눈빛을 반짝이며 이쪽으로 다가온다。
		ELSEIF TALENT:연모
			PRINTFORMW 「%CALLNAME:MASTER%、오늘은 예정 비어 있을까나？」
			PRINTFORMW 「오늘은 크리스마스야」
			PRINTFORMW 「어딘가 함께 가지 않을래？」
		ELSEIF TALENT:사모
			PRINTFORMW 「%CALLNAME:MASTER%、메리 크리스마스」
			PRINTFORMW 「이런 거、나부터 대환영이야」
			PRINTFORMW 「겨울을 즐거운 추억으로 간직해요♪」
		ELSE
			PRINTFORMW 「메리 크리스마스」
			PRINTFORMW 레티는 그렇게 말을 걸어 왔다。
			PRINTFORMW 「아이들은 선물로 신바람。나는 겨울이라 신바람이야」
		ENDIF
	ENDIF
;==================================================
;아침에 일어났을 때 (おはよう구상)
;==================================================
@M_KOJO_EVENT_K74_2(ARG,ARG:1)
;구상주는 TARGET
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;비동거이자 상대가 먼저 일어났다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;TARGET의 사실에 MASTER가 들어가 있다 (연모시 동침중 취침시에만?)
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER의 사실에 TARGET이 들어가 있다 (연모 없이도 들어올 가능성 있음)
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;동거이자 상대가 먼저 일어났다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;동거이자 상대가 자고 있다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTER가 일어나고, 상대가 일어났다
	;동침 시 TARGET 기상은 이쪽 (TARGET이 쇠약or동침 중 TARGET이 수마에 패배 후 그대로 MASTER가 계속 일어난 후에 상대가 기상한 경우 한정)
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;-------------------------------------------------
		;비동거
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;동거중
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;그외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;밤에 잘 때 (おやすみ구상)
;==================================================
@M_KOJO_EVENT_K74_3(ARG,ARG:1)
;구상주는 TARGET
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;自室に帰る（定時になって寝る）
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;眠そうにしている
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;수면중（起きていないので会話というよりは寝言？）
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;장난중
	;기입체크 (=0, 비표시、1, 표시)
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 4
		;PRINTFORMW
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;衰弱中（恋慕付き拠点内キャラがMAIN_MAPで衰弱状態になった場合か、お招き部屋で相手が衰弱した場合に発生
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（部屋まで運ばれる）
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが自室まで戻ってきた
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;そのまま着替えて寝た
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から追い出された
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他キャラとのＨを止めさせて寝た
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;非在住TARGETがMAIN_MAPで休憩
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;前のターンから一緒の部屋にいる状態で相手が寝る（お招き部屋含む（
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORMW
		RETURN 1
	ENDIF
	;그외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;이동시 엇갈림
;==================================================
@M_KOJO_EVENT_K74_4(ARG,ARG:1)
;구상주는 TARGET
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;멈춰 섰다
	;이후 조우 구상에 접속
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;가볍게 인사하고 지나갔다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;무시하고 지나갔다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;그외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;타자 개입으로 무드 변화
;==================================================
@M_KOJO_EVENT_K74_5(ARG,ARG:1)
;구상주는 TARGET
;ARG에 들어온 캐릭터 (인원이 방대한 만큼, 자기파악 자기책임으로)
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;레이무가 들어왔다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;루~코토가 들어왔다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;그외 (캐릭터 지정 없음)
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;정사를 목격했다
;==================================================
@M_KOJO_EVENT_K74_6(ARG,ARG:1)
;구상주는 TARGET
;ARG에 정사 상대
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;정사를 목격했다 (친해져(친해져) 정도:저)
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;질세라 참가 (친해져(친해져) 정도:고)
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;어색한 듯이 떠난다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;그외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;정사를 들켰다
;==================================================
@M_KOJO_EVENT_K74_7(ARG,ARG:1)
;구상주는 TARGET
;ARG에 목격자
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;정사를 들켰다 (목격자의 친해져(친해져) 정도:저)
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;목격자가 질세라 참가 (목격자의 친해져(친해져) 정도:고)
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;목격자가 물러간다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;그외
	PRINTFORML
ENDIF
RETURN 1

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

;==================================================
;팬티를 몰수당했다
;==================================================
@M_KOJO_EVENT_K74_9(ARG,ARG:1)
;구상주는 TARGET
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------

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

;==================================================
;밀어 넘어뜨렸다
;==================================================
@M_KOJO_EVENT_K74_10(ARG,ARG:1)
;구상주는 TARGET
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;우후후==2 (개시시)
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;MASTER를 밀어 넘어뜨렸다 (개시시)
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER에게 껴안겼다 (개시시)
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;달랠 수 있었다 (종료시)
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;-------------------------------------------------
		;빠져나간다
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;껴안기모드 만족 종료
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;껴안기모드 강제종료
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;빠져나가기 실패
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;좋을 대로 해 상태에서 빠져나가지 못했다
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;욕구 불만이 높아 빠져나가지 못했다
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;유혹해왔다 (남의 눈에 띄지 않는 장소에 가고 싶어하는 녀석)
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;ARG:1=TARGET의 욕구불만도 (최고 1000)
		;필요하면 이걸로 분기를 만들어 주세요
		PRINTFORML
		RETURN 1
	ENDIF
	;그외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;목욕탕에서 조우
;==================================================
@M_KOJO_EVENT_K74_11(ARG,ARG:1)
;구상주는 TARGET
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;쫓겨났다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;눈이 마주쳤다 (쫓겨나지 않는다)
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;그외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;잠자리에 숨어들다
;==================================================
@M_KOJO_EVENT_K74_12(ARG,ARG:1)
;구상주는 TARGET
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;쫓겨난다 (분노)
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;잠자리에 침입
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;잠자리에 침입 (상대가 연모)
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;잠자리에 침입 (상대가 연모・쇠약)
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;쫓겨난다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;쫓겨난다 (쇠약)
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;그외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;일하는중
;==================================================
@M_KOJO_EVENT_K74_13(ARG,ARG:1)
;구상주는 TARGET
;ARG:1에게 남아 있는 일량
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------

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

;==================================================
;식사계
;==================================================
@M_KOJO_EVENT_K74_14(ARG,ARG:1)
;구상주는 TARGET
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;가지고 있던 음식을 먹혔다
	;TCVAR:훔쳐먹기억제 로 가지고 있던 음식을 먹히는 것을 피할 수 있다
	;사양 예 (약이 들어 있으면 먹지 않는다)
	;IF DISH_DRG
	;	TCVAR:훔쳐먹기억제 = 1
	;ENDIF

	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		PRINTFORML
		RETURN 1
	ENDIF
	;그외
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;MASTER가 밀어 넘어뜨렸다
;==================================================
@M_KOJO_EVENT_K74_15(ARG,ARG:1)
;구상주는 TARGET
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;미실장 (덮치기 커맨드로 통합?)
	;MASTER가 밀어 넘어뜨렸다 (우후후 개시시)
	;기입체크 (=0, 비표시、1, 표시)
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;밀회종료 (우후후 종료시)
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;그외
	PRINTFORML
	;-------------------------------------------------
	;사후 묘사
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;정액이 흘러내렸다
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;애액이 흘러내렸다
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;사후의 무드
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;옷을 입다
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;동침한다
;==================================================
@M_KOJO_EVENT_K74_16(ARG,ARG:1)
;구상주는 TARGET
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------

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

IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;ARG=1~3은 배타
	;수수께끼의 쾌감
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;절정
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;팬티 분실
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【무자각 구내 사정】
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;정액중독 저 정음
		IF ARG:1 == 1
		;정액중독 저 토해냄
		ELSEIF ARG:1 == 2
		;정액중독 저 손으로 가림
		ELSEIF ARG:1 == 3
		;정액중독 고 정음
		ELSEIF ARG:1 == 4
		;농후정액&정액중독 저 토해냄
		ELSEIF ARG:1 == 5
		;농후정액&정액중독 고 정음
		ELSEIF ARG:1 == 6
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【무자각 안면 사정】
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;무지보유&정액경험 100미만
		IF ARG:1 == 1
		;통상 닦아낸다
		ELSEIF ARG:1 == 2
		;안면사정액 혀로 맛본다
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【무자각 수음 사정】
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;닦아낸다
		IF ARG:1 == 1
		;혀로 맛본다
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【무자각 애널 사정】
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;A감각 2이하
		IF ARG:1 == 1
		;그것 이외
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【무자각 처녀 상실】
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【무자각 질내 사정】
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;비처녀 질내 사정 피임약 없음
		IF ARG:1 == 1
		;비처녀 질내 사정 피임약 없음
		ELSEIF ARG:1 == 2
		;처녀 질내 사정
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;시간정지 해제 공통
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;생으로 하게 해달라고 할 때
;==================================================
@M_KOJO_EVENT_K74_18(ARG,ARG:1)
;구상주는 TARGET
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;피임요구대사
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;거절했다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;거절했는데도 버텨서 질렸다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;위험일 이외 허가
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;위험일 허가
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;신사 생활을 승인받다
;==================================================
@M_KOJO_EVENT_K74_19(ARG,ARG:1)
;구상주는 ARG
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;인정을 받다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;인정받지 못하다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;아나타의 개인실 변경으로 인한 동거
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;귀가시
;==================================================
@M_KOJO_EVENT_K74_20(ARG,ARG:1)
;구상주는 LOCALS or RESULT
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;통상 귀가
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;데이트중 귀가
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;玄関先でお見送り
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;함락소질 취득 시
;==================================================
@M_KOJO_EVENT_K74_21(ARG,ARG:1)
;구상주는 ARG
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;연모 취득
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;사모 취득
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;애욕 취득
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;정부 취득
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;섹프 취득
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;조교 종료시 자위
;==================================================
@M_KOJO_EVENT_K74_22(ARG,ARG:1)
;구상주는 ARG
;ARG:0에 자위 상황
;ARG:1에 자위 종류
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;통상 자위
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;동실시 자위
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;질내사정 정액 자위
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;무지보유 (자위경험(조교자위경험은 차감)에 의한 분기 있음)
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		LOCAL:2 = EXP:자위경험 - EXP:조교자위경험
		;무지 소거 이벤트 있음 (표시는 한 번뿐)
		IF LOCAL:1 >= 25
		;지문 분기. 書きたい場合は[SKIPSTART][SKIPEND]を削除してください
		[SKIPSTART]
		ELSEIF LOCAL:1 >= 20
		ELSEIF LOCAL:1 >= 15
		ELSEIF LOCAL:1 >= 10
		ELSEIF LOCAL:1 >= 5
		[SKIPEND]
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;함락소질 있음 자위중독 높음
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;-------------------------------------------------
		;C민감orC감각 10이상
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;V민감orV감각 10이상
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;A민감orA감각 10이상
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;B민감orB감각 10이상
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;부위 지정 없음
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 5
			PRINTFORML
			RETURN 1
		ENDIF
		;그외
		;위의 분기를 일절 쓰지 않고, 여기에 쓰는걸로 함락소질 있음 자위중독 높음 자위 공통 구상을 표시할 수 있습니다
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;자위중독 높음
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;-------------------------------------------------
		;항문질강동시
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;질강만
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;그외
		;위의 분기를 일절 쓰지 않고, 여기에 쓰는걸로 자위중독 높음 자위 공통 구상을 표시할 수 있습니다
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;참는다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
	;그외
	;위의 분기를 일절 쓰지 않고, 여기에 쓰는걸로 자위 공통 구상을 표시할 수 있습니다
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1
;==================================================
;목욕탕에 데리고간다
;==================================================
@M_KOJO_EVENT_K74_23(ARG,ARG:1)
;구상주는 LOCAL
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;거절당했다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;같이 들어가준다
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;그외
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;회임
;==================================================
@M_KOJO_EVENT_K74_24(ARG,ARG:1)
;구상주는 LOCAL
;ARG:1	誰が父親か
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;연모
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;사모
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;함락소질 없음
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;무자각
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;그외
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;출산
;==================================================
@M_KOJO_EVENT_K74_25(ARG,ARG:1)
;구상주는 LOCAL
;ARG:1	몇 번째 아이인가
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;연모
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;사모
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;함락소질 없음
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;무자각
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;그외
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;자위들킴(딸딸이들킴)
;==================================================
@M_KOJO_EVENT_K74_26(ARG,ARG:1)

;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;보여진 순간
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;아무것도 안한다
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;그대로 속행
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;내쫓음
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;해버리다
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;사후
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 6
		;사후 숙박
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
	ENDSELECT
ENDIF

;자위들킴섹스(オナバレックス) 판정용 함수
;RETURN -1로 강제실패, RETURN 1로 강제성공
@M_KOJO_EVENT_K74_26_1(ARGS)
#DIM 補正値
IF ARGS == "どうぞそのまま"

ELSEIF ARGS == "二人で"

ENDIF

;사용 예
;IF !TALENT:XX:연모
;	PRINTFORMW %CALLNAME:XX%はガードが堅いぞ！
;	RETURN -1
;ENDIF
;IF TALENT:MASTER:농후정액
;	PRINTFORMW %CALLNAME:XX%はちんぽに弱いぞ！
;	RETURN 1
;ENDIF
;==================================================
;상대방으로부터 데이트 권유
;==================================================
@M_KOJO_EVENT_K74_27(ARG,ARG:1)
;구상주는 LOCAL
;ARG:1은 목적지
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;권유 문구
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;수락했다
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;거절했다
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;방에 초대받았다
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;방에 초대받았다를 수락했다
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;방에 초대받았다를 거절했다
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;탈의 구상
;==================================================
@M_KOJO_EVENT_K74_28(ARG,ARG:1)
;구상주는 TARGET
;ARG에 벗기는 방법 선택
;ARG:1 (ARG=3의 경우만 있음) 지문의 반응
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;전라로 한다
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;시간정지시
			IF FLAG:70
			;통상
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;속옷차림으로 한다
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;시간정지시
			IF FLAG:70
			;통상
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;반라
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;시간정지시
			IF FLAG:70
			;통상
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;팬티 주세요
		;기입체크 (=0, 비표시、1, 표시)
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			SELECTCASE ARG:1
				;-------------------------------------------------
				CASE 0
				;교환입니다
				;기입체크 (=0, 비표시、1, 표시)
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 1
				;OK (기쁘게)
				;기입체크 (=0, 비표시、1, 표시)
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 2
				;OK (마지못해)
				;기입체크 (=0, 비표시、1, 표시)
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 3
				;싫습니다
				;기입체크 (=0, 비표시、1, 표시)
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				RETURN 1
			ENDSELECT
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

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

;==================================================
;상대방이 밀어 넘어뜨린 것을 해제
;==================================================
@M_KOJO_EVENT_K74_30(ARG,ARG:1)
;구상주는 TARGET
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
	;피곤하다
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
	;만족하여 해방
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
	;만족한 참에 밀어 넘어뜨렸다
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
	;망가질 때까지 해줄게
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;하루의 종료 시(AFTERTRA2의 앞), 안면이 없으면 호출당하지 않는다
;==================================================
@M_KOJO_EVENT_K74_31(ARG,ARG:1)
;구상주는 TARGET
;ARG는 만나지 않은 일수
;며칠 이상 안 만났으면 투덜거리거나 할 수 있어요
;CFLAG:딸딸이들킴 으로 분기 넣어도 될 것 같아
;--------------------------------------------------
;기입체크 (=0, 비표시、1, 표시)
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;소분기
	;-------------------------------------------------
	;오늘 만나지 않음
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;오늘 만나고 있음
	;기입체크 (=0, 비표시、1, 표시)
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1

[SKIPSTART]
;-------------------------------------------------
;자위들킴(딸딸이들킴)시의 지문을 디폴트의 것으로부터 변경하고 싶은 경우 용.
;그 경우는 상하의 SKIPSTART~SKIPEND를 지워주세요.
;CFLAG등 캐릭터 변수를 사용할 경우, 캐릭터 번호를 지정해야 합니다.
;-------------------------------------------------
@M_KOJO_EVENT_K74_ONABARE_1(ARG)
;-------------------------------------------------
:구상색을 입힐 거면 주석처리를 지우고 X를 캐릭터 번호로
;CALL M_KOJO_COLOR_K74

IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;자위들킴(딸딸이들킴)에서 그대로 계속 해달라고 하는 경우의 지문을 디폴트의 것으로부터 변경하고 싶은 경우 용.
;그 경우는 상하의 SKIPSTART~SKIPEND를 지워주세요.
;CFLAG등 캐릭터 변수를 사용할 경우, 캐릭터 번호를 지정해야 합니다.
;-------------------------------------------------
@M_KOJO_EVENT_K74_ONABARE_2(ARG)
;-------------------------------------------------
:구상색을 입힐 거면 주석처리를 지우고 X를 캐릭터 번호로
;CALL M_KOJO_COLOR_K74

IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;자위들킴(딸딸이들킴)없이 무너뜨림 섹스(崩しックス)의 지문을을 디폴트의 것으로부터 변경하고 싶은 경우용.
;그 경우는 상하의 SKIPSTART~SKIPEND를 지워주세요.
;CFLAG등 캐릭터 변수를 사용할 경우, 캐릭터 번호를 지정해야 합니다.
;-------------------------------------------------
@M_KOJO_EVENT_K74_ONABARE_3(前戯１,本番はどっちか,回数,注入量)
;-------------------------------------------------
#DIM 前戯１
;1=C 2=B 3=M
#DIM 本番はどっちか
;0으로 V, 1로 A
#DIM 注入量
#DIM 回数

:구상색을 입힐 거면 주석처리를 지우고 X를 캐릭터 번호로
;CALL M_KOJO_COLOR_K74

SELECTCASE 前戯１
	CASE 1
		PRINTFORML Ｃ責め
	CASE 2
		PRINTFORML Ｂ責め
	CASE 3
		PRINTFORML Ｍ責め
ENDSELECT

IF 本番はどっちか
	PRINTFORML Aで本番
ELSE
	PRINTFORML Vで本番
ENDIF
;-------------------------------------------------
[SKIPEND]

;-------------------------------------------------
;처녀・무자각비처녀에게 삽입하기 직전의 구상
;RETURN 1을 하면 커맨드를 취소합니다
;RETURN 0이면 통합니다
;CFLAG:파과캔슬구상있음 가 on 되어 있지 않으면 읽히지 않으니 주의
;-------------------------------------------------
@M_KOJO_EVENT_K74_LOST_VIRGIN_STOP
;-------------------------------------------------
PRINTFORML
RETURN 1

;-------------------------------------------------
;CFLAG:구상내껴안기판정_초회 가 on 되어 있는 경우만 유효.
;처음 밀어 넘어뜨렸을 때, 여기서 RETURN -1 하면 밀어 넘어뜨리는 걸 강제로 취소합니다.
;RETURN 0이면 통상적인 판정을 실시, RETURN 1이면 무조건 성공시킵니다.
;특정 이벤트(데이트 귀가 키스 등)를 볼 때까지 우후후하지 못하게 하고 싶을 때 등에 사용해 보세요.
;-------------------------------------------------
@M_KOJO_EVENT_K74_PERMISSION_1
;-------------------------------------------------
PRINTFORML
;RETURN -1
RETURN 0
;RETURN 1
;-------------------------------------------------

;-------------------------------------------------
;CFLAG:구상내껴안기판정_통상 이 on 되어 있는 경우만 유효.
;합의가 되어 덮쳐졌을 때, 여기서 RETURN -1 하면 덮치기를 강제로 취소합니다.
;RETURN 0이면 정상적으로 성공시킵니다.
;합의가 있어도 어떤 이유로도 우후후 할 수 없도록 하고 싶을 때 등등에 부디.
;-------------------------------------------------
@M_KOJO_EVENT_K74_PERMISSION_2
;-------------------------------------------------
PRINTFORML
RETURN 0
;RETURN -1
;-------------------------------------------------

;-------------------------------------------------
;방 묘사용 함수
;구상 캐릭터의 OMANEKIBEYA나 거점 묘사에 사용합니다
;기입할 때는 주석처리를 지워주세요
;-------------------------------------------------
;@K74_ROOM_DESCRIPTION
;PRINTFORML 예) 생활감 없는 삭막한 방이다
;-------------------------------------------------

;==================================================
;선물 이벤트
;==================================================
@M_KOJO_EVENT_K74_GIFT(ARG, GIFT_ID, 評価点, GIFT_NAME, SENSE)
#DIM GIFT_ID
#DIM 評価点
#DIMS GIFT_NAME
#DIMS SENSE
;---------------------------------------------------------------------------------------------------
;評価点       선물의 평가점(1~999), 구상주가 준 경우에도 구상주의 평가점
;GIFT_NAME    선물의 명칭
;SENSE        선물에 설정된 속성. STRCOUNT(DISH_TASTE, "ほげほげ/")를 사용하면 특정 속성을 판정할 수 있습니다.
;GIFT_ID      이거 혼자로는 안써요. 이하의 식내 함수를 사용하면 데이터를 추출할 수 있습니다 (집착하고 싶은 사람용)
;　GET_GIFTDATA(GIFT_ID, "횟수")    받은 (준) 횟수
;　GET_GIFTDATA(GIFT_ID, "득점")    득점 (1~999), 구상 템플릿 내에서는 준비되어 있습니다.
;　GET_GIFTDATA(GIFT_ID, "날짜")    받은 (준) 날짜 (1~9999)
;　GET_GIFTDATA(GIFT_ID, "장소")    샀던 장소 (데이트 행선지)
;　GET_GIFTDATA(GIFT_ID, "형용사")  형용사 번호 (선물데이터_형용사.erb 참조)
;　GET_GIFTDATA(GIFT_ID, "본체")    본체 번호 (선물데이터_본체.erb 참조)
;--------------------------------------------------------------------------------------------------
;데이트에서 돌아오는 길에 구상주가 당신에게 선물 전달 (함락이나 호감도에 관계없이 친밀 5 이상에서 발생)
;평가점은 701~999 (건네주는 캐릭터 본인의 평가)
;--------------------------------------------------------------------------------------------------
IF ARG == 1
	;PRINTFORMW 「%조사처리(GIFT_NAME, "를")% 줄테니 소중히 써줘」
	RETURN 1
;--------------------------------------------------------------------------------------------------
;하루의 끝에 오늘 받은 선물을 소중히 여긴다 (700점 이상)
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 2
	;IF STRCOUNT(SENSE, "かわいい/")
	;	PRINTFORMW 「귀여운 선물을 받아버렸어」
	;ELSEIF 評価点 >= 800
	;	PRINTFORMW 「정말 멋진 선물을 받아버렸어」
	;ELSE
	;	PRINTFORMW 「멋진 선물을 받아버렸어」
	;ENDIF
	RETURN 1
;--------------------------------------------------------------------------------------------------
;하루의 끝에 오늘 받은 선물을 마음에 들게 한다 (↑의 소중히 여긴다에서 이어짐) (700점 이상 최고득점)
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 3
	;IF STRCOUNT(SENSE, "身につける/")
	;	PRINTFORMW 「내일부터 이거 달고 다녀야지」
	;ELSE
	;	PRINTFORMW 「내일부터 이거 들고 다녀야지」
	;ENDIF
	RETURN 1
;--------------------------------------------------------------------------------------------------
;하루의 끝에 오늘 받은 선물을 일단 보관한다 (400~699점)
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 4
	;PRINTFORMW 「우선 장식해 두자」
	RETURN 1
;--------------------------------------------------------------------------------------------------
;하루의 끝에 오늘 받은 선물을 몰래 전당잡는다 (400점 미만)
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 5
	;PRINTFORMW 「나 이거 싫어하는데~」
	RETURN 1
ENDIF
RETURN 1

path: ERB/대사_메시지관련/개인대사/074 레티/0_초기구상/M_KOJO_K74_イベント.ERB